이 레슨에서는 이전 레슨에서 작성한 샘플 COBOL 프로그램의 빌드 특성을 설정하는 방법을 설명합니다.
샘플 COBOL 프로그램의 빌드 특성을 설정하려면 다음 단계를 수행하십시오.
- USERID.RDZDB2.COBOL 데이터 세트를 선택하고
특성 그룹 > 연관된 특성 그룹
편집을 클릭하십시오.
- JCL 작업 카드 및 데이터 세트 특성 페이지를
여십시오.
- JCL 작업 카드 항목 필드를 업데이트하십시오. JOBLIB 카드를 삽입해야 할 수도 있습니다.
- JCL을 쓸 올바른 파티션된 데이터 세트를 가리키도록 JCL 데이터 세트 항목 필드를 변경하십시오.
- COBOL 설정 탭의 런타임
환경 페이지에서 DB2 선택란을 선택하십시오.
- COBOL 설정의
프로시저 및 단계 페이지에서,
ELAXFCOC 프로시저의 더하기 부호를 클릭하여 필치고 단계 이름 COBOL을 클릭하여
컴파일러 특성을 여십시오.
- 출력 데이터 세트, 디버그 데이터 세트, 오브젝트 데크 데이터 세트,
데이터베이스 요청 모듈 위치(DBRM) 나열 및 컴파일 오류의 데이터 세트 규정자에
올바른 데이터 세트 항목을 지정하십시오.
- 오류 피드백 지원 선택란을
선택하십시오. SYSTSIN 지시사항에는 COBOL 애플리케이션의 바인드 지시사항이 있습니다. 이 항목 필드의 초기값은 JCL 설명입니다.
//*UNCOMMENT AND TAILOR THE FOLLOWING IF YOUR SYSTSIN STATEMENT**
//*CONTAINS BIND INSTRUCTIONS:
//*//SYSTSIN DD *
//* DSN SYSTEM(YOURSUBSYSTEM)
//* BIND PACKAGE(YOURLOCATION.YOURPACKAGE)-
//* OWNER(YOURUSERID) -
//* MEMBER(YOURMEMBER) -
//* LIBRARY('YOUR.DBRM.LIBRARY') -
//* ACTION(REP) -
//* VALIDATE(BIND)
//* BIND PLAN(YOURPLAN) -
//* PKLIST(YOURLOCATION.YOURPACKAGENAME.*)
//* END
//* OR
//*UNCOMMENT AND TAILOR THE FOLLOWING IF YOUR SYSTSIN STATEMENT**
//*POINTS TO A DATA SET CONTAINING BIND INSTRUCTIONS
//*//SYSTSIN DD DSN=USERID.BIND(MEMBER),DISP=SHR
//*
- //SYSTSIN DD *에서 END 문까지 주석을 제거하고
다음 예제와 같이 YOUR로 시작하는 값을 채우십시오.
//*UNCOMMENT AND TAILOR THE FOLLOWING IF YOUR SYSTSIN STATEMENT**
//*CONTAINS BIND INSTRUCTIONS:
//SYSTSIN DD *
DSN SYSTEM(DSN7)
BIND PACKAGE(STPLEX4A_DSN7.MELPKG1)-
OWNER(MEL) -
MEMBER(RDZDB2) -
LIBRARY('MEL.D2.DB2DBRM') -
ACTION(REP) -
VALIDATE(BIND)
BIND PLAN(MELPLN1) -
PKLIST(STPLEX4A_DSN7.MELPKG1.*)
END
//* OR
//*UNCOMMENT AND TAILOR THE FOLLOWING IF YOUR SYSTSIN STATEMENT**
//*POINTS TO A DATA SET CONTAINING BIND INSTRUCTIONS
//*//SYSTSIN DD DSN=USERID.BIND(MEMBER),DISP=SHR
//*
/*
- 링크 옵션 특성 페이지를 열고 로드 모듈 데이터 세트가
올바른 로드 모듈 데이터 세트인지 확인하십시오.
- 필요한 DB2® 및 Language Environment®(LE)
데이터 세트를 링크 라이브러리에 추가하십시오.
- 런타임 옵션 특성 페이지를 열고
단계 이름 RUN을 클릭하십시오. 단계 옵션 영역이 열립니다.
- 편집 단추를 클릭하고
프로시저 이름을 ELAXFTSO로 변경하십시오.
- 디버거와 함께 일괄처리로 실행 단일 선택 단추를 선택하십시오.
- 추가 JCL을 다음과 같이 변경하십시오.
//******* ADDITIONAL RUNTIME JCL HERE ******
//TSOGO.SYSTSIN DD *
DSN SYSTEM(DB2SUBSYSTEMNAME)
RUN PROGRAM(RDZDB2) -
PLAN(PLANNAME) -
LIB('USERID.LOAD')
/*
- 특성 그룹 편집기의 어셈블러 탭에서
ELAXFASM을 펼치고 단계 이름 ASM을
클릭하십시오.
- 오브젝트 데크 데이터 세트 및 매크로 라이브러리 옵션에
지정된 데이터 세트가 있는지 확인하십시오.
- 특성 그룹을 닫은 후 저장하십시오.
- z/OS® 프로젝트 보기에서
RDZDB2 프로그램을 마우스 오른쪽 단추로 클릭하고
JCL 생성 > 컴파일 링크 실행용을 선택하십시오.