method GetPostingInfoByPostingRowID

Description

Get Posting information by posting row id

Parameters

icPostingRowId	input	character	Posting Row ID
oiPostingID	output	integer	Posting ID
otPostingDate	output	date	Posting Date
ocJournalCode	output	character	Journal Code
ocPostingText	output	character	Posting Text
ocPostingBusRelTxt	output	character	Posting Business Relation Txt
ocPostingParentText	output	character	Posting Parent Text
oiReturnStatus	output	integer	Return status of the method.

Internal usage

unused

program code (program6/bjournalentry.p)

    /* =============== */
    /* get the posting */
    /* =============== */
    find first tPosting where
               tPosting.tc_Rowid = icPostingRowid
               no-error.
    if not available tPosting or
       tPosting.tc_Status = "D":U
    then return.

    /* ======================= */
    /* Return the ID           */
    /* ======================= */
    assign oiPostingID         = tPosting.Posting_ID
           otPostingDate       = tPosting.PostingDate
           ocJournalCode       = tPosting.tcJournalCode
           ocPostingText       = tPosting.PostingText
           ocPostingBusRelTxt  = tPosting.PostingBusinessRelationTxt
           ocPostingParentText = tPosting.PostingParentText.