Procedura-GetRowsForDocumentWage

Parametry:

Název	Popis	Datový typ
ADOCUMENTTYPE		Char(2)
ADOCUMENTID		Char(10)
AWAGES_ET_ID		Char(10)

Návratové hodnoty:

Název	Popis	Datový typ
TYPE_ID		Char(10)
AMOUNT		Numeric(15, 2)
VAT		Numeric(15, 2)
POSINDEX		Integer

Tělo:

begin
IF (ADocumentType = '47') THEN BEGIN
  POSINDEX = 0;
  VAT = 0;
  TYPE_ID = AWAGES_ET_ID;
  SELECT B.Amount
  FROM WagePaymentOrderSources B
  WHERE B.ID = :ADocumentID
  INTO :AMOUNT;
  SUSPEND;
END
end

Generated by ABRA Software a.s. 27.10.2021 16:34:37