--- id: object/codeunit/378 type: object title: Codeunit 378 "Transfer Extended Text" summary: Codeunit 378 "Transfer Extended Text" in Base Application (Microsoft.Foundation.ExtendedText). 22 public procedures, 41 events. Present since at least BC23, still in BC30, changed in BC24-28. tier: official language: en tags: - codeunit - base application versions: introduced: null last_changed: "28" deprecated: null review: state: derived by: null at: null flags: [] generated: at: "2026-10-11T00:31:51.816Z" pipeline: 0.2.0 prompts: {} input_hash: 5a5aa4d03ecb530f5aa77054251796ecd1139f7596906ff39ccf08dcc02eab7d evidence: - kind: code url: https://github.com/microsoft/BCApps/blob/ea08af5ef2d6a9b5c5af4a029288abbe2c883220/src/Layers/W1/BaseApp/Foundation/ExtendedText/TransferExtendedText.Codeunit.al title: src/Layers/W1/BaseApp/Foundation/ExtendedText/TransferExtendedText.Codeunit.al (releases/29.x) date: null commit: ea08af5ef2d6a9b5c5af4a029288abbe2c883220 t: null quote: null links: learn: [] objects: [] features: [] topics: [] localizations: [] videos: [] posts: [] guidelines: [] object_type: codeunit object_id: 378 name: Transfer Extended Text namespace: Microsoft.Foundation.ExtendedText app: Base Application extends: null first_version: "23" last_version: "30" present_in: - "23" - "24" - "25" - "26" - "27" - "28" - "29" - "30" changed_in: - "24" - "25" - "26" - "27" - "28" source_major: "29" obsolete: null countries: [] ms_search_form_ids: [] counts: fields: 0 procedures: 68 events: 41 subscribers: 0 relations: out: 0 referenced_by: 0 pages: 0 extended_by: 0 event_subscribers: 0 calls: 0 called_by: 41 implements: 0 --- # Codeunit 378 "Transfer Extended Text" > Codeunit 378 "Transfer Extended Text" in Base Application (Microsoft.Foundation.ExtendedText). 22 public procedures, 41 events. Present since at least BC23, still in BC30, changed in BC24-28. Base Application · Microsoft.Foundation.ExtendedText · BC23-30 · [source at ea08af5e](https://github.com/microsoft/BCApps/blob/ea08af5ef2d6a9b5c5af4a029288abbe2c883220/src/Layers/W1/BaseApp/Foundation/ExtendedText/TransferExtendedText.Codeunit.al) · facts from BC29 ## Events published - `OnAfterReadLines(var TempExtendedTextLine: Record "Extended Text Line" temporary; var ExtendedTextHeader: Record "Extended Text Header"; LanguageCode: Code[10])` (integration) - `OnBeforeReadLines(var ExtendedTextHeader: Record "Extended Text Header"; DocDate: Date; LanguageCode: Code[10]; var IsHandled: Boolean; var Result: Boolean; var TempExtTextLine: Record "Extended Text Line" temporary)` (integration) - `OnBeforeToPurchLineInsert(var ToPurchLine: Record "Purchase Line"; var PurchLine: Record "Purchase Line"; TempExtTextLine: Record "Extended Text Line" temporary; var NextLineNo: Integer; LineSpacing: Integer; var IsHandled: Boolean)` (integration) - `OnInsertSalesExtTextRetLastOnBeforeToSalesLineInsert(var ToSalesLine: Record "Sales Line"; var SalesLine: Record "Sales Line"; TempExtTextLine: Record "Extended Text Line" temporary; var NextLineNo: Integer; LineSpacing: Integer; var IsHandled: Boolean)` (integration) - `OnBeforeToReminderLineInsert(var ToReminderLine: Record "Reminder Line"; ReminderLine: Record "Reminder Line"; TempExtTextLine: Record "Extended Text Line" temporary; var NextLineNo: Integer; LineSpacing: Integer; var IsHandled: Boolean)` (integration) - `OnDeleteFinChrgMemoLinesOnAfterFinChrgMemoLine2SetFilters(var FinChrgMemoLine2: Record "Finance Charge Memo Line"; var FinChrgMemoLine: Record "Finance Charge Memo Line")` (integration) - `OnDeletePurchLinesOnAfterSetFilters(var ToPurchaseLine: Record "Purchase Line"; FromPurchaseLine: Record "Purchase Line")` (integration) - `OnDeleteSalesLinesOnAfterSetFilters(var ToSalesLine: Record "Sales Line"; FromSalesLine: Record "Sales Line")` (integration) - `OnDeleteReminderLinesOnAfterReminderLine2SetFilters(var ReminderLine2: Record "Reminder Line"; var ReminderLine: Record "Reminder Line")` (integration) - `OnFinChrgMemoCheckIfAnyExtTextAutoText(var ExtendedTextHeader: Record "Extended Text Header"; var FinanceChargeMemoHeader: Record "Finance Charge Memo Header"; var FinanceChargeMemoLine: Record "Finance Charge Memo Line"; Unconditionally: Boolean; var MakeUpdateRequired: Boolean)` (integration) - `OnPrepmtGetAnyExtTextAfterReadLines(var ExtendedTextHeader: Record "Extended Text Header"; var TempExtendedTextLine: Record "Extended Text Line" temporary)` (integration) - `OnPrepmtGetAnyExtTextBeforeReadLines(var ExtendedTextHeader: Record "Extended Text Header"; DocumentDate: Date; LanguageCode: Code[10])` (integration) - `OnPurchCheckIfAnyExtTextAutoText(var ExtendedTextHeader: Record "Extended Text Header"; var PurchaseHeader: Record "Purchase Header"; var PurchaseLine: Record "Purchase Line"; Unconditionally: Boolean; var MakeUpdateRequired: Boolean)` (integration) - `OnReminderCheckIfAnyExtTextAutoText(var ExtendedTextHeader: Record "Extended Text Header"; var ReminderHeader: Record "Reminder Header"; var ReminderLine: Record "Reminder Line"; Unconditionally: Boolean; var MakeUpdateRequired: Boolean)` (integration) - `OnSalesCheckIfAnyExtTextAutoText(var ExtendedTextHeader: Record "Extended Text Header"; var SalesHeader: Record "Sales Header"; var SalesLine: Record "Sales Line"; Unconditionally: Boolean; var MakeUpdateRequired: Boolean)` (integration) - `OnBeforeInsertSalesExtText(var SalesLine: Record "Sales Line"; var TempExtTextLine: Record "Extended Text Line" temporary; var IsHandled: Boolean; var MakeUpdateRequired: Boolean; var LastInsertedSalesLine: Record "Sales Line")` (integration) - `OnBeforeInsertReminderExtText(var ReminderLine: Record "Reminder Line"; var TempExtTextLine: Record "Extended Text Line" temporary; var IsHandled: Boolean; var MakeUpdateRequired: Boolean)` (integration) - `OnBeforeInsertFinChrgMemoExtText(var FinChrgMemoLine: Record "Finance Charge Memo Line"; var TempExtTextLine: Record "Extended Text Line" temporary; var IsHandled: Boolean; var MakeUpdateRequired: Boolean)` (integration) - `OnBeforeInsertPurchExtText(var PurchLine: Record "Purchase Line"; var TempExtTextLine: Record "Extended Text Line" temporary; var IsHandled: Boolean; var MakeUpdateRequired: Boolean; var LastInsertedPurchLine: Record "Purchase Line")` (integration) - `InsertPurchExtTextRetLastOnBeforeToPurchLineFind(var PurchLine: Record "Purchase Line")` (integration) - `OnInsertSalesExtTextRetLastOnBeforeToSalesLineFind(var SalesLine: Record "Sales Line")` (integration) - `OnPurchCheckIfAnyExtTextOnBeforeSetFilters(var PurchaseLine: Record "Purchase Line"; var AutoText: Boolean; Unconditionally: Boolean)` (integration) - `OnSalesCheckIfAnyExtTextOnBeforeSetFilters(var SalesLine: Record "Sales Line"; var AutoText: Boolean; Unconditionally: Boolean)` (integration) - `OnReminderCheckIfAnyExtTextOnBeforeSetFilters(var ReminderLine: Record "Reminder Line"; var AutoText: Boolean; Unconditionally: Boolean)` (integration) - `OnFinChrgMemoCheckIfAnyExtTextOnBeforeSetFilters(var FinChrgMemoLine: Record "Finance Charge Memo Line"; var AutoText: Boolean; Unconditionally: Boolean)` (integration) - `OnReadExtTextLinesOnBeforeSetFilters(var ExtTextHeader: Record "Extended Text Header")` (integration) - `OnInsertFinChrgMemoExtTextOnBeforeToFinChrgMemoLineInsert(var ToFinanceChargeMemoLine: Record "Finance Charge Memo Line"; FinanceChargeMemoLine: Record "Finance Charge Memo Line"; TempExtendedTextLine: Record "Extended Text Line" temporary; var NextLineNo: Integer; LineSpacing: Integer; var IsHandled: Boolean)` (integration) - `OnReadExtTextLinesOnBeforeTempExtTextLineInsert(var TempExtendedTextLine: Record "Extended Text Line" temporary; ExtendedTextHeader: Record "Extended Text Header")` (integration) - `OnInsertSalesExtTextRetLastOnBeforeFindTempExtTextLine(var TempExtendedTextLine: Record "Extended Text Line" temporary; SalesLine: Record "Sales Line")` (integration) - `OnInsertReminderExtTextOnBeforeFindTempExtTextLine(var TempExtendedTextLine: Record "Extended Text Line" temporary; ReminderLine: Record "Reminder Line")` (integration) - `OnInsertPurchExtTextRetLastOnBeforeFindTempExtTextLine(var TempExtendedTextLine: Record "Extended Text Line" temporary; PurchaseLine: Record "Purchase Line")` (integration) - `OnBeforeSalesCheckIfAnyExtText(var SalesLine: Record "Sales Line"; SalesHeader: Record "Sales Header"; Unconditionally: Boolean; var MakeUpdateRequired: Boolean; var AutoText: Boolean; var Result: Boolean; var IsHandled: Boolean)` (integration) - `OnBeforePurchCheckIfAnyExtText(var PurchLine: Record "Purchase Line"; PurchaseHeader: Record "Purchase Header"; Unconditionally: Boolean; var MakeUpdateRequired: Boolean; var AutoText: Boolean; var Result: Boolean; var IsHandled: Boolean)` (integration) - `OnDeleteSalesLinesOnBeforeDelete(var SalesLine: Record "Sales Line"; var SalesLineToDelete: Record "Sales Line"; var IsHandled: Boolean)` (integration) - `OnBeforeInsertJobExtTextRetLast(var JobPlanningLine: Record "Job Planning Line"; var TempExtendedTextLine: Record "Extended Text Line" temporary; var MakeUpdateRequired: Boolean)` (integration) - `OnJobCheckIfAnyExtTextOnBeforeReadExtTextLines(var ExtendedTextHeader: Record "Extended Text Header"; var Job: Record Job; var JobPlanningLine: Record "Job Planning Line"; Unconditionally: Boolean; var MakeUpdateRequired: Boolean; var DocumentDate: Date)` (integration) - `OnInsertJobExtTextRetLastOnBeforeToJobPlanningLineInsert(var ToJobPlanningLine: Record "Job Planning Line"; var JobPlanningLine: Record "Job Planning Line"; TempExtendedTextLine: Record "Extended Text Line" temporary; var NextLineNo: Integer; LineSpacing: Integer; var IsHandled: Boolean)` (integration) - `OnDeleteJobPlanningLinesOnAfterSetFilters(var ToJobPlanningLine: Record "Job Planning Line"; FromJobPlanningLine: Record "Job Planning Line")` (integration) - `OnJobCheckIfAnyExtTextOnAfterCheckAutoText(var JobPlanningLine: Record "Job Planning Line"; var AutoText: Boolean; Unconditionally: Boolean)` (integration) - `OnInsertSalesExtTextRetLastOnAfterSetLineSpacing(var LineSpacing: Integer)` (integration) - `OnBeforeJobCheckIfAnyExtText(var JobPlanningLine: Record "Job Planning Line"; Unconditionally: Boolean; var MakeUpdateRequired: Boolean; var AutoText: Boolean; var Result: Boolean; var IsHandled: Boolean)` (integration) ## Procedures - `SalesCheckIfAnyExtText(var SalesLine: Record "Sales Line"; Unconditionally: Boolean): Boolean` - `SalesCheckIfAnyExtText(var SalesLine: Record "Sales Line"; Unconditionally: Boolean; SalesHeader: Record "Sales Header"): Boolean` - `ReminderCheckIfAnyExtText(var ReminderLine: Record "Reminder Line"; Unconditionally: Boolean): Boolean` - `FinChrgMemoCheckIfAnyExtText(var FinChrgMemoLine: Record "Finance Charge Memo Line"; Unconditionally: Boolean): Boolean` - `PurchCheckIfAnyExtText(var PurchaseLine: Record "Purchase Line"; Unconditionally: Boolean): Boolean` - `PurchCheckIfAnyExtText(var PurchLine: Record "Purchase Line"; Unconditionally: Boolean; PurchaseHeader: Record "Purchase Header"): Boolean` - `PrepmtGetAnyExtText(GLAccNo: Code[20]; TabNo: Integer; DocumentDate: Date; LanguageCode: Code[10]; var ExtTextLine: Record "Extended Text Line" temporary)` - `InsertSalesExtText(var SalesLine: Record "Sales Line")` - `InsertSalesExtTextRetLast(var SalesLine: Record "Sales Line"; var LastInsertedSalesLine: Record "Sales Line")` - `InsertReminderExtText(var ReminderLine: Record "Reminder Line")` - `InsertFinChrgMemoExtText(var FinChrgMemoLine: Record "Finance Charge Memo Line")` - `InsertPurchExtText(var PurchLine: Record "Purchase Line")` - `InsertPurchExtTextRetLast(var PurchLine: Record "Purchase Line"; var LastInsertedPurchLine: Record "Purchase Line")` - `MakeUpdate(): Boolean` - `SetMakeUpdateRequired(NewMakeUpdateRequired: Boolean)` - `ReadExtTextLines(var ExtTextHeader: Record "Extended Text Header"; DocDate: Date; LanguageCode: Code[10]): Boolean` - `GetTempExtTextLine(var ToTempExtendedTextLine: Record "Extended Text Line" temporary)` - `JobCheckIfAnyExtText(var JobPlanningLine: Record "Job Planning Line"; Unconditionally: Boolean): Boolean` - `JobCheckIfAnyExtText(var JobPlanningLine: Record "Job Planning Line"; Unconditionally: Boolean; Job: Record Job): Boolean` - `InsertJobExtText(var JobPlanningLine: Record "Job Planning Line")` - `InsertJobExtTextRetLast(var JobPlanningLine: Record "Job Planning Line"; var LastInsertedJobPlanningLine: Record "Job Planning Line")` - `IsDeleteAttachedLines(LineNo: Integer; No: Code[20]; AttachedToLineNo: Integer): Boolean` Plus 5 local procedures. ## Triggers OnRun ## Called by From the extracted call graph of BC29 (graphify-al on the snapshot checkout): calls whose target is known from a declared type or an `Object::"Name"` argument. Interface dispatch and calls through events are not counted, so the list is not complete. - [Codeunit 6620 "Copy Document Mgt."](../codeunit/6620.md) (8 calls: `CopyArchPurchLine → InsertPurchExtTextRetLast`, `CopyArchPurchLine → PurchCheckIfAnyExtText`, `CopyArchSalesLine → InsertSalesExtTextRetLast`, …) - [Codeunit 1019 "Job-Explode BOM"](../codeunit/1019.md) (4 calls: `AddExtText → InsertJobExtText`, `AddExtText → JobCheckIfAnyExtText`, `ExplodeBOMCompLines → InsertJobExtText`, …) - [Codeunit 6003 "Service Transfer Ext. Text"](../codeunit/6003.md) (4 calls: `InsertServExtText → GetTempExtTextLine`, `ServCheckIfAnyExtText → IsDeleteAttachedLines`, `ServCheckIfAnyExtText → ReadExtTextLines`, …) - [Codeunit 63 "Sales-Explode BOM"](../codeunit/63.md) (4 calls: `ExplodeBOMCompLines → InsertSalesExtText`, `ExplodeBOMCompLines → SalesCheckIfAnyExtText`, `OnRun → InsertSalesExtText`, …) - [Codeunit 73 "Purch.-Explode BOM"](../codeunit/73.md) (4 calls: `ExplodeBOMCompLines → InsertPurchExtText`, `ExplodeBOMCompLines → PurchCheckIfAnyExtText`, `OnRun → InsertPurchExtText`, …) - [Table 37 "Sales Line"](../table/37.md) (4 calls: `ProcessSalesLine → InsertSalesExtTextRetLast`, `ProcessSalesLine → SalesCheckIfAnyExtText`, `ShowItemSub → InsertSalesExtText`, …) - [Page 1007 "Job Planning Lines"](../page/1007.md) (3 calls: `InsertExtendedText → InsertJobExtText`, `InsertExtendedText → JobCheckIfAnyExtText`, `InsertExtendedText → MakeUpdate`) - [Page 1015 "Job Planning Lines Part"](../page/1015.md) (3 calls: `InsertExtendedText → InsertJobExtText`, `InsertExtendedText → JobCheckIfAnyExtText`, `InsertExtendedText → MakeUpdate`) - [Page 435 "Reminder Lines"](../page/435.md) (3 calls: `InsertExtendedText → InsertReminderExtText`, `InsertExtendedText → MakeUpdate`, `InsertExtendedText → ReminderCheckIfAnyExtText`) - [Page 447 "Finance Charge Memo Lines"](../page/447.md) (3 calls: `InsertExtendedText → FinChrgMemoCheckIfAnyExtText`, `InsertExtendedText → InsertFinChrgMemoExtText`, `InsertExtendedText → MakeUpdate`) - [Page 46 "Sales Order Subform"](../page/46.md) (3 calls: `InsertExtendedText → InsertSalesExtText`, `InsertExtendedText → MakeUpdate`, `InsertExtendedText → SalesCheckIfAnyExtText`) - [Page 47 "Sales Invoice Subform"](../page/47.md) (3 calls: `InsertExtendedText → InsertSalesExtText`, `InsertExtendedText → MakeUpdate`, `InsertExtendedText → SalesCheckIfAnyExtText`) - [Page 508 "Blanket Sales Order Subform"](../page/508.md) (3 calls: `InsertExtendedText → InsertSalesExtText`, `InsertExtendedText → MakeUpdate`, `InsertExtendedText → SalesCheckIfAnyExtText`) - [Page 510 "Blanket Purchase Order Subform"](../page/510.md) (3 calls: `InsertExtendedText → InsertPurchExtText`, `InsertExtendedText → MakeUpdate`, `InsertExtendedText → PurchCheckIfAnyExtText`) - [Page 54 "Purchase Order Subform"](../page/54.md) (3 calls: `InsertExtendedText → InsertPurchExtText`, `InsertExtendedText → MakeUpdate`, `InsertExtendedText → PurchCheckIfAnyExtText`) - [Page 55 "Purch. Invoice Subform"](../page/55.md) (3 calls: `InsertExtendedText → InsertPurchExtText`, `InsertExtendedText → MakeUpdate`, `InsertExtendedText → PurchCheckIfAnyExtText`) - [Page 6631 "Sales Return Order Subform"](../page/6631.md) (3 calls: `InsertExtendedText → InsertSalesExtText`, `InsertExtendedText → MakeUpdate`, `InsertExtendedText → SalesCheckIfAnyExtText`) - [Page 6641 "Purchase Return Order Subform"](../page/6641.md) (3 calls: `InsertExtendedText → InsertPurchExtText`, `InsertExtendedText → MakeUpdate`, `InsertExtendedText → PurchCheckIfAnyExtText`) - [Page 95 "Sales Quote Subform"](../page/95.md) (3 calls: `InsertExtendedText → InsertSalesExtText`, `InsertExtendedText → MakeUpdate`, `InsertExtendedText → SalesCheckIfAnyExtText`) - [Page 96 "Sales Cr. Memo Subform"](../page/96.md) (3 calls: `InsertExtendedText → InsertSalesExtText`, `InsertExtendedText → MakeUpdate`, `InsertExtendedText → SalesCheckIfAnyExtText`) - [Page 97 "Purchase Quote Subform"](../page/97.md) (3 calls: `InsertExtendedText → InsertPurchExtText`, `InsertExtendedText → MakeUpdate`, `InsertExtendedText → PurchCheckIfAnyExtText`) - [Page 98 "Purch. Cr. Memo Subform"](../page/98.md) (3 calls: `InsertExtendedText → InsertPurchExtText`, `InsertExtendedText → MakeUpdate`, `InsertExtendedText → PurchCheckIfAnyExtText`) - [Codeunit 1002 "Job Create-Invoice"](../codeunit/1002.md) (2 calls: `CreateSalesLine → InsertSalesExtText`, `CreateSalesLine → SalesCheckIfAnyExtText`) - [Codeunit 333 "Req. Wksh.-Make Order"](../codeunit/333.md) (2 calls: `InsertPurchOrderLine → InsertPurchExtText`, `InsertPurchOrderLine → PurchCheckIfAnyExtText`) - [Codeunit 5702 "Dist. Integration"](../codeunit/5702.md) (2 calls: `ProcessSalesLine → InsertPurchExtText`, `ProcessSalesLine → PurchCheckIfAnyExtText`) - [Codeunit 76 "Purch.-Get Drop Shpt."](../codeunit/76.md) (2 calls: `Code → InsertPurchExtText`, `Code → PurchCheckIfAnyExtText`) - [Codeunit 80 "Sales-Post"](../codeunit/80.md) (2 calls: `CreatePrepaymentLineForCreditMemo → PrepmtGetAnyExtText`, `CreatePrepaymentLines → PrepmtGetAnyExtText`) - [Codeunit 90 "Purch.-Post"](../codeunit/90.md) (2 calls: `CreatePrepaymentLineForCreditMemo → PrepmtGetAnyExtText`, `CreatePrepmtLines → PrepmtGetAnyExtText`) - [Page 6403 "Sales Document Line Entity"](../page/6403.md) (2 calls: `InsertExtendedText → InsertSalesExtText`, `InsertExtendedText → SalesCheckIfAnyExtText`) - [Page 6405 "Purchase Document Line Entity"](../page/6405.md) (2 calls: `InsertExtendedText → InsertPurchExtText`, `InsertExtendedText → PurchCheckIfAnyExtText`) - [Table 1003 "Job Planning Line"](../table/1003.md) (2 calls: `AddItem → InsertJobExtText`, `AddItem → JobCheckIfAnyExtText`) - [Table 172 "Standard Customer Sales Code"](../table/172.md) (2 calls: `InsertExtendedText → InsertSalesExtText`, `InsertExtendedText → SalesCheckIfAnyExtText`) - [Table 175 "Standard Vendor Purchase Code"](../table/175.md) (2 calls: `InsertExtendedText → InsertPurchExtText`, `InsertExtendedText → PurchCheckIfAnyExtText`) - [Table 295 "Reminder Header"](../table/295.md) (2 calls: `InsertLines → InsertReminderExtText`, `InsertLines → ReminderCheckIfAnyExtText`) - [Table 302 "Finance Charge Memo Header"](../table/302.md) (2 calls: `InsertLines → FinChrgMemoCheckIfAnyExtText`, `InsertLines → InsertFinChrgMemoExtText`) - [Table 36 "Sales Header"](../table/36.md) (2 calls: `RecreateSalesLinesHandleSupplementTypes → InsertSalesExtText`, `RecreateSalesLinesHandleSupplementTypes → SalesCheckIfAnyExtText`) - [Table 38 "Purchase Header"](../table/38.md) (2 calls: `RecreatePurchLines → InsertPurchExtText`, `RecreatePurchLines → PurchCheckIfAnyExtText`) - [Table 39 "Purchase Line"](../table/39.md) (2 calls: `TransferExtendedTexts → InsertPurchExtTextRetLast`, `TransferExtendedTexts → PurchCheckIfAnyExtText`) - [Table 560 "VAT Clause"](../table/560.md) (2 calls: `GetDescriptionByExtendedText → GetTempExtTextLine`, `GetDescriptionByExtendedText → ReadExtTextLines`) - [Codeunit 442 "Sales-Post Prepayments"](../codeunit/442.md) (1 call: `InsertExtendedText → PrepmtGetAnyExtText`) - [Codeunit 444 "Purchase-Post Prepayments"](../codeunit/444.md) (1 call: `InsertExtendedText → PrepmtGetAnyExtText`) ## Across versions - Present in: BC23-30 - Changed (declaration) in: BC24-28 Source: AL metadata extracted from the code (names, ids, signatures, properties); no code bodies (D10). ## Ask your agent Procedure bodies are not stored here (D10). The call sections above are our own, per object, from the BC29 call graph. For a procedure body or the calls of one procedure, ask bc-code-atlas (external, by Stefan Maron, MIT; default corpus w1-28), which the bc-observatory plugin connects: `bcatlas_resolve_node(object_type: "codeunit", object_name: "Transfer Extended Text")`, then `bcatlas_get_procedure_body` or `bcatlas_get_neighbors` on the returned id.