Observe as declarações a seguir:
//COMP JOB
//COMPILE EXEC IGYWC
//SYSIN DD *
IDENTIFICATION DIVISION (source program)
.
/*
//
//COMPILE EXEC IGYWC
//SYSIN DD *
IDENTIFICATION DIVISION (source program)
.
/*
//
------------------------------------------------------------------
//IGYWC PROC
LNGPRFX='IGY.V3R2M0',SYSLBLK=3200
//*
//* COMPILE A COBOL PROGRAM
//*
//* PARAMETER DEFAULT VALUE
//* SYSLBLK 3200
//* LNGPRFX IGY.V3R2M0
//*
//* CALLER MUST SUPPLY //COBOL.SYSIN DD . . .
//*
//COBOL EXEC PGM=IGYCRCTL,REGION=2048K
//STEPLIB DD DSNAME=&LNGPRFX..SIGYCOMP,
// DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSLIN DD DSNAME=&&LOADSET,UNIT=SYSDA,
// DISP=(MOD,PASS),SPACE=(TRK,(3,3)),
// DCB=(BLKSIZE=&SYSLBLK)
//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT5 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT6 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT7 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
------------------------------------------------------------------
//IGYWC PROC
LNGPRFX='IGY.V3R2M0',SYSLBLK=3200
//*
//* COMPILE A COBOL PROGRAM
//*
//* PARAMETER DEFAULT VALUE
//* SYSLBLK 3200
//* LNGPRFX IGY.V3R2M0
//*
//* CALLER MUST SUPPLY //COBOL.SYSIN DD . . .
//*
//COBOL EXEC PGM=IGYCRCTL,REGION=2048K
//STEPLIB DD DSNAME=&LNGPRFX..SIGYCOMP,
// DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSLIN DD DSNAME=&&LOADSET,UNIT=SYSDA,
// DISP=(MOD,PASS),SPACE=(TRK,(3,3)),
// DCB=(BLKSIZE=&SYSLBLK)
//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT5 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT6 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT7 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
------------------------------------------------------------------
Qual será o resultado a ser armazenado no cartão: //SYSLIN?
Provas
Questão presente nas seguintes provas
Analista de Produção Júnior - Administração
50 Questões