Procedura-PaymentsAmountForDocument

Popis:
Zjistí placenou částku pro placený doklad z jeho platících dokladů (tabulka Payments)

Parametry:

NázevPopisDatový typ
APDocumentTypeChar(2)
APDocument_IDChar(10)
ADocumentTypeChar(2)
ADocument_IDChar(10)

Návratové hodnoty:

NázevPopisDatový typ
RAmountNumeric(15, 3)
RLocalAmountNumeric(15, 3)

Tělo:

BEGIN
  /* Zjistime Amount */
  SELECT
    COALESCE(SUM(Amount),0), COALESCE(SUM(LocalAmount),0)
  FROM
    Payments
  WHERE 
    Document_ID = :ADocument_ID AND DocumentType = :ADocumentType  AND 
    PDocument_ID = :APDocument_ID AND PDocumentType = :APDocumentType
  INTO
    :RAmount, :RLocalAmount;
  SUSPEND;
END;

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