Description
Add code here to initialize the calculated fields of a 'new' record (= a record that must be created in the application database) in a class temp-table.
Parameters
| icTableName | input | character | Name of the database table of which a record is created in the class temp-table. |
| oiReturnStatus | output | integer | |
Internal usage
unused
program code (program/bmirroringgl.p)
<ANCESTOR-CODE>
if icTableName = 'MirroringGL':U
then assign
tMirroringGL.tcDomainCode = vcDomainCode
tMirroringGL.MirroringGLSplitGLType = {&MIRRORINGGLSPLITGLTYPE-MIXED}
tMirroringGL.MirroringGLTrans1Journal = {&MIRRORINGGLTRANS1JOURNAL-SOURCE}
tMirroringGL.MirroringGLTrans2Journal = {&MIRRORINGGLTRANS2JOURNAL-MIRROR}.