Procedura-VATSummaryESL

Parametry:

NázevPopisDatový typ
FirmSelIDChar(10)
DivisionsSelIDChar(10)
BusOrdersSelIDChar(10)
BusTransactionsSelIDChar(10)
BusProjectsSelIDChar(10)
AESLDATeFromFloat(0, 0)
AESLDATeToFloat(0, 0)
DivisionsWithChildsChar(1)
BusOrdersWithChildsChar(1)
BusTransactionsWithChildsChar(1)
BusProjectsWithChildsChar(1)
VATCountry_IDChar(10)

Návratové hodnoty:

NázevPopisDatový typ
VATIndex_IDChar(10)
DocQueue_IDChar(10)
OrdNumberNumeric(8, 0)
Period_IDChar(10)
TAmountWithoutVATNumeric(13, 2)
LocalTAmountWithoutVATNumeric(13, 2)
TAmountNumeric(13, 2)
LocalTAmountNumeric(13, 2)
TextChar(160)
DescriptionChar(50)
Division_IDChar(10)
BusOrder_IDChar(10)
BusTransaction_IDChar(10)
BusProject_IDChar(10)
Firm_IDChar(10)
ESLDate$DateFloat(0, 0)
PosIndexInteger
RelatedDocNameVarChar(24)
ESLIndicator_IDChar(10)
Document_IDChar(10)
VIESKindChar(1)

Závislosti:

NázevPopisTřída
VATSummaryCashESLProcedures
VATSummaryInvESLProcedures
VATSummaryCOSESLProcedures

Tělo:

BEGIN
  FOR
    SELECT VATIndex_ID, DocQueue_ID, OrdNumber, Period_ID, TAmountWithoutVAT,
      LocalTAmountWithoutVAT, TAmount, LocalTAmount, Text, Description, Division_ID, BusOrder_ID,
      BusTransaction_ID, BusProject_ID, Firm_ID, ESLDate$Date, PosIndex, RelatedDocName, ESLIndicator_ID,
      Document_ID, VIESKind
    FROM
      VATSummaryInvESL(:FirmSelID, :DivisionsSelID, :BusOrdersSelID, :BusTransactionsSelID, :BusProjectsSelID,
                    :AESLDateFrom , :AESLDateTo, :DivisionsWithChilds,
                    :BusOrdersWithChilds, :BusTransactionsWithChilds, :BusProjectsWithChilds, :VATCountry_ID)
    INTO
      :VATIndex_ID, :DocQueue_ID, :OrdNumber, :Period_ID, :TAmountWithoutVAT,
      :LocalTAmountWithoutVAT, :TAmount, :LocalTAmount, :Text, :Description, :Division_ID, :BusOrder_ID,
      :BusTransaction_ID, :BusProject_ID, :Firm_ID, :ESLDate$Date, :PosIndex, :RelatedDocName, :ESLIndicator_ID,
      :Document_ID, :VIESKind
  DO begin
    SUSPEND;
  end
  RelatedDocName = '';
  FOR
    SELECT VATIndex_ID, DocQueue_ID, OrdNumber, Period_ID, TAmountWithoutVAT,
      LocalTAmountWithoutVAT, TAmount, LocalTAmount, Text, Description, Division_ID, BusOrder_ID,
      BusTransaction_ID, BusProject_ID, Firm_ID, ESLDate$Date, PosIndex, ESLIndicator_ID,
      Document_ID, VIESKind
    FROM
      VATSummaryCashESL(:FirmSelID, :DivisionsSelID, :BusOrdersSelID, :BusTransactionsSelID, :BusProjectsSelID,
                    :AESLDateFrom , :AESLDateTo, :DivisionsWithChilds,
                    :BusOrdersWithChilds, :BusTransactionsWithChilds, :BusProjectsWithChilds, :VATCountry_ID)
    INTO
      :VATIndex_ID, :DocQueue_ID, :OrdNumber, :Period_ID, :TAmountWithoutVAT,
      :LocalTAmountWithoutVAT, :TAmount, :LocalTAmount, :Text, :Description, :Division_ID, :BusOrder_ID,
      :BusTransaction_ID, :BusProject_ID, :Firm_ID, :ESLDate$Date, :PosIndex, :ESLIndicator_ID,
      :Document_ID, :VIESKind
  DO begin
    SUSPEND;
  end
  RelatedDocName = '';
  FOR
    SELECT VATIndex_ID, DocQueue_ID, OrdNumber, Period_ID, TAmountWithoutVAT,
      LocalTAmountWithoutVAT, TAmount, LocalTAmount, Text, Description, Division_ID, BusOrder_ID,
      BusTransaction_ID, BusProject_ID, Firm_ID, ESLDate$Date, PosIndex, ESLIndicator_ID,
      Document_ID, VIESKind
    FROM
      VATSummaryCOSESL(:FirmSelID, :DivisionsSelID, :BusOrdersSelID, :BusTransactionsSelID, :BusProjectsSelID,
                    :AESLDateFrom , :AESLDateTo, :DivisionsWithChilds,
                    :BusOrdersWithChilds, :BusTransactionsWithChilds, :BusProjectsWithChilds, :VATCountry_ID)
    INTO
      :VATIndex_ID, :DocQueue_ID, :OrdNumber, :Period_ID, :TAmountWithoutVAT,
      :LocalTAmountWithoutVAT, :TAmount, :LocalTAmount, :Text, :Description, :Division_ID, :BusOrder_ID,
      :BusTransaction_ID, :BusProject_ID, :Firm_ID, :ESLDate$Date, :PosIndex, :ESLIndicator_ID,
      :Document_ID, :VIESKind
  DO begin
    SUSPEND;
  end
  
END;

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