project QadFinancials > class BPosting > method UpdateCrossCompanyIDs
Description
Methods which takes in the cross company id's and updates it's posting line table
Parameters
tApiPostingLine | input | temp-table | Posting line which contains the cross company posting id's |
oiReturnStatus | output | integer | Return status of the method. |
Internal usage
QadFinancials
program code (program4/bposting.p)
/*******************************************************************/
/* This method takes in a table of PostingLines which should match */
/* the posting lines of this instance, but also has their cross- */
/* company details updated. */
/*******************************************************************/
for each tApiPostingLine on error undo, throw:
<M-47 run UpdateCrossCompanyInfo
(input tApiPostingLine.Company_ID (iiPostingCompanyID),
input tApiPostingLine.Posting_ID (iiPostingID),
input tApiPostingLine.PostingLine_ID (iiPostingLineID),
input tApiPostingLine.CrossCompany_ID (iiCrossCompanyID),
input tApiPostingLine.CrossCompanyPosting_ID (iiCrossCompanyPostingID),
input tApiPostingLine.CrossCompanyPostingLine_ID (iiCrossCompanyPostingLineID),
output oiReturnStatus (oiReturnStatus)) in BPosting>
if (oiReturnStatus < 0)
then leave.
end. /* for each tApiPostingLine */
if (oiReturnStatus >= 0)
then do:
/* save the data */
<M-97 run DataSave (output oiReturnStatus (oiReturnStatus)) in BPosting>
end. /* if (oiReturnStatus < 0) */