IBCE277S ;ALB/JRA - Create MailMan message from 277STAT data array
Source file <IBCE277S.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| POST(RESULT,ARG) | ;Entry point to create MailMan message from ARG array
; Input: ARG |
|
| GETVAL(FLDNAM,OCC) | ;;Get the value associated with the field name
|
|
| MSGLINE(FLDNAM,FLDVAL,OCC) | ;Add data to specified node in message array
|
|
| CHKCLM(FLDVAL) | ;;
|
|
| ;Assemble 277STAT MailMan message and create/send
|
||
| SETMSG(DATA,LN) | ;Set a line of the MailMan Message and return next line number
|
|
| PARSE(NODE,LN) | ;
|
|
| QUIT | ; kill switch
|
|
| MAPFLD | ;RPC_field_name (limit 45 char)^Array_node
|
| RPC Name | Call Tags |
|---|---|
| IBTAS 277STAT | POST |
