Invoice Two Shipments at Once

Invoice Two Shipments at Once

Your warehouse ships goods the moment they are ready, but finance wants one invoice per customer — not one invoice per truck. Business Central covers this with the Get Shipment Lines flow: orders are posted ship-only, and later the uninvoiced shipment lines are pulled together into a single sales invoice. Your job is to drive that flow from code.

Requirements

Create a codeunit named "Shipment Invoicer" with exactly this procedure:

procedure CreateInvoiceFromShipments(CustomerNo: Code[20]): Code[20]

The procedure must:

1. Create exactly one new sales invoice document — a Sales Header with "Document Type" = Invoice — for the given customer. Leave "No." blank and insert the record with its insert trigger running, so the standard sales invoice number series assigns the number; then validate "Sell-to Customer No." with the given customer.
2. Pull every posted sales shipment line of that customer that still has a quantity left to invoice into that one invoice, using codeunit 64 "Sales-Get Shipment": hand it your invoice header via SetSalesHeader, then pass the shipment lines to CreateInvLines.