On Fri, 16 Dec 2005 14:17:54 -0200, Jorge Arueira Campos <[EMAIL PROTECTED]>
wrote:

>Hi
>
>I execute the program of CBTAPE VSAMPGM and i received the return code
>below:
>
>Can anybody  help me ?
>
>Thanks
>
>Jorge Arueira Campos
>Support Z/os
>55-11-3685-6991
>CAIXA ECONOMICA FEDERAL
>São Paulo - Brazil
>
>
>                   J E S 2  J O B  L O G  --  S Y S T E M  S S P 1  --  N O
>D E  S U P S P
>
>
>17.43.48 JOB08873 ---- THURSDAY,  15 DEC 2005 ----
>17.43.48 JOB08873  IRR010I  USERID P991107  IS ASSIGNED TO THIS JOB.
>17.43.48 JOB08873  ICH70001I P991107  LAST ACCESS AT 17:43:25 ON THURSDAY,
>DECEMBER 15, 2005
>17.43.48 JOB08873  $HASP373 CICSUPVS STARTED - INIT 2    - CLASS J - SYS
>SSP1
>17.43.48 JOB08873  IEF403I CICSUPVS - STARTED - TIME=17.43.48
>17.43.48 JOB08873  -
>--TIMINGS (MINS.)--            ----PAGING COUNTS---
>17.43.48 JOB08873  -JOBNAME  STEPNAME PROCSTEP    RC   EXCP   CONN    TCB
>SRB  CLOCK   SERV  PG  PAGE  SWAP   VIO SWAPS
>17.43.48 JOB08873  -CICSUPVS STEP01                              20
>112    115    .00    .00     .0    198   0     0     0     0     0
>17.43.48 JOB08873  IEF404I CICSUPVS - ENDED - TIME=17.43.48
>17.43.48 JOB08873  -CICSUPVS ENDED.  NAME-SERGIO               TOTAL TCB CPU
>TIME=   .00  TOTAL ELAPSED TIME=    .0
>17.43.48 JOB08873  $HASP395 CICSUPVS ENDED
>
>------ JES2 JOB STATISTICS ------
>
>  15 DEC 2005 JOB EXECUTION DATE
>
>           14 CARDS READ
>
>           72 SYSOUT PRINT RECORDS
>
>            0 SYSOUT PUNCH RECORDS
>
>            4 SYSOUT SPOOL KBYTES
>
>         0.00 MINUTES EXECUTION TIME
>
>        2 //STEP01   EXEC PGM=VSAMPGM,PARM='FTESTP991107 P991107VU'
>        3 //STEPLIB  DD   DSN=SUP.ASSEMBL.LOAD,DISP=SHR
>        4 //DSNLIST  DD   DSN=P991107.SUP.CICS.LIXO1,DISP=SHR
>        5 //ISPLLIB  DD   DSN=SUP.ASSEMBL.LOAD,DISP=SHR
>        6 //ISPSLIB  DD   DSN=ISP.SISPSLIB,DISP=SHR
>        7 //ISPPLIB  DD   DSN=CEFS1.ISPPLIB,DISP=SHR
>        8 //SYSPRINT DD   SYSOUT=*
>        9 //EXCPRPT  DD   SYSOUT=*
>       10 //LISTCAT  DD   SYSOUT=*
>       11 //CHNGRPT  DD   SYSOUT=*
>       12 //REGISET  DD   DUMMY
>       13 //SYSIN    DD   *
>ICH70001I P991107  LAST ACCESS AT 17:43:25 ON THURSDAY, DECEMBER 15, 2005
>IEF236I ALLOC. FOR CICSUPVS STEP01
>IEF237I 625B ALLOCATED TO STEPLIB
>IEF237I 6124 ALLOCATED TO DSNLIST
>IEF237I 625B ALLOCATED TO ISPLLIB
>IEF237I 652E ALLOCATED TO ISPSLIB
>IEF237I 6741 ALLOCATED TO ISPPLIB
>IEF237I JES2 ALLOCATED TO SYSPRINT
>IEF237I JES2 ALLOCATED TO EXCPRPT
>IEF237I JES2 ALLOCATED TO LISTCAT
>IEF237I JES2 ALLOCATED TO CHNGRPT
>IEF237I DMY  ALLOCATED TO REGISET
>IEF237I JES2 ALLOCATED TO SYSIN
>IEF142I CICSUPVS STEP01 - STEP WAS EXECUTED - COND CODE 0020
>IEF285I   SUP.ASSEMBL.LOAD                             KEPT
>IEF285I   VOL SER NOS= PSB002.
>IGD104I P991107.SUP.CICS.LIXO1                       RETAINED,
>DDNAME=DSNLIST
>IEF285I   SUP.ASSEMBL.LOAD                             KEPT
>IEF285I   VOL SER NOS= PSB002.
>IEF285I   ISP.SISPSLIB                                 KEPT
>IEF285I   VOL SER NOS= RESS11.
>IEF285I   CEFS1.ISPPLIB                                KEPT
>IEF285I   VOL SER NOS= CATS10.
>IEF285I   P991107.CICSUPVS.JOB08873.D0000102.?         SYSOUT
>IEF285I   P991107.CICSUPVS.JOB08873.D0000103.?         SYSOUT
>IEF285I   P991107.CICSUPVS.JOB08873.D0000104.?         SYSOUT
>IEF285I   P991107.CICSUPVS.JOB08873.D0000105.?         SYSOUT
>IEF285I   P991107.CICSUPVS.JOB08873.D0000101.?         SYSIN
>IEF373I STEP/STEP01  /START 2005349.1743
>IEF374I STEP/STEP01  /STOP  2005349.1743 CPU    0MIN 00.01SEC SRB    0MIN
>00.00SEC VIRT   364K SYS   328K EXT     536K SYS   10460K
>IEF375I  JOB/CICSUPVS/START 2005349.1743
>IEF376I  JOB/CICSUPVS/STOP  2005349.1743 CPU    0MIN 00.01SEC SRB    0MIN
>00.00SEC
>1  VSAMPGM                                       VSAM FILE ANALYSIS
>ROUTINE                           12/15/05          PAGE    1
>                                           VSAM SPACE MANAGEMENT-CHANGE AND
>SAVINGS REPORT
>0                                                  OLD VALUE
>NEW VALUE               DELTA
>0  TOTAL DOLLARS FOR THIS RUN:
>$0.00                    $0.00               $0.00
>   TOTAL CYLINDERS THIS RUN:
>0                        0                   0
>

Did you read the $$DOC member?  It has sample JCL for running the program in
batch mode.  Since this is an ISPF module, it will need to be executed under
a TSO environment with the appropriate setup for executing ISPF in batch.

Give that method a try and let us know how it works.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to