project QadFinancials > class BCubeDaemon > method ValMaxNumberOfInstances
validation procedure
Description
Check if MaxNumberOfInstances is not > 1.
Parameters
| iiTargetField | input | integer | Value of the business field to validate. |
| icTargetFieldName | input | character | Name of the business field to validate. |
| icRowid | input | character | Contents of field tc_Rowid, if the target field is a field of a component temp-table. |
| icDaemonName | input | character | |
| oiReturnStatus | output | integer | Return status of the method. |
Internal usage
QadFinancials
program code (program4/bcubedaemon.p)
if icDaemonName = {&CUBEDAEMON} and iiTargetField > 1
then do:
assign vcMessage = trim(#T-53'You can only run one Cube daemon process.':100(173887459)T-53#)
oiReturnStatus = -1.
<M-58 run SetMessage
(input vcMessage (icMessage),
input '':U (icArguments),
input icTargetFieldName (icFieldName),
input string(iiTargetField) (icFieldValue),
input 'E':U (icType),
input 3 (iiSeverity),
input icRowid (icRowid),
input 'qadfin-704336':U (icFcMsgNumber),
input '':U (icFcExplanation),
input '':U (icFcIdentification),
input '':U (icFcContext),
output viFcReturnSuper (oiReturnStatus)) in BCubeDaemon>
end. /* if icDaemonName = {&CUBEDAEMON} and integer(icTargetField) > 1 */