---
id: object/codeunit/4781
type: object
title: Codeunit 4781 "Contoso Purchase"
summary: Codeunit 4781 "Contoso Purchase" in ContosoCoffeeDemoDataset (Microsoft.DemoTool.Helpers). 14 public procedures. Introduced in BC29, still in BC30.
tier: official
language: en
tags:
  - codeunit
  - contosocoffeedemodataset
versions:
  introduced: "29"
  last_changed: null
  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: afe21a013568c973512459101bf4129aa0984accf5679f68a697397ef461c485
evidence:
  - kind: code
    url: https://github.com/microsoft/BCApps/blob/ea08af5ef2d6a9b5c5af4a029288abbe2c883220/src/Apps/W1/ContosoCoffeeDemoDataset/app/DemoTool/Contoso%20Helpers/ContosoPurchase.Codeunit.al
    title: src/Apps/W1/ContosoCoffeeDemoDataset/app/DemoTool/Contoso Helpers/ContosoPurchase.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: 4781
name: Contoso Purchase
namespace: Microsoft.DemoTool.Helpers
app: ContosoCoffeeDemoDataset
extends: null
first_version: "29"
last_version: "30"
present_in:
  - "29"
  - "30"
changed_in: []
source_major: "29"
obsolete: null
countries: []
ms_search_form_ids: []
counts:
  fields: 0
  procedures: 15
  events: 0
  subscribers: 0
relations:
  out: 0
  referenced_by: 0
  pages: 0
  extended_by: 0
  event_subscribers: 0
  calls: 0
  called_by: 6
  implements: 0
---

# Codeunit 4781 "Contoso Purchase"

> Codeunit 4781 "Contoso Purchase" in ContosoCoffeeDemoDataset (Microsoft.DemoTool.Helpers). 14 public procedures. Introduced in BC29, still in BC30.

ContosoCoffeeDemoDataset · Microsoft.DemoTool.Helpers · BC29-30 · [source at ea08af5e](https://github.com/microsoft/BCApps/blob/ea08af5ef2d6a9b5c5af4a029288abbe2c883220/src/Apps/W1/ContosoCoffeeDemoDataset/app/DemoTool/Contoso%20Helpers/ContosoPurchase.Codeunit.al) · facts from BC29

## Properties

| Property | Value |
|---|---|
| Permissions | tabledata "Purchase Header" = rim, tabledata "Purchase Line" = rim, tabledata "Item" = r, tabledata "Purchases & Payables Setup" = rim |

## Procedures

- `InsertPurchaseHeader(DocumentType: Enum "Purchase Document Type"; VendorNo: Code[20]; VendorOrderNo: Code[20]; PostingDate: Date; LocationCode: Code[20]): Record "Purchase Header"`
- `InsertPurchaseHeader(DocumentType: Enum "Purchase Document Type"; VendorNo: Code[20]; YourReference: Code[35]; VendorOrderNo: Code[20]; PostingDate: Date; LocationCode: Code[10]; VendorInvoiceNo: Code[35]; PaymentTermsCode: Code[10]; PaymentMethodCode: Code[10]): Record "Purchase Header"`
- `InsertPurchaseHeader(DocumentType: Enum "Purchase Document Type"; BuyfromVendorNo: Code[20]; YourReference: Code[35]; OrderDate: Date; PostingDate: Date; ExpectedReceiptDate: Date; PaymentTermsCode: Code[10]; LocationCode: Code[10]; VendorOrderNo: Code[20]; VendorInvoiceNo: Code[35]; DocumentDate: Date; PaymentMethodCode: Code[10]): Record "Purchase Header"`
- `InsertPurchaseHeader(DocumentType: Enum "Purchase Document Type"; BuyfromVendorNo: Code[20]; YourReference: Code[35]; OrderDate: Date; PostingDate: Date; ExpectedReceiptDate: Date; PaymentTermsCode: Code[10]; LocationCode: Code[10]; VendorOrderNo: Code[20]; VendorInvoiceNo: Code[35]; DocumentDate: Date; PaymentMethodCode: Code[10]; PurchaserCode: Code[20]): Record "Purchase Header"`
- `InsertPurchaseHeader(DocumentType: Enum "Purchase Document Type"; BuyfromVendorNo: Code[20]; YourReference: Code[35]; OrderDate: Date; PostingDate: Date; ExpectedReceiptDate: Date; PaymentTermsCode: Code[10]; LocationCode: Code[10]; VendorOrderNo: Code[20]; VendorInvoiceNo: Code[35]; VendorCrMemoNo: Code[35]; DocumentDate: Date; PaymentMethodCode: Code[10]; PurchaserCode: Code[20]): Record "Purchase Header"`
- `InsertPurchaseLineWithItem(PurchaseHeader: Record "Purchase Header"; ItemNo: Code[20]; Quantity: Decimal)`
- `InsertPurchaseLineWithItem(PurchaseHeader: Record "Purchase Header"; ItemNo: Code[20]; Quantity: Decimal; UnitOfMeasureCode: Code[10]; UnitCost: Decimal)`
- `InsertPurchaseLineWithItem(PurchaseHeader: Record "Purchase Header"; ItemNo: Code[20]; Quantity: Decimal; UnitOfMeasureCode: Code[10]; UnitCost: Decimal; ReturnReasonCode: Code[10])`
- `InsertPurchaseLineWithItem(PurchaseHeader: Record "Purchase Header"; ItemNo: Code[20]; Quantity: Decimal; UnitOfMeasureCode: Code[10]; UnitCost: Decimal; LineDiscount: Decimal)`
- `InsertPurchaseLineWithItem(PurchaseHeader: Record "Purchase Header"; ItemNo: Code[20]; Quantity: Decimal; UnitOfMeasureCode: Code[10]; UnitCost: Decimal; LineDiscount: Decimal; ReturnReasonCode: Code[10])`
- `InsertPurchaseLineWithGL(PurchaseHeader: Record "Purchase Header"; GLAccNo: Code[20]; Quantity: Decimal; UnitOfMeasureCode: Code[10]; UnitCost: Decimal)`
- `InsertPurchaseLineWithResource(PurchaseHeader: Record "Purchase Header"; ResourceNo: Code[20]; Quantity: Decimal)`
- `InsertPurchasePayableSetup(DiscountPosting: Integer; ReceiptonInvoice: Boolean; InvoiceRounding: Boolean; ExtDocNoMandatory: Boolean; VendorNos: Code[20]; QuoteNos: Code[20]; OrderNos: Code[20]; InvoiceNos: Code[20]; PostedInvoiceNos: Code[20]; CreditMemoNos: Code[20]; PostedCreditMemoNos: Code[20]; PostedReceiptNos: Code[20]; BlanketOrderNos: Code[20]; ApplnbetweenCurrencies: Integer; CopyCommentsBlankettoOrder: Boolean; CopyCommentsOrdertoInvoice: Boolean; CopyCommentsOrdertoReceipt: Boolean; JobQueueCategoryCode: Code[10]; JobQueuePriorityforPost: Integer; JobQPrioforPostPrint: Integer; DocumentDefaultLineType: Enum "Purchase Line Type"; CopyVendorNametoEntries: Boolean; PostedReturnShptNos: Code[20]; CopyCmtsRetOrdtoRetShpt: Boolean; CopyCmtsRetOrdtoCrMemo: Boolean; ReturnOrderNos: Code[20]; PriceCalculationMethod: Enum "Price Calculation Method"; PriceListNos: Code[20])`
- `InsertReturnReason(ReturnReasonCode: Code[10]; ReturnReasonDescription: Text[50])`

Plus 1 local procedures.

## 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 5420 "Create Purchase Document"](../codeunit/5420.md) (9 calls: `CreateOpenedPurchaseInvoices → InsertPurchaseHeader`, `CreateOpenedPurchaseInvoices → InsertPurchaseLineWithItem`, `CreatePurchaseInvoicesForReconciliation → InsertPurchaseHeader`, …)
- [Codeunit 4796 "Create Whse Orders"](../codeunit/4796.md) (4 calls: `CreateOrdersScenarioSilver → InsertPurchaseHeader`, `CreateOrdersScenarioSilver → InsertPurchaseLineWithItem`, `CreateOrdersScenarioWhite → InsertPurchaseHeader`, …)
- [Codeunit 5259 "Create Sust. Purchase"](../codeunit/5259.md) (4 calls: `CreatePurchaseInvoiceWithGL → InsertPurchaseHeader`, `CreatePurchaseInvoiceWithGL → InsertPurchaseLineWithGL`, `CreatePurchaseInvoiceWithItem → InsertPurchaseHeader`, …)
- [Codeunit 5688 "Create Extended Purch Document"](../codeunit/5688.md) (2 calls: `OnRun → InsertPurchaseHeader`, `OnRun → InsertPurchaseLineWithItem`)
- [Codeunit 5272 "Create Purchase Payable Setup"](../codeunit/5272.md) (1 call: `OnRun → InsertPurchasePayableSetup`)
- [Codeunit 5622 "Create Return Reason"](../codeunit/5622.md) (1 call: `OnRun → InsertReturnReason`)

## Across versions

- Present in: BC29-30
- Changed (declaration) in: none

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: "Contoso Purchase")`, then `bcatlas_get_procedure_body` or `bcatlas_get_neighbors` on the returned id.