diff --git a/tasks/02-bibliotheca-main.sh b/tasks/02-bibliotheca-main.sh
index d96dd60..8c54e1a 100755
--- a/tasks/02-bibliotheca-main.sh
+++ b/tasks/02-bibliotheca-main.sh
@@ -7499,6 +7499,166 @@ else
 fi
 echo
 
+# ----------------------------------- 4000d ---------------------------------- #
+
+# spec_B_T_18
+#TODO
+echo "Titelzusatz 4000d..."
+if curl -fs \
+  --data project="${projects[$p]}" \
+  --data-urlencode "operations@-" \
+  "${endpoint}/command/core/apply-operations$(refine_csrf)" > /dev/null \
+  << "JSON"
+  [
+    {
+      "op": "core/column-addition",
+      "engineConfig": {
+        "facets": [],
+        "mode": "row-based"
+      },
+      "baseColumnName": "M|HSTZU",
+      "expression": "grel:value",
+      "onError": "set-to-blank",
+      "newColumnName": "4000d",
+      "columnInsertIndex": 3
+    }
+  ]
+JSON
+then
+  log "transformed ${p} (${projects[$p]})"
+else
+  error "transform ${p} (${projects[$p]}) failed!"
+fi
+echo
+
+# ----------------------------------- 4020a ---------------------------------- #
+
+# spec_B_T_20
+#TODO
+echo "Ausgabevermerk 4020a..."
+if curl -fs \
+  --data project="${projects[$p]}" \
+  --data-urlencode "operations@-" \
+  "${endpoint}/command/core/apply-operations$(refine_csrf)" > /dev/null \
+  << "JSON"
+  [
+    {
+      "op": "core/column-addition",
+      "engineConfig": {
+        "facets": [],
+        "mode": "row-based"
+      },
+      "baseColumnName": "M|AUFL",
+      "expression": "grel:value",
+      "onError": "set-to-blank",
+      "newColumnName": "4020a",
+      "columnInsertIndex": 3
+    }
+  ]
+JSON
+then
+  log "transformed ${p} (${projects[$p]})"
+else
+  error "transform ${p} (${projects[$p]}) failed!"
+fi
+echo
+
+# ----------------------------------- 4030n ---------------------------------- #
+
+# spec_B_T_16
+#TODO
+echo "Verlagsname 4030n..."
+if curl -fs \
+  --data project="${projects[$p]}" \
+  --data-urlencode "operations@-" \
+  "${endpoint}/command/core/apply-operations$(refine_csrf)" > /dev/null \
+  << "JSON"
+  [
+    {
+      "op": "core/column-addition",
+      "engineConfig": {
+        "facets": [],
+        "mode": "row-based"
+      },
+      "baseColumnName": "M|VERL",
+      "expression": "grel:value",
+      "onError": "set-to-blank",
+      "newColumnName": "4020a",
+      "columnInsertIndex": 3
+    }
+  ]
+JSON
+then
+  log "transformed ${p} (${projects[$p]})"
+else
+  error "transform ${p} (${projects[$p]}) failed!"
+fi
+echo
+
+# ----------------------------------- 4030p ---------------------------------- #
+
+# spec_B_T_21
+#TODO
+echo "Erscheinungsort 4030p..."
+if curl -fs \
+  --data project="${projects[$p]}" \
+  --data-urlencode "operations@-" \
+  "${endpoint}/command/core/apply-operations$(refine_csrf)" > /dev/null \
+  << "JSON"
+  [
+    {
+      "op": "core/column-addition",
+      "engineConfig": {
+        "facets": [],
+        "mode": "row-based"
+      },
+      "baseColumnName": "M|VORT",
+      "expression": "grel:value",
+      "onError": "set-to-blank",
+      "newColumnName": "4020a",
+      "columnInsertIndex": 3
+    }
+  ]
+JSON
+then
+  log "transformed ${p} (${projects[$p]})"
+else
+  error "transform ${p} (${projects[$p]}) failed!"
+fi
+echo
+
+# ----------------------------------- 4060a ---------------------------------- #
+
+# spec_B_T_22
+#TODO
+echo "Umfang 4060a..."
+if curl -fs \
+  --data project="${projects[$p]}" \
+  --data-urlencode "operations@-" \
+  "${endpoint}/command/core/apply-operations$(refine_csrf)" > /dev/null \
+  << "JSON"
+  [
+    {
+      "op": "core/column-addition",
+      "engineConfig": {
+        "facets": [],
+        "mode": "row-based"
+      },
+      "baseColumnName": "M|VERL",
+      "expression": "grel:value.split(' : ')[0]",
+      "onError": "set-to-blank",
+      "newColumnName": "4020a",
+      "columnInsertIndex": 3
+    }
+  ]
+JSON
+then
+  log "transformed ${p} (${projects[$p]})"
+else
+  error "transform ${p} (${projects[$p]}) failed!"
+fi
+echo
+
 # ----------------------------------- 8200 ----------------------------------- #
 
 # spec_B_E_02
@@ -9157,6 +9317,11 @@ with(
     '1500',
     '2000',
     '4000a',
+    '4000d',
+    '4020a',
+    '4030n',
+    '4030p',
+    '4060a',
     '7100j',
     '7100f',
     '7100a',
diff --git a/tasks/03-ba-sachsen.sh b/tasks/03-ba-sachsen.sh
index f8f1ff5..9ba7d96 100755
--- a/tasks/03-ba-sachsen.sh
+++ b/tasks/03-ba-sachsen.sh
@@ -563,7 +563,10 @@ if(row.index - row.record.fromRowIndex == 0,
 + forNonBlank(cells['1100a'].value, v, '011@ ' + 'a' + v + forNonBlank(cells['1100b'].value, v, 'b' + v, '') + forNonBlank(cells['1100n'].value, v, 'n' + v, '') + '\n', '')
 + forNonBlank(cells['1131'].value, v, '013D ' + 'a' + v + '\n', '')
 + forNonBlank(cells['1140'].value, v, '013H ' + 'a' + v + '\n', '')
-+ forNonBlank(cells['4000a'].value, v, '021A ' + 'a' + v + '\n', '')
++ forNonBlank(cells['4000a'].value, v, '021A ' + 'a' + v + forNonBlank(cells['4000d'].value, v, 'd' + v, '') + '\n', '')
++ forNonBlank(cells['4020a'].value, v, '032@ ' + 'a' + v + '\n', '')
++ if(or(isNonBlank(cells['4030n'].value),isNonBlank(cells['4030p'].value)),'033A ' + forNonBlank(cells['4030n'].value, v, 'n' + v,'') + forNonBlank(cells['4030p'].value, v, 'p' + v, '') + '\n', ''),'')
++ forNonBlank(cells['4060a'].value, v, '034D ' + 'a' + v + '\n', '')
 + forNonBlank(cells['0999'].value, v, '046W ' + 'a' + v + '\n', '')
 ,'')
 }}{{