CALL "C$WRITELOG" USING text-1 [, text-2] ... [, text-n] GIVING returnCode |
text-1 text-2 ... text-n | any data item or literal | Specifies the text to be written into the log file. At least one parameter must be passed. The others are optional. Multiple parameters values are combined together in the same log line. |
1 | Operation successful |
0 |
*> define trace-text as pic x(n) initialize trace-text string "Customer in debt " cust-code ". Debt Amount : " cust-amount-ed into trace-text end-string call "c$writelog" using trace-text |