*COMDECK CVTCOM 
       COMMON-STORAGE SECTION.
       01  END-SW                          PICTURE X. 
       01  WRKF-FUNCTION-CODE              PICTURE X. 
       01  PNCH-FUNCTION-CODE              PICTURE X. 
       01  RETURN-CODE                     PICTURE XX.
