project BLF > class BXmlDaemon > method GetActionForOriginator
Parameters
| icOriginator | input | character | |
| ocAction | output | character | |
| oiReturnStatus | output | integer | Return status of the method. |
Internal usage
BLF
program code (program1/bxmldaemon.p)
/* this method assumes config records are already loaded */
find first tXmlDaemon no-error.
if not available tXmlDaemon
then return.
/* use XML action */
if tXmlDaemon.XmlDaemonActOverruleXml
then return.
/* use default action */
assign ocAction = tXmlDaemon.XmlDaemonAct.
if tXmlDaemon.XmlDaemonActOverruleOrig = no
then return.
find first tXmlDaemonOrig where
tXmlDaemonOrig.XmlDaemonOrigOriginator = icOriginator no-error.
if not available tXmlDaemonOrig
then return.
if tXmlDaemonOrig.XmlDaemonOrigActOverrulXml
then assign ocAction = "". /* use XML action */
else assign ocAction = tXmlDaemonOrig.XmlDaemonOrigAct. /* use originator action */