method GetDefaultJournalCode

Parameters

icDaybookSetCode	input	character
icSite	input	character	Site
icInvoiceType	input	character	InvoiceType
ocJournalCode	output	character	Journal Code
oiReturnStatus	output	integer	Return status of the method.

Internal usage

unused

program code (program3/bcinvoice.p)

if icDaybookSetCode = ?
then assign icDaybookSetCode = "":U.

if icSite = ?
then assign icSite = "":U.

if icDaybookSetCode = "":U
then return.

assign vhFcComponent = ?.

<M-16 run ApiGetDaybookCodeByType
   (input  icDaybookSetCode (icDaybookSetCode), 
    input  icSite (icSite), 
    input  '2':U (icDaybookSetType), 
    input  icInvoiceType (icInvoiceType), 
    output ocJournalCode (ocDaybookCode), 
    output viFcReturnSuper (oiReturnStatus)) in BMfgDaybookSet>