COBOL74 Library: OBJECT/SAMPLE4

The following COBOL74 library compiled as OBJECT/SAMPLE4 is referenced in various examples in this section. The entry point to this library is named PROCEDUREDIVISION. This library is PERMANENT by default. 

IDENTIFICATION DIVISION.
  ENVIRONMENT DIVISION.
  DATA DIVISION.
  WORKING-STORAGE SECTION.
  77 PARAM PIC 9(11) BINARY.
  PROCEDURE DIVISION USING PARAM.
  P1.
       DISPLAY “I AM SAMPLE4”.
       DISPLAY “MY PARAMETER IS “ PARAM.
       EXIT PROGRAM.
Prev  Up  Next
C Client Program Passing File to ALGOL Library  Home  COBOL74 Library: OBJECT/SAMPLE5