KVSGAEB Document Header#
Fields#
| Name | Type | Note |
|---|---|---|
| No. | Code[20] | |
| Document Type | Enum (KVSGAEB Document Type) | |
| Version No. | Code[20] | |
| Version Type | Enum (KVSGAEB Version Type) | |
| Placing No. Purch. | Code[15] | |
| DV No. Purch. | Code[8] | |
| Bidder No. Purch. | Code[3] | |
| Placing No. Cust. | Code[15] | |
| DV No. Cust. | Code[8] | |
| OZ Mask | Code[9] | |
| Regulation Year | Code[2] | |
| Lots | Boolean | |
| First Level | Integer | |
| Second Level | Integer | |
| Third Level | Integer | |
| Fourth Level | Integer | |
| Position | Integer | |
| Indexing | Boolean | |
| Description | Text[60] | |
| Offer Date | Date | |
| Offer Time | Time | |
| Acceptance Ending Date | Date | |
| Prices | Boolean | |
| Wage Change | Boolean | |
| Description Project | Text[60] | |
| Related Project No. | Code[20] | |
| Description Purchaser | Text[60] | |
| Description Bidder | Text[60] | |
| Amount Unit Price fraction | Integer | |
| Description Time fraction | Text[14] | |
| Description 1. UP fraction | Text[20] | |
| Description 2. UP fraction | Text[20] | |
| Description 3. UP fraction | Text[20] | |
| Description 4. UP fraction | Text[20] | |
| Cost Centre No. | Code[9] | |
| Description Locality | Text[30] | |
| Locality No | Text[12] | |
| Date | Date | |
| Work Section | Code[3] | |
| Currency Code | Code[10] | |
| Description Currency | Text[50] | |
| Sum | Decimal | |
| Amount Positions | Integer | |
| Surcharge/Discount in Currency | Decimal | |
| Turnover Tax (pct) | Decimal | |
| Offer Sum | Decimal | |
| Cashback (pct) | Decimal | |
| Terms of Payment (days) | Decimal | |
| Lump Sum | Decimal | |
| Surcharge/Discount (pct) | Decimal | |
| Bidding Date | Date | |
| Status | Enum (KVSGAEB Status) | |
| related Quote | Code[20] | |
| Sell-to Customer No. | Code[20] | |
| Hide Hints | Boolean | |
| Transferred | Boolean | |
| related Order | Code[20] | |
| Manual | Boolean | |
| Shortcut Dimension 1 Code | Code[20] | |
| Shortcut Dimension 2 Code | Code[20] | |
| Shortcut Dimension 3 Code | Code[20] | |
| Shortcut Dimension 4 Code | Code[20] | |
| Shortcut Dimension 5 Code | Code[20] | |
| Shortcut Dimension 6 Code | Code[20] | |
| Shortcut Dimension 7 Code | Code[20] | |
| Shortcut Dimension 8 Code | Code[20] | |
| Dimension Set ID | Integer | |
| Orig. Bidding | Code[20] | |
| No. GAEB Quote | Code[20] | |
| No. GAEB Order Conf | Code[20] | |
| Locked By | Code[50] | |
| Version No. Int | Integer | |
| Job No Ext | Text[50] | |
| GAEB Version Set ID | Integer | |
| Bidding Cat. | Text[50] | |
| Fifth Level | Integer | |
| First Level Desc | Text[50] | |
| Second Level Desc | Text[50] | |
| Third Level Desc | Text[50] | |
| Fourth Level Desc | Text[50] | |
| Fifth Level Desc | Text[50] | |
| Indexing Length | Integer | |
| VAT | Decimal | |
| Total | Decimal | |
| Skip Price Check | Boolean | |
| Salesperson Code | Code[20] | |
| Active Journals | Integer | |
| Last Item No. | Code[20] | |
| Sell-to Customer Name | Text[100] | |
| Sell-to Customer Name 2 | Text[50] | |
| Import Date | Date | |
| Import Filename | Text[250] | |
| Customer View | Boolean | |
| Position Item | Integer | |
| Position Wage | Integer | |
| Offer to Bidding | Code[20] | |
| New Line | Boolean | |
| GAEB Calc BOM No. | Code[20] | |
| Document Date | Date | |
| VAT Bus. Posting Group | Code[10] | Warning: Obsolete |
| Quote Valid Until Date | Date | |
| Related Quote No. | Code[20] | |
| Related Quote Doc. Type | Enum (KVSGAEB Document Type) | |
| Rel. Quote Version No. | Code[20] | |
| Surcharge | Decimal | |
| Surcharge (Pct) | Decimal | |
| Total Sum WO Altern | Decimal | |
| Buy-from Vendor No. | Code[20] | |
| Active | Boolean | |
| Buy-from Vendor Name | Text[100] | |
| Purchase Quotes | Integer | FlowField |
| Purchase Orders | Integer | FlowField |
| First Fraction | Code[20] | |
| Second Fraction | Code[20] | |
| Third Fraction | Code[20] | |
| Fourth Fraction | Code[20] | |
| Fifth Fraction | Code[20] | |
| Type of days | Enum (KVSGAEB Type of Days) | |
| Payment Date | Date |
Procedures#
SetDeleteWOTestfield(Boolean) :#
Summary: Sets the flag to control whether certain test fields should be bypassed during deletion operations. Allows deletion without enforcing standard validation checks.
procedure SetDeleteWOTestfield(DeleteWoTFPar: Boolean):
Parameters:
DeleteWoTFPar: Boolean flag indicating whether to delete without test field validation.
CheckIfLocked() :#
Summary: Checks if the document is locked by another user and locks it for the current user if available. Enforces document locking based on setup configuration and throws an error if locked by a different user.
procedure CheckIfLocked():
SendQuoteNotification(Boolean) :#
Summary: Sends a notification to the user about existing quote or expenditure documents that need to be updated. Provides action buttons to transfer the document to a sales quote again with updated information.
procedure SendQuoteNotification(IsExpenditure: Boolean):
Parameters:
IsExpenditure: Boolean flag indicating whether this is an expenditure (true) or quote (false) notification.
Events#
TransferSalesDocText(Record Sales Header, Record KVSGAEB Document Header) :#
[IntegrationEvent(false, false)]
local procedure TransferSalesDocText(var SalesHeaderVar: Record "Sales Header"; var KVSGAEBDocHeaderVar: Record "KVSGAEB Document Header"):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'TransferSalesDocText', '', false, false)]
local procedure DoSomethingTransferSalesDocText(var SalesHeaderVar: Record "Sales Header"; var KVSGAEBDocHeaderVar: Record "KVSGAEB Document Header")
begin
end;
TransferPurchDocText(Record Purchase Header, Record KVSGAEB Document Header) :#
[IntegrationEvent(false, false)]
local procedure TransferPurchDocText(var PurchHeaderVar: Record "Purchase Header"; var KVSGAEBDocHeaderVar: Record "KVSGAEB Document Header"):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'TransferPurchDocText', '', false, false)]
local procedure DoSomethingTransferPurchDocText(var PurchHeaderVar: Record "Purchase Header"; var KVSGAEBDocHeaderVar: Record "KVSGAEB Document Header")
begin
end;
OnBeforeInsertHeadingLineToSalesQuote(Record Sales Line) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeInsertHeadingLineToSalesQuote(var SalesLineVar: Record "Sales Line"):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'OnBeforeInsertHeadingLineToSalesQuote', '', false, false)]
local procedure DoSomethingOnBeforeInsertHeadingLineToSalesQuote(var SalesLineVar: Record "Sales Line")
begin
end;
OnBeforeInsertHeadingLineToPurchaseQuote(Record Purchase Line) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeInsertHeadingLineToPurchaseQuote(var PurchLineVar: Record "Purchase Line"):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'OnBeforeInsertHeadingLineToPurchaseQuote', '', false, false)]
local procedure DoSomethingOnBeforeInsertHeadingLineToPurchaseQuote(var PurchLineVar: Record "Purchase Line")
begin
end;
OnDefineSalesLineType(Record Sales Line, Boolean, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnDefineSalesLineType(var SalesLineVar: Record "Sales Line"; IsEndPar: Boolean; IsBundlePar: Boolean):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'OnDefineSalesLineType', '', false, false)]
local procedure DoSomethingOnDefineSalesLineType(var SalesLineVar: Record "Sales Line"; IsEndPar: Boolean; IsBundlePar: Boolean)
begin
end;
OnDefinePurchLineType(Record Purchase Line, Boolean, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnDefinePurchLineType(var PurchLineVar: Record "Purchase Line"; IsEndPar: Boolean; IsBundlePar: Boolean):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'OnDefinePurchLineType', '', false, false)]
local procedure DoSomethingOnDefinePurchLineType(var PurchLineVar: Record "Purchase Line"; IsEndPar: Boolean; IsBundlePar: Boolean)
begin
end;
OnBeforeInsertPositionToSalesQuote(Record Sales Line, Record KVSGAEB Document Lines) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeInsertPositionToSalesQuote(var SalesLineVar: Record "Sales Line"; DocLinePar: Record "KVSGAEB Document Lines"):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'OnBeforeInsertPositionToSalesQuote', '', false, false)]
local procedure DoSomethingOnBeforeInsertPositionToSalesQuote(var SalesLineVar: Record "Sales Line"; DocLinePar: Record "KVSGAEB Document Lines")
begin
end;
OnBeforeInsertPositionToPurchQuote(Record Purchase Line, Record KVSGAEB Document Lines) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeInsertPositionToPurchQuote(var PurchLineVar: Record "Purchase Line"; DocLinePar: Record "KVSGAEB Document Lines"):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'OnBeforeInsertPositionToPurchQuote', '', false, false)]
local procedure DoSomethingOnBeforeInsertPositionToPurchQuote(var PurchLineVar: Record "Purchase Line"; DocLinePar: Record "KVSGAEB Document Lines")
begin
end;
AddSalesText(Record Sales Line, Text, Integer, Boolean) :#
[IntegrationEvent(false, false)]
local procedure AddSalesText(var SalesLineVar: Record "Sales Line"; ContentPar: Text; var LastLineNo: Integer; FirstPar: Boolean):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'AddSalesText', '', false, false)]
local procedure DoSomethingAddSalesText(var SalesLineVar: Record "Sales Line"; ContentPar: Text; var LastLineNo: Integer; FirstPar: Boolean)
begin
end;
AddPurchText(Record Purchase Line, Text, Integer, Boolean) :#
[IntegrationEvent(false, false)]
local procedure AddPurchText(var PurchLineVar: Record "Purchase Line"; ContentPar: Text; var LastLineNo: Integer; FirstPar: Boolean):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'AddPurchText', '', false, false)]
local procedure DoSomethingAddPurchText(var PurchLineVar: Record "Purchase Line"; ContentPar: Text; var LastLineNo: Integer; FirstPar: Boolean)
begin
end;
OnBeforeChangeToBundle(Record Sales Line, Code[20]) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeChangeToBundle(var SalesLineVar: Record "Sales Line"; PositionNoPar: Code[20]):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'OnBeforeChangeToBundle', '', false, false)]
local procedure DoSomethingOnBeforeChangeToBundle(var SalesLineVar: Record "Sales Line"; PositionNoPar: Code[20])
begin
end;
OnBeforeChangePurchLineToBundle(Record Purchase Line, Code[20]) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeChangePurchLineToBundle(var PurchLineVar: Record "Purchase Line"; PositionNoPar: Code[20]):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'OnBeforeChangePurchLineToBundle', '', false, false)]
local procedure DoSomethingOnBeforeChangePurchLineToBundle(var PurchLineVar: Record "Purchase Line"; PositionNoPar: Code[20])
begin
end;
OnAfterFinishTransferSalesLines(Record Sales Header) :#
[IntegrationEvent(false, false)]
local procedure OnAfterFinishTransferSalesLines(var SalesHeaderVar: Record "Sales Header"):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'OnAfterFinishTransferSalesLines', '', false, false)]
local procedure DoSomethingOnAfterFinishTransferSalesLines(var SalesHeaderVar: Record "Sales Header")
begin
end;
OnAfterFinishTransferPurchLines(Record Purchase Header) :#
[IntegrationEvent(false, false)]
local procedure OnAfterFinishTransferPurchLines(var PurchHeaderVar: Record "Purchase Header"):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'OnAfterFinishTransferPurchLines', '', false, false)]
local procedure DoSomethingOnAfterFinishTransferPurchLines(var PurchHeaderVar: Record "Purchase Header")
begin
end;
SetPositionNo(Record Sales Line, Code[20]) :#
[IntegrationEvent(false, false)]
local procedure SetPositionNo(var SalesLineVar: Record "Sales Line"; OZPar: Code[20]):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'SetPositionNo', '', false, false)]
local procedure DoSomethingSetPositionNo(var SalesLineVar: Record "Sales Line"; OZPar: Code[20])
begin
end;
OnAfterTransferSalesLine(Record KVSGAEB Document Lines, Record Sales Line) :#
[IntegrationEvent(false, false)]
local procedure OnAfterTransferSalesLine(var DocLine: Record "KVSGAEB Document Lines"; var SalesLine: Record "Sales Line"):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'OnAfterTransferSalesLine', '', false, false)]
local procedure DoSomethingOnAfterTransferSalesLine(var DocLine: Record "KVSGAEB Document Lines"; var SalesLine: Record "Sales Line")
begin
end;
OnBeforeTestCustomer(Record KVSGAEB Document Header, Boolean) :#
Summary: Function to skip Customer Check
[IntegrationEvent(false, false)]
local procedure OnBeforeTestCustomer(var DocumentHeader: Record "KVSGAEB Document Header"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Table, Table::"KVSGAEB Document Header", 'OnBeforeTestCustomer', '', false, false)]
local procedure DoSomethingOnBeforeTestCustomer(var DocumentHeader: Record "KVSGAEB Document Header"; var IsHandled: Boolean)
begin
end;
Parameters:
DocumentHeader: Current Document HeaderIsHandled: Set IsHandled to true to skip Customer Testfield