COBOL Call

Compilation:

COBOL Options - PGMNAME(LONGMIXED)

Binder Options - CASE(MIXED)

Copybook - TIBCWLOG

Procedure:

Below is an example of the COBOL format of data structure and the call.
COPY TIBCWLOG.
…..
CALL 'TIB_WRITE_SYSLOG'      
     USING WS-WRITE-LOG,     
           WS-REASON         
     RETURNING WS-RETURN-CODE
END-CALL.                    

IF WS-RETURN-CODE NOT 0 THEN
	…….  do error processing ……….
END-IF.