method GetAdditionalNbr

Parameters

iiCompanyId	input	integer
iiPostingId	input	integer
oiPostingAddGLNbr	output	integer
oiReturnStatus	output	integer	Return status of the method.

Internal usage

unused

program code (program1/bposting.p)

assign oiPostingAddGLNbr = 0.

/* Normalize input paramters */
if iiCompanyId = ? or iiCompanyId = 0 then iiCompanyId = viCompanyId.

<Q-1 run PostingForAdditionaNbr (all) (Read) (NoCache)
   (input iiCompanyId, (CompanyId)
    input iiPostingId, (PostingId)
    output dataset tqPostingForAdditionaNbr) in BPosting >

find first tqPostingForAdditionaNbr no-error.
if available tqPostingForAdditionaNbr 
then assign oiPostingAddGLNbr = tqPostingForAdditionaNbr.tiPostingAddGLNbr.