method ApiSynchroniseCustom

Description

ApiSynchroniseCustom; this non-api method will do the synchronisation (=upload of some fixed data) for inherited classes and is called from method ApiSynchronise.

Note1; that all mentioned components in icComponents will be handled in a separate transaction.
Note2. all entries in ocUpdatedComponents are default set on false (except for the components that were already handled by ApiSunchronise).
Note3; when you add functionality for a new component then please do also update method stopexternal instances.

Parameters

olUpdatesDone	output	logical
oiReturnStatus	output	integer	Return status of the method.

Internal usage

BLF

method BRole.ApiSynchronise

program code (program/brole.p)

<ANCESTOR-CODE>

/* Determine if EmpNot role exists */
<M-8 run CreateNotifyRole
   (input  'EmployeeNotify':U (icRoleName), 
    input  'employee':U (icComponentType), 
    output viFcReturnSuper (oiReturnStatus)) in BRole>
if(viFcReturnSuper <> 0) then do:
    oiReturnStatus = viFcReturnSuper.
    if(oiReturnStatus < 0) then return.
end.

/* Determine if SuppNot role exists */
<M-9 run CreateNotifyRole
   (input  'SupplierNotify':U (icRoleName), 
    input  'supplier':U (icComponentType), 
    output viFcReturnSuper (oiReturnStatus)) in BRole>
if(viFcReturnSuper <> 0) then do:
    oiReturnStatus = viFcReturnSuper.
    if(oiReturnStatus < 0) then return.
end.

/* Determine if CustNot role exists */
<M-10 run CreateNotifyRole
   (input  'CustomerNotify':U (icRoleName), 
    input  'customer':U (icComponentType), 
    output viFcReturnSuper (oiReturnStatus)) in BRole>
if(viFcReturnSuper <> 0) then do:
    oiReturnStatus = viFcReturnSuper.
    if(oiReturnStatus < 0) then return.
end.

/* Determine if End role exists */
<M-11 run CreateNotifyRole
   (input  'EndUserNotify':U (icRoleName), 
    input  'enduser':U (icComponentType), 
    output viFcReturnSuper (oiReturnStatus)) in BRole>
if(viFcReturnSuper <> 0) then do:
    oiReturnStatus = viFcReturnSuper.
    if(oiReturnStatus < 0) then return.
end.

/* Determine if Auto-balance role exists */
<M-97 run CreateNotifyRole
   (input  'PostAutoBalNotify':U (icRoleName), 
    input  'Autobal post':U (icComponentType), 
    output viFcReturnSuper (oiReturnStatus)) in BRole>
if(viFcReturnSuper <> 0) then do:
    oiReturnStatus = viFcReturnSuper.
    if(oiReturnStatus < 0) then return.
end.