13.02.2018 Views

CURSO_zOS_FUND

  • No tags were found...

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

1.4 Browsing de un Data Set (OPCION 1)<br />

Cuando se selecciona la OPCION 1 del menú principal deiiSPF, el siguiente Panel es desplegado.<br />

+----------------------------------------------------------------------------------+<br />

------------------------- BROWSE - ENTRY PANEL ------------------------------<br />

COMMAND ===><br />

ISPF LIBRARY:<br />

PROJECT ===> ISPFDEMO<br />

GROUP ===> XXX<br />

TYPE ===> COBOL<br />

MEMBER ===> CBLMAIN<br />

===><br />

===> ===><br />

(Blank or pattern for member selection list)<br />

OTHER PARTITIONED OR SEQUENTIAL DATA SET:<br />

DATA SET NAME ===><br />

VOLUME SERIAL ===> (If not cataloged)<br />

DATA SET PASSWORD ===><br />

(If password protected)<br />

MIXED MODE<br />

===> NO<br />

(Specify YES or NO)<br />

FORMAT NAME ===><br />

+----------------------------------------------------------------------------------+<br />

Después de llenados tos campos con la información requerida y Tecleado ENTER, el<br />

siguiente panel mostrando el contenido del member 'CBLMAIN' será desplegado por el ISPF<br />

PANEL DE DESPLIEGUE DE DATOS DE LA OPCIÓN BROWSE<br />

+----------------------------------------------------------------------------------+<br />

BROWSE -- ISPFDEMO.XXX.COBOL(CBLMAIN) - 01.01 ------ LINE 00000000 COL 001 080<br />

COMMAND ===><br />

SCROLL ===> PAGE<br />

********************************* TOP OF DATA *********************************<br />

IDENTIFICATION DIVISION. PROGRAM -<br />

ID. 'F20D1000'.<br />

DATE - COMPILED. OCT. 20, 1996<br />

ENVIRONMENT DIVISION.<br />

CONFIGURATION SECTION. SOURCE -<br />

COMPUTER. IBM-370. OBJECT - COMPUTER.<br />

IBM - 370.<br />

INPUT - OUTPUT SECTION.<br />

FILE - CONTROL.<br />

SELECT OLD - COMREC ASSIGN TO DA - S - DD1.<br />

SELECT D1 - REPORTS ASSIGN TO UR - S - D10UT.<br />

SELECT OPTION - CARD - FILE ASSIGN TO UR - S - SYSIN.<br />

DATA DIVISION.<br />

FILE SECTION.<br />

FD OLD - COMREC<br />

LABEL RECORD IS STANDARD<br />

RECORDING MODE IS F<br />

BLOCK CONTAINS O RECORDS<br />

DATA RECORD IS COMREC1.<br />

01 COMRECl.<br />

02 DUMMY PICTURE X(520).<br />

+----------------------------------------------------------------------------------+<br />

Página 83 de 105

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!