method CalcAllPostingLineForTransView

query calculated fields procedure

Description

Assign a value to query calculated fields

Parameters

iiCompanyId	input	integer	Company id
icGLDesc	input	character
ilBSAccount	input	logical
icBatchNumber	input	character
icCostCenterCode	input	character
icCostCenterDesc	input	character
icCurrCode	input	character
icJournalCode	input	character
icJournalTypeCode	input	character
icJournalDesc	input	character
icGLCode	input	character
icGLCategory	input	character
icGLTypeCode	input	character
icInterEntityCode	input	character
icPostingDesc	input	character
icProjectCode	input	character
icProjectDesc	input	character
icDivisionCode	input	character
icDivisionDesc	input	character
itPostingSystemDate	input	date
icVoucher	input	character
idDebitTC	input	decimal
idCreditTC	input	decimal
itPostingDate	input	date
iiPostingYearPeriodFrom	input	integer
iiPostingYearPeriodTo	input	integer
icGLCodeDiff	input	character
icGLCodeFrom	input	character
icGLCodeTo	input	character
icDivisionCodeFrom	input	character
icDivisionCodeTo	input	character
icDivisionCodeDiff	input	character
icProjectCodeFrom	input	character
icProjectCodeTo	input	character
icProjectCodeDiff	input	character
icCostCenterCodeFrom	input	character
icCostCenterCodeTo	input	character
icCostCenterCodeDiff	input	character
itPostingDateFrom	input	date
itPostingDateTo	input	date
icLayerCode	input	character
icLayerTypeCode	input	character
iiPostingYearPeriodVal	input	integer
oiReturnStatus	output	integer	Return status of the method.

Internal usage

QadFinancials

query PostingLineForTransView

program code (program1/bposting.p)

    /* ===================================================================================== */
    /* JournalTypeCodeTr: obsolete calc-field as this field is no longer used by the callers */
    /* but we cannot delete it either as that would break the backwards-compatibility        */
    /* Immediately return from this calc-method as the callers have to fill it when needed   */
    /* ===================================================================================== */
    If true then Return. /* The 'If true then ' is needed to avoid a compile-warning. */
    


create query vhQuery in widget-pool "non-persistent".
vhQuery:forward-only = yes.
vhQuery:set-buffers(ih_Buffer).
vhQuery:query-prepare("for each ":U + ih_Buffer:table).
vhQuery:query-open().
vhQuery:get-first().
do while not vhQuery:query-off-end:
    assign {&tcJournalTypeCodeTr} = "Obsoleted":U.
    vhQuery:get-next().
end.
vhQuery:query-close().
delete object vhQuery.