diff --git a/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/Analytics/3.Transactions/CreateExtendedPurchDocument.Codeunit.al b/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/Analytics/3.Transactions/CreateExtendedPurchDocument.Codeunit.al index 4c8411eefc..c2a300cc01 100644 --- a/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/Analytics/3.Transactions/CreateExtendedPurchDocument.Codeunit.al +++ b/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/Analytics/3.Transactions/CreateExtendedPurchDocument.Codeunit.al @@ -6,6 +6,7 @@ namespace Microsoft.DemoData.Analytics; using Microsoft.DemoData.Bank; +using Microsoft.DemoData.CRM; using Microsoft.DemoData.Foundation; using Microsoft.DemoData.Inventory; using Microsoft.DemoData.Purchases; @@ -27,6 +28,8 @@ codeunit 5688 "Create Extended Purch Document" CreateItem: Codeunit "Create Item"; CreatePaymentMethod: Codeunit "Create Payment Method"; CreatePaymentTerms: Codeunit "Create Payment Terms"; + CreateReturnReason: Codeunit "Create Return Reason"; + CreatePurchaser: Codeunit "Create Salesperson/Purchaser"; CreateVendor: Codeunit "Create Vendor"; DocumentDate: Date; StartingDate: Date; @@ -36,50 +39,110 @@ codeunit 5688 "Create Extended Purch Document" DocumentDate := CalcDate('<-6M>', StartingDate); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCM(), '', '', '', DocumentDate, CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCM(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 60, '', 219.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.DomesticNodPublisher(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.DomesticNodPublisher(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 30, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensMobilePedestal(), 25, '', 219.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.DomesticFirstUp(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.DomesticFirstUp(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.LondonSwivelChairBlue(), 23, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.DomesticWorldImporter(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.DomesticWorldImporter(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AntwerpConferenceTable(), 50, '', 328); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AmsterdamLamp(), 15, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 5, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.DomesticFirstUp(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCM(), '', '', '', DocumentDate, CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.DomesticFirstUp(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCM(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.RomeGuestChairGreen(), 39, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.DomesticWorldImporter(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.DomesticWorldImporter(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.TokyoGuestChairBlue(), 40, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.DomesticFirstUp(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.DomesticFirstUp(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 30, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MunichSwivelChairYellow(), 30, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.DomesticNodPublisher(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.DomesticNodPublisher(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MoscowSwivelChairRed(), 40, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.DomesticFirstUp(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.DomesticFirstUp(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SeoulGuestChairRed(), 40, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 20, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Order, CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 10, '', 96.1); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Credit Memo", CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 60, '', 219.5, CreateReturnReason.Damaged()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Credit Memo", CreateVendor.DomesticNodPublisher(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 30, '', 97.5, CreateReturnReason.Damaged()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Credit Memo", CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 25, '', 219.5, CreateReturnReason.Damaged()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Credit Memo", CreateVendor.DomesticFirstUp(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 23, '', 96.1, CreateReturnReason.WrongItem()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Credit Memo", CreateVendor.DomesticWorldImporter(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 50, '', 328, CreateReturnReason.Damaged()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Credit Memo", CreateVendor.ExportFabrikam(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 15, '', 96.5, CreateReturnReason.WrongSize()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Credit Memo", CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 15, '', 27.8, CreateReturnReason.WrongColor()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Credit Memo", CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 5, '', 27.8, CreateReturnReason.WrongSize()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Credit Memo", CreateVendor.DomesticFirstUp(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 39, '', 97.5, CreateReturnReason.Damaged()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Credit Memo", CreateVendor.DomesticWorldImporter(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 40, '', 97.5, CreateReturnReason.Damaged()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Return Order", CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 60, '', 219.5, CreateReturnReason.Damaged()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Return Order", CreateVendor.DomesticNodPublisher(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 30, '', 97.5, CreateReturnReason.Damaged()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Return Order", CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 25, '', 219.5, CreateReturnReason.Damaged()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Return Order", CreateVendor.DomesticFirstUp(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 23, '', 96.1, CreateReturnReason.WrongItem()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Return Order", CreateVendor.DomesticWorldImporter(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 50, '', 328, CreateReturnReason.Damaged()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Return Order", CreateVendor.ExportFabrikam(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 15, '', 96.5, CreateReturnReason.WrongSize()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Return Order", CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 15, '', 27.8, CreateReturnReason.WrongColor()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Return Order", CreateVendor.EUGraphicDesign(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 5, '', 27.8, CreateReturnReason.WrongSize()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Return Order", CreateVendor.DomesticFirstUp(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 39, '', 97.5, CreateReturnReason.Damaged()); + + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::"Return Order", CreateVendor.DomesticWorldImporter(), AnalyticsReference(), ContosoUtilities.AdjustDate(19020101D), DocumentDate, ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', DocumentDate, CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); + ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 40, '', 97.5, CreateReturnReason.Damaged()); end; procedure AnalyticsReference(): Code[35] diff --git a/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/CRM/2.Master Data/CreateSalespersonPurchaser.Codeunit.al b/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/CRM/2.Master Data/CreateSalespersonPurchaser.Codeunit.al index d659edead6..5b2f86b3d7 100644 --- a/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/CRM/2.Master Data/CreateSalespersonPurchaser.Codeunit.al +++ b/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/CRM/2.Master Data/CreateSalespersonPurchaser.Codeunit.al @@ -17,13 +17,13 @@ codeunit 5416 "Create Salesperson/Purchaser" ContosoCRM: Codeunit "Contoso CRM"; ContosoUtilities: Codeunit "Contoso Utilities"; begin - ContosoCRM.InsertSalespersonPurchaser(BenjaminChiu(), BenjaminChiuLbl, 0, ContosoUtilities.EmptyPicture(), 'BC@contoso.com'); + ContosoCRM.InsertSalespersonPurchaser(BenjaminChiu(), BenjaminChiuLbl, 3, ContosoUtilities.EmptyPicture(), 'BC@contoso.com'); ContosoCRM.InsertSalespersonPurchaser(EsterHenderson(), EsterHendersonLbl, 0, ContosoUtilities.EmptyPicture(), 'EH@contoso.com'); ContosoCRM.InsertSalespersonPurchaser(HelenaRay(), HelenaRayLbl, 0, ContosoUtilities.EmptyPicture(), 'HR@contoso.com'); ContosoCRM.InsertSalespersonPurchaser(JimOlive(), JimOliveLbl, 5, ContosoUtilities.EmptyPicture(), 'JO@contoso.com'); ContosoCRM.InsertSalespersonPurchaser(LinaTownsend(), LinaTownsendLbl, 5, ContosoUtilities.EmptyPicture(), 'LT@contoso.com'); ContosoCRM.InsertSalespersonPurchaser(OtisFalls(), OtisFallsLbl, 5, ContosoUtilities.EmptyPicture(), 'OF@contoso.com'); - ContosoCRM.InsertSalespersonPurchaser(RobinBettencourt(), RobinBettencourtLbl, 0, ContosoUtilities.EmptyPicture(), 'RB@contoso.com'); + ContosoCRM.InsertSalespersonPurchaser(RobinBettencourt(), RobinBettencourtLbl, 2, ContosoUtilities.EmptyPicture(), 'RB@contoso.com'); end; procedure BenjaminChiu(): Code[20] diff --git a/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/Purchases/1.Setup Data/CreateReturnReason.Codeunit.al b/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/Purchases/1.Setup Data/CreateReturnReason.Codeunit.al new file mode 100644 index 0000000000..5daf859a64 --- /dev/null +++ b/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/Purchases/1.Setup Data/CreateReturnReason.Codeunit.al @@ -0,0 +1,54 @@ +// ------------------------------------------------------------------------------------------------ +// Copyright (c) Microsoft Corporation. All rights reserved. +// Licensed under the MIT License. See License.txt in the project root for license information. +// ------------------------------------------------------------------------------------------------ + +namespace Microsoft.DemoData.Purchases; + +using Microsoft.DemoTool.Helpers; + +codeunit 5622 "Create Return Reason" +{ + InherentEntitlements = X; + InherentPermissions = X; + + trigger OnRun() + var + ContosoPurchase: Codeunit "Contoso Purchase"; + begin + ContosoPurchase.InsertReturnReason(Damaged(), DamageDescriptionLbl); + ContosoPurchase.InsertReturnReason(WrongItem(), WrongItemDescriptionLbl); + ContosoPurchase.InsertReturnReason(WrongSize(), WrongSizeDescriptionLbl); + ContosoPurchase.InsertReturnReason(WrongColor(), WrongColorDescriptionLbl); + end; + + procedure Damaged(): Code[10] + begin + exit(DamagedTok); + end; + + procedure WrongItem(): Code[10] + begin + exit(ItemTok); + end; + + procedure WrongSize(): Code[10] + begin + exit(SizeTok); + end; + + procedure WrongColor(): Code[10] + begin + exit(ColorTok); + end; + + var + ColorTok: Label 'COLOR', MaxLength = 10; + DamageDescriptionLbl: Label 'Damaged or defective', MaxLength = 50; + DamagedTok: Label 'DAMAGED', MaxLength = 10; + ItemTok: Label 'ITEM', MaxLength = 10; + SizeTok: Label 'SIZE', MaxLength = 10; + WrongColorDescriptionLbl: Label 'Wrong color', MaxLength = 50; + WrongItemDescriptionLbl: Label 'Wrong item', MaxLength = 50; + WrongSizeDescriptionLbl: Label 'Wrong size', MaxLength = 50; +} diff --git a/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/Purchases/3.Transactions/CreatePurchaseDocument.Codeunit.al b/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/Purchases/3.Transactions/CreatePurchaseDocument.Codeunit.al index 06ffd502ba..41ee811b4c 100644 --- a/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/Purchases/3.Transactions/CreatePurchaseDocument.Codeunit.al +++ b/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/Purchases/3.Transactions/CreatePurchaseDocument.Codeunit.al @@ -6,6 +6,7 @@ namespace Microsoft.DemoData.Purchases; using Microsoft.DemoData.Bank; +using Microsoft.DemoData.CRM; using Microsoft.DemoData.Finance; using Microsoft.DemoData.Foundation; using Microsoft.DemoData.Inventory; @@ -27,430 +28,430 @@ codeunit 5420 "Create Purchase Document" CreateItem: Codeunit "Create Item"; CreatePaymentMethod: Codeunit "Create Payment Method"; CreateLocation: Codeunit "Create Location"; + CreatePurchaser: Codeunit "Create Salesperson/Purchaser"; begin CreatePurchaseOrders(); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 4, '', 506.6); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensMobilePedestal(), 5, '', 219.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.LondonSwivelChairBlue(), 3, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AmsterdamLamp(), 8, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 10, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.RomeGuestChairGreen(), 2, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.TokyoGuestChairBlue(), 4, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 10, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), CreateLocation.MainLocation(), '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), CreateLocation.MainLocation(), '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 2, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), CreateLocation.EastLocation(), '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), CreateLocation.EastLocation(), '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 3, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), CreateLocation.WestLocation(), '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), CreateLocation.WestLocation(), '', '', ContosoUtilities.AdjustDate(19020101D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 5, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021101D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021101D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021101D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 5, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020901D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020901D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020901D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020901D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AntwerpConferenceTable(), 10, '', 328); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021201D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021201D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021201D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021201D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 90, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021201D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021201D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021201D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021201D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 28, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021201D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021201D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021201D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021201D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 5, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020108D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020108D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020108D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020108D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.LondonSwivelChairBlue(), 5, '', 96.1); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SeoulGuestChairRed(), 5, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020108D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020108D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020108D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020108D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AntwerpConferenceTable(), 5, '', 328); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020109D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020109D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020109D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020109D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MunichSwivelChairYellow(), 7, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020110D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020110D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020110D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020110D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 6, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020111D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020111D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020111D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020111D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 8, '', 97.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MoscowSwivelChairRed(), 4, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020111D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020111D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020111D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020111D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 8, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020112D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020112D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020112D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020112D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 9, '', 506.6); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020113D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020113D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020113D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020113D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.RomeGuestChairGreen(), 7, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020114D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020114D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020114D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020114D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AmsterdamLamp(), 10, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020114D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020114D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020114D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020114D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 7, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020115D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020115D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020115D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020115D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.TokyoGuestChairBlue(), 5, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020115D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020115D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020115D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020115D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 5, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020116D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020116D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020116D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020116D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensMobilePedestal(), 6, '', 219.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020208D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020208D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020208D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020208D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.LondonSwivelChairBlue(), 5, '', 96.1); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SeoulGuestChairRed(), 5, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020208D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020208D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020208D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020208D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AntwerpConferenceTable(), 4, '', 328); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020209D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020209D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020209D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020209D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MunichSwivelChairYellow(), 7, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020210D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020210D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020210D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020210D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 10, '', 97.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MoscowSwivelChairRed(), 4, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020210D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020210D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020210D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020210D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 9, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020210D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020210D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020210D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020210D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 6, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020212D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020212D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020212D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020212D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 13, '', 506.6); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020212D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020212D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020212D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020212D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.RomeGuestChairGreen(), 7, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020213D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020213D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020213D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020213D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AmsterdamLamp(), 11, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020213D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020213D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020213D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020213D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 6, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020214D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020214D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020214D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020214D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.TokyoGuestChairBlue(), 5, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020214D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020214D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020214D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020214D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 5, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020215D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020215D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020215D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020215D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensMobilePedestal(), 8, '', 219.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020308D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020308D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020308D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020308D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.LondonSwivelChairBlue(), 6, '', 96.1); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SeoulGuestChairRed(), 6, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020308D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020308D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020308D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020308D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AntwerpConferenceTable(), 7, '', 328); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020309D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020309D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020309D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020309D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MunichSwivelChairYellow(), 9, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020310D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020310D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020310D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020310D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 8, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020311D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020311D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020311D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020311D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 11, '', 97.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MoscowSwivelChairRed(), 6, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020311D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020311D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020311D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020311D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 10, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020312D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020312D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020312D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020312D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 15, '', 506.6); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020313D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020313D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020313D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020313D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.RomeGuestChairGreen(), 9, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020314D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020314D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020314D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020314D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AmsterdamLamp(), 13, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020314D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020314D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020314D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020314D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 10, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020315D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020315D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020315D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020315D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.TokyoGuestChairBlue(), 6, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020315D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020315D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020315D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020315D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 7, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020316D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020316D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020316D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020316D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensMobilePedestal(), 9, '', 219.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020408D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020408D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020408D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020408D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.LondonSwivelChairBlue(), 6, '', 96.1); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SeoulGuestChairRed(), 5, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020408D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020408D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020408D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020408D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AntwerpConferenceTable(), 6, '', 328); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020409D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020409D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020409D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020409D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MunichSwivelChairYellow(), 10, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020410D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020410D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020410D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020410D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 11, '', 97.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MoscowSwivelChairRed(), 5, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020410D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020410D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020410D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020410D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 9, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020411D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020411D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020411D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020411D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 11, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020412D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020412D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020412D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020412D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 18, '', 506.6); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020413D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020413D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020413D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020413D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AmsterdamLamp(), 13, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020413D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020413D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020413D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020413D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.RomeGuestChairGreen(), 9, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020413D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020413D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020413D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020413D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 10, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020414D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020414D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020414D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020414D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.TokyoGuestChairBlue(), 6, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020415D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020415D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020415D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020415D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensMobilePedestal(), 9, '', 219.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 8, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020508D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020508D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020508D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020508D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.LondonSwivelChairBlue(), 5, '', 96.1); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SeoulGuestChairRed(), 6, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020508D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020508D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020508D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020508D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AntwerpConferenceTable(), 7, '', 328); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020509D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020509D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020509D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020509D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MunichSwivelChairYellow(), 9, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020510D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020510D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020510D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020510D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 8, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020511D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020511D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020511D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020511D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 7, '', 97.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MoscowSwivelChairRed(), 5, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020511D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020511D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020511D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020511D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 9, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020512D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020512D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020512D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020512D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 14, '', 506.6); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020513D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020513D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020513D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020513D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.RomeGuestChairGreen(), 8, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020514D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020514D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020514D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020514D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AmsterdamLamp(), 11, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020514D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020514D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020514D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020514D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 9, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020515D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020515D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020515D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020515D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.TokyoGuestChairBlue(), 5, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020515D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020515D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020515D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020515D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 7, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020516D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020516D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020516D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020516D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensMobilePedestal(), 6, '', 219.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020608D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020608D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020608D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020608D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.LondonSwivelChairBlue(), 5, '', 96.1); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SeoulGuestChairRed(), 6, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020608D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020608D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020608D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020608D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AntwerpConferenceTable(), 5, '', 328); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020609D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020609D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020609D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020609D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MunichSwivelChairYellow(), 10, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020610D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020610D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020610D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020610D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 7, '', 97.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MoscowSwivelChairRed(), 5, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020610D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020610D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020610D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020610D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 8, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020611D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020611D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020611D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020611D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 10, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020612D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020612D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020612D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020612D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 15, '', 506.6); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020613D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020613D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020613D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020613D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AmsterdamLamp(), 13, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020613D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020613D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020613D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020613D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.RomeGuestChairGreen(), 8, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020613D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020613D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020613D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020613D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 9, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020614D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020614D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020614D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020614D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.TokyoGuestChairBlue(), 5, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020615D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020615D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020615D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020615D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensMobilePedestal(), 5, '', 219.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 7, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020708D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020708D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020708D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020708D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.LondonSwivelChairBlue(), 4, '', 96.1); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SeoulGuestChairRed(), 3, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020708D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020708D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020708D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020708D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AntwerpConferenceTable(), 5, '', 328); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020709D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020709D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020709D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020709D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MunichSwivelChairYellow(), 6, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020710D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020710D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020710D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020710D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 7, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020711D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020711D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020711D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020711D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 8, '', 97.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MoscowSwivelChairRed(), 4, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020711D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020711D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020711D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020711D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 8, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020712D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020712D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020712D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020712D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 10, '', 506.6); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020713D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020713D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020713D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020713D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.RomeGuestChairGreen(), 7, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020714D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020714D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020714D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020714D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AmsterdamLamp(), 11, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020714D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020714D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020714D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020714D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 7, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020715D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020715D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020715D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020715D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.TokyoGuestChairBlue(), 4, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020715D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020715D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020715D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020715D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 5, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020716D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020716D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020716D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020716D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensMobilePedestal(), 7, '', 219.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020808D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020808D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020808D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020808D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.LondonSwivelChairBlue(), 6, '', 96.1); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SeoulGuestChairRed(), 4, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020808D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020808D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020808D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020808D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AntwerpConferenceTable(), 6, '', 328); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020809D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020809D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020809D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020809D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MunichSwivelChairYellow(), 6, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020810D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020810D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020810D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020810D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 8, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020811D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020811D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020811D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020811D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 8, '', 97.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MoscowSwivelChairRed(), 4, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020811D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020811D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020811D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020811D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 9, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020812D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020812D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020812D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020812D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 11, '', 506.6); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020813D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020813D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020813D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020813D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.RomeGuestChairGreen(), 7, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020814D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020814D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020814D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020814D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AmsterdamLamp(), 10, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020814D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020814D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020814D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020814D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 9, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020815D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020815D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020815D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020815D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.TokyoGuestChairBlue(), 6, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020815D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020815D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020815D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020815D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 7, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020816D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020816D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020816D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020816D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensMobilePedestal(), 7, '', 219.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020908D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020908D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020908D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020908D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.LondonSwivelChairBlue(), 4, '', 96.1); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SeoulGuestChairRed(), 4, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020908D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020908D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020908D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020908D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AntwerpConferenceTable(), 4, '', 328); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020909D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020909D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020909D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020909D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MunichSwivelChairYellow(), 5, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020910D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020910D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020910D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020910D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 4, '', 97.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MoscowSwivelChairRed(), 3, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020910D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020910D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020910D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020910D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 5, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020911D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020911D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020911D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020911D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 7, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020912D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020912D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020912D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020912D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 9, '', 506.6); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020913D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020913D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020913D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020913D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AmsterdamLamp(), 9, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020913D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020913D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020913D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020913D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.RomeGuestChairGreen(), 5, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020913D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020913D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020913D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020913D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 7, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020914D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020914D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020914D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020914D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.TokyoGuestChairBlue(), 4, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020915D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020915D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19020915D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19020915D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensMobilePedestal(), 3, '', 219.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 5, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021008D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021008D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021008D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021008D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.LondonSwivelChairBlue(), 4, '', 96.1); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SeoulGuestChairRed(), 5, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021008D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021008D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021008D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021008D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AntwerpConferenceTable(), 4, '', 328); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021009D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021009D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021009D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021009D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MunichSwivelChairYellow(), 7, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021010D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021010D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021010D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021010D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 9, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021011D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021011D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021011D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021011D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 6, '', 97.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MoscowSwivelChairRed(), 3, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021011D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021011D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021011D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021011D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 9, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021012D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021012D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021012D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021012D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 9, '', 506.6); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021013D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021013D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021013D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021013D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.RomeGuestChairGreen(), 6, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021014D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021014D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021014D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021014D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AmsterdamLamp(), 10, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021014D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021014D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021014D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021014D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 7, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021015D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021015D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021015D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021015D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.TokyoGuestChairBlue(), 4, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021015D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021015D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021015D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021015D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 6, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021016D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021016D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021016D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021016D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensMobilePedestal(), 10, '', 219.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021108D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021108D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021108D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021108D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.LondonSwivelChairBlue(), 4, '', 96.1); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SeoulGuestChairRed(), 5, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021108D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021108D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021108D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021108D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AntwerpConferenceTable(), 4, '', 328); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021109D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021109D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021109D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021109D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MunichSwivelChairYellow(), 5, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021110D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021110D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021110D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021110D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 7, '', 97.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MoscowSwivelChairRed(), 3, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021110D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021110D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021110D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021110D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 6, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021111D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021111D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021111D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021111D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 7, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021112D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021112D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021112D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021112D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 8, '', 506.6); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021113D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021113D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021113D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021113D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AmsterdamLamp(), 9, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021113D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021113D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021113D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021113D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.RomeGuestChairGreen(), 6, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021113D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021113D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021113D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021113D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 6, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021114D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021114D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021114D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021114D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.TokyoGuestChairBlue(), 4, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021115D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021115D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021115D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021115D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensMobilePedestal(), 6, '', 219.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 5, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021208D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021208D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021208D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021208D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.LondonSwivelChairBlue(), 3, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021208D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021208D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021208D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021208D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AntwerpConferenceTable(), 2, '', 328); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021209D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021209D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021209D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021209D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MunichSwivelChairYellow(), 3, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021209D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021209D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021209D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021209D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SeoulGuestChairRed(), 3, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021210D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021210D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021210D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021210D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 4, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021211D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021211D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021211D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021211D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 3, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021211D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021211D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021211D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021211D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 5, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021212D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021212D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021212D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021212D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 6, '', 506.6); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MoscowSwivelChairRed(), 2, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021212D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021212D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021212D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021212D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 3, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021213D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021213D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021213D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021213D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.RomeGuestChairGreen(), 4, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021214D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021214D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021214D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021214D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AmsterdamLamp(), 6, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021214D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021214D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021214D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021214D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 4, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021215D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021215D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021215D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021215D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.TokyoGuestChairBlue(), 2, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021216D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021216D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19021216D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19021216D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensMobilePedestal(), 2, '', 219.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030108D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030108D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030108D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030108D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.LondonSwivelChairBlue(), 5, '', 96.1); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SeoulGuestChairRed(), 5, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030108D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030108D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030108D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030108D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AntwerpConferenceTable(), 6, '', 328); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030109D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030109D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030109D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030109D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MunichSwivelChairYellow(), 6, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030110D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030110D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030110D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030110D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 7, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030111D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030111D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030111D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030111D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 8, '', 97.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MoscowSwivelChairRed(), 4, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030111D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030111D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030111D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030111D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 9, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030112D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030112D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030112D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030112D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 10, '', 506.6); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030113D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030113D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030113D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030113D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.RomeGuestChairGreen(), 7, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030114D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030114D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030114D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030114D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AmsterdamLamp(), 11, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030114D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030114D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030114D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030114D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 7, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030115D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030115D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030115D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030115D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.TokyoGuestChairBlue(), 6, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030115D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030115D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030115D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030115D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 5, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030116D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030116D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030116D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030116D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensMobilePedestal(), 6, '', 219.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030208D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030208D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030208D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030208D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.LondonSwivelChairBlue(), 6, '', 96.1); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SeoulGuestChairRed(), 6, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030208D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030208D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030208D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030208D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AntwerpConferenceTable(), 6, '', 328); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030209D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030209D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030209D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030209D), CreatePaymentMethod.Cash(), CreatePurchaser.RobinBettencourt()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MunichSwivelChairYellow(), 7, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030210D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030210D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030210D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030210D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.ParisGuestChairBlack(), 12, '', 97.5); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MoscowSwivelChairRed(), 4, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030210D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030210D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.ExportFabrikam(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030210D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030210D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.BerlingGuestChairYellow(), 11, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030210D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030210D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030210D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030210D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.MexicoSwivelChairBlack(), 6, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030212D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030212D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticNodPublisher(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030212D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030212D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensDesk(), 15, '', 506.6); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030212D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030212D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticFirstUp(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030212D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030212D), CreatePaymentMethod.Cash(), CreatePurchaser.LinaTownsend()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.RomeGuestChairGreen(), 8, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030213D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030213D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030213D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030213D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AmsterdamLamp(), 13, '', 27.8); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030213D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030213D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030213D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030213D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AtlantAWhiteboardBase(), 10, '', 707.2); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030214D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030214D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.DomesticWorldImporter(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030214D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030214D), CreatePaymentMethod.Cash(), CreatePurchaser.JimOlive()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.TokyoGuestChairBlue(), 5, '', 97.5); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030214D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030214D), CreatePaymentMethod.Cash()); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030214D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030214D), CreatePaymentMethod.Cash(), CreatePurchaser.BenjaminChiu()); ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.SydneySwivelChairGreen(), 7, '', 96.1); - PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030215D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030215D), CreatePaymentMethod.Cash()); - ContosoPurchase.InsertPurchaseLineWithItem(PurchaseHeader, CreateItem.AthensMobilePedestal(), 10, '', 219.5); + PurchaseHeader := ContosoPurchase.InsertPurchaseHeader(Enum::"Purchase Document Type"::Invoice, CreateVendor.EUGraphicDesign(), '', ContosoUtilities.AdjustDate(19020101D), ContosoUtilities.AdjustDate(19030215D), ContosoUtilities.AdjustDate(19020101D), CreatePaymentTerms.PaymentTermsCOD(), '', '', '', ContosoUtilities.AdjustDate(19030215D), CreatePaymentMethod.Cash(), CreatePurchaser.OtisFalls()); CreatePurchaseInvoicesForReconciliation(); diff --git a/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/Purchases/PurchaseModule.Codeunit.al b/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/Purchases/PurchaseModule.Codeunit.al index abfeaad81a..e52d639451 100644 --- a/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/Purchases/PurchaseModule.Codeunit.al +++ b/Apps/W1/ContosoCoffeeDemoDataset/app/DemoData/Purchases/PurchaseModule.Codeunit.al @@ -32,6 +32,7 @@ codeunit 5394 "Purchase Module" implements "Contoso Demo Data Module" begin Codeunit.Run(codeunit::"Create Purchase Payable Setup"); Codeunit.Run(codeunit::"Create Vendor Posting Group"); + Codeunit.Run(Codeunit::"Create Return Reason"); end; procedure CreateMasterData() diff --git a/Apps/W1/ContosoCoffeeDemoDataset/app/DemoTool/Contoso Helpers/ContosoPurchase.Codeunit.al b/Apps/W1/ContosoCoffeeDemoDataset/app/DemoTool/Contoso Helpers/ContosoPurchase.Codeunit.al index f5fc4e8902..6dff991ade 100644 --- a/Apps/W1/ContosoCoffeeDemoDataset/app/DemoTool/Contoso Helpers/ContosoPurchase.Codeunit.al +++ b/Apps/W1/ContosoCoffeeDemoDataset/app/DemoTool/Contoso Helpers/ContosoPurchase.Codeunit.al @@ -4,6 +4,7 @@ // ------------------------------------------------------------------------------------------------ namespace Microsoft.DemoTool.Helpers; +using Microsoft.Foundation.AuditCodes; using Microsoft.Inventory.Item; using Microsoft.Pricing.Calculation; using Microsoft.Projects.Resources.Resource; @@ -22,15 +23,20 @@ codeunit 4781 "Contoso Purchase" procedure InsertPurchaseHeader(DocumentType: Enum "Purchase Document Type"; VendorNo: Code[20]; VendorOrderNo: Code[20]; PostingDate: Date; LocationCode: Code[20]): Record "Purchase Header" begin - exit(InsertPurchaseHeader(DocumentType, VendorNo, '', PostingDate, PostingDate, 0D, '', CopyStr(LocationCode, 1, 10), VendorOrderNo, '', PostingDate, '')); + exit(InsertPurchaseHeader(DocumentType, VendorNo, '', PostingDate, PostingDate, 0D, '', CopyStr(LocationCode, 1, 10), VendorOrderNo, '', PostingDate, '', '')); end; procedure 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" begin - exit(InsertPurchaseHeader(DocumentType, VendorNo, YourReference, PostingDate, PostingDate, 0D, PaymentTermsCode, CopyStr(LocationCode, 1, 10), VendorOrderNo, VendorInvoiceNo, PostingDate, PaymentMethodCode)); + exit(InsertPurchaseHeader(DocumentType, VendorNo, YourReference, PostingDate, PostingDate, 0D, PaymentTermsCode, CopyStr(LocationCode, 1, 10), VendorOrderNo, VendorInvoiceNo, PostingDate, PaymentMethodCode, '')); end; procedure 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"; + begin + exit(InsertPurchaseHeader(DocumentType, BuyfromVendorNo, YourReference, PostingDate, PostingDate, 0D, PaymentTermsCode, CopyStr(LocationCode, 1, 10), VendorOrderNo, VendorInvoiceNo, PostingDate, PaymentMethodCode, '')); + end; + + procedure 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"; var PurchaseHeader: Record "Purchase Header"; begin @@ -49,6 +55,9 @@ codeunit 4781 "Contoso Purchase" PurchaseHeader.Validate("Vendor Order No.", VendorOrderNo); + if PurchaserCode <> '' then + PurchaseHeader.Validate("Purchaser Code", PurchaserCode); + if VendorInvoiceNo <> '' then PurchaseHeader.Validate("Vendor Invoice No.", VendorInvoiceNo) else @@ -63,15 +72,25 @@ codeunit 4781 "Contoso Purchase" procedure InsertPurchaseLineWithItem(PurchaseHeader: Record "Purchase Header"; ItemNo: Code[20]; Quantity: Decimal) begin - InsertPurchaseLineWithItem(PurchaseHeader, ItemNo, Quantity, '', 0); + InsertPurchaseLineWithItem(PurchaseHeader, ItemNo, Quantity, '', 0, ''); end; procedure InsertPurchaseLineWithItem(PurchaseHeader: Record "Purchase Header"; ItemNo: Code[20]; Quantity: Decimal; UnitOfMeasureCode: Code[10]; UnitCost: Decimal) begin - InsertPurchaseLineWithItem(PurchaseHeader, ItemNo, Quantity, UnitOfMeasureCode, UnitCost, 0); + InsertPurchaseLineWithItem(PurchaseHeader, ItemNo, Quantity, UnitOfMeasureCode, UnitCost, 0, ''); + end; + + procedure InsertPurchaseLineWithItem(PurchaseHeader: Record "Purchase Header"; ItemNo: Code[20]; Quantity: Decimal; UnitOfMeasureCode: Code[10]; UnitCost: Decimal; ReturnReasonCode: Code[10]) + begin + InsertPurchaseLineWithItem(PurchaseHeader, ItemNo, Quantity, UnitOfMeasureCode, UnitCost, 0, ReturnReasonCode); end; procedure InsertPurchaseLineWithItem(PurchaseHeader: Record "Purchase Header"; ItemNo: Code[20]; Quantity: Decimal; UnitOfMeasureCode: Code[10]; UnitCost: Decimal; LineDiscount: Decimal) + begin + InsertPurchaseLineWithItem(PurchaseHeader, ItemNo, Quantity, UnitOfMeasureCode, UnitCost, LineDiscount, ''); + end; + + procedure InsertPurchaseLineWithItem(PurchaseHeader: Record "Purchase Header"; ItemNo: Code[20]; Quantity: Decimal; UnitOfMeasureCode: Code[10]; UnitCost: Decimal; LineDiscount: Decimal; ReturnReasonCode: Code[10]) var Item: Record Item; PurchaseLine: Record "Purchase Line"; @@ -95,6 +114,8 @@ codeunit 4781 "Contoso Purchase" PurchaseLine.Validate(Quantity, Quantity); PurchaseLine.Validate("Line Discount %", LineDiscount); + if ReturnReasonCode <> '' then + PurchaseLine.Validate("Return Reason Code", ReturnReasonCode); PurchaseLine.Insert(true); end; @@ -122,8 +143,8 @@ codeunit 4781 "Contoso Purchase" procedure InsertPurchaseLineWithResource(PurchaseHeader: Record "Purchase Header"; ResourceNo: Code[20]; Quantity: Decimal) var - Resource: Record Resource; PurchaseLine: Record "Purchase Line"; + Resource: Record Resource; begin PurchaseLine.Validate("Document Type", PurchaseHeader."Document Type"); PurchaseLine.Validate("Document No.", PurchaseHeader."No."); @@ -191,4 +212,14 @@ codeunit 4781 "Contoso Purchase" PurchasesPayablesSetup.Validate("Price List Nos.", PriceListNos); PurchasesPayablesSetup.Modify(true); end; + + procedure InsertReturnReason(ReturnReasonCode: Code[10]; ReturnReasonDescription: Text[50]) + var + ReturnReason: Record "Return Reason"; + begin + ReturnReason.Init(); + ReturnReason.Validate(Code, ReturnReasonCode); + ReturnReason.Validate(Description, ReturnReasonDescription); + ReturnReason.Insert(true); + end; }