COBOL 프로그램 SP 등록 하기


  1. COBOL LINKAGE SECTION
					
      COBOL 프로그램(QGPL/TESTCBL)의 LINKAGE SECTION이 다음과 같은 것으로 가정

      LINKAGE SECTION.                      
      01  INPUT-PARM.                       
          03 I-PARM1      PIC X(03).        
          03 I-PARM2      PIC X(07).        
      PROCEDURE DIVISION  USING INPUT-PARM. 
					
  2. External Procedure 작성
					
      1) SEU를 이용하여 아래와 같이 저장프로시져를 작성한다
            (실습을 위하여 QGPL/QSQLSRC 파일에 CALL_CBL 멤버로 저장)

            CREATE PROCEDURE qgpl.call_cbl      
                  (IN i_data CHAR(10))            
            RESULT SETS 1                   
            EXTERNAL NAME qgpl.test_cbl 
            LANGUAGE cobol SIMPLE CALL;        

          COBOL 01 레벨 파라미터를 IN 으로 선언
     
      2) Run SQL Statement 명령어를 이용하여 저장프로시져를 생성한다
             RUNSQLSTM SRCFILE(qgpl/qsqlsrc) SRCMBR(call_cbl) _
                       NAMING(*SQL) DBGVIEW(*LIST) OUTPUT(*PRINT)

          DBGVIEW(*LIST) OUTPUT(*PRINT)를 지정하여야 컴파일 리스트 생성