Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

How to avoid SB37 abend in ICETOOL?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
Ramanan-R

New User


Joined: 21 Mar 2007
Posts: 66
Location: Chennai, Tamilnadu, India

PostPosted: Thu Oct 25, 2007 8:52 pm    Post subject: How to avoid SB37 abend in ICETOOL?
Reply with quote

Hi All,

I tried all the suggestions given in this forum, but none is working for me.

Code:

ICE185A 0 DFSORT TERMINATED WITH SB37  ABEND DURING PHASE C 3


I'm getting the above message.

I tried giving SPACE=(TRK,(999,999)), SPACE=(CYL,(999,999)) and VOL=(,,,10). Should i use any parm with ICETOOL?

Please let me know your suggestions.

Ramanan R
Back to top
View user's profile Send private message

Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Thu Oct 25, 2007 9:16 pm    Post subject:
Reply with quote

You haven't given any information that identifies the data set which got the B37 or what you're doing.

Show your JCL and your JES, //TOOLMSG and //DFSMSG output.
Back to top
View user's profile Send private message
Ramanan-R

New User


Joined: 21 Mar 2007
Posts: 66
Location: Chennai, Tamilnadu, India

PostPosted: Thu Oct 25, 2007 9:31 pm    Post subject:
Reply with quote

Frank,

Please find the details below,

JCL:

Code:

//STEP020  EXEC  PGM=ICETOOL                                     
//TOOLMSG  DD SYSOUT=*                                           
//DFSMSG   DD SYSOUT=*                                           
//IN1      DD DSN=USER.INPUT1,     
//         DISP=SHR                                             
//IN2      DD DSN=USER.INPUT2,                   
//         DISP=SHR                                             
//T1       DD DSN=&&T1,UNIT=DISK,SPACE=(CYL,(999,999),RLSE),
//         DISP=(,PASS),VOL=(,,,10)                         
//T2       DD DSN=&&T2,UNIT=DISK,SPACE=(CYL,(999,999),RLSE),
//         DISP=(,PASS),VOL=(,,,10)                         
//T3       DD DSN=&&T3,UNIT=DISK,SPACE=(CYL,(999,999),RLSE),
//         DISP=(,PASS),VOL=(,,,10)                         
//CONCT1   DD DSN=*.T1,VOL=REF=*.T1,DISP=(OLD,PASS)             
//         DD DSN=*.T2,VOL=REF=*.T2,DISP=(OLD,PASS)             
//OUT      DD DSN=USER.FORMATED,           
//         DISP=(NEW,CATLG,DELETE),                             
//         UNIT=DISK,                                           
//         SPACE=(CYL,(100,100),RLSE),                           
//         VOL=(,,,10),                                         
//         DCB=(LRECL=600,RECFM=FB)                             
//TOOLIN   DD    *                                   
COPY FROM(IN1) TO(T1) USING(CTL1)                     
COPY FROM(IN2) TO(T2) USING(CTL2)                     
SPLICE FROM(CONCT1) TO(T3) ON(601,8,ZD) WITH(1,1)     
SELECT FROM(T3) TO(OUT) ON(601,8,ZD) FIRST USING(CTL3)
/*                                                   
//CTL1CNTL DD *                                       
  INREC OVERLAY=(601:SEQNUM,8,ZD)                     
/*                                                   
//CTL2CNTL DD *                                       
  INREC OVERLAY=(601:SEQNUM,8,ZD)                     
/*                                                   
//CTL3CNTL DD *                                       
  OUTREC FIELDS=(1,600)                               
/*                                                   
//*                                                   


TOOLMSG:

Code:

ICE600I 0 DFSORT ICETOOL UTILITY RUN STARTED                                   
                                                                               
ICE650I 0 VISIT http://www.ibm.com/storage/dfsort FOR ICETOOL PAPERS, EXAMPLES A
                                                                               
ICE632I 0 SOURCE FOR ICETOOL STATEMENTS:  TOOLIN                               
                                                                               
                                                                               
ICE630I 0 MODE IN EFFECT:  STOP                                                 
                                                                               
          COPY FROM(IN1) TO(T1) USING(CTL1)                                     


DFSMSG:

Code:

ICE200I 0 IDENTIFIER FROM CALLING PROGRAM IS 0001                               
ICE143I 0 BLOCKSET     COPY  TECHNIQUE SELECTED                                 
ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES AN
ICE000I 0 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R5 - 08:33 ON THU OCT
            INREC OVERLAY=(601:SEQNUM,8,ZD)                                     
ICE146I 0 END OF STATEMENTS FROM CTL1CNTL - PARAMETER LIST STATEMENTS FOLLOW   
          DEBUG NOABEND,ESTAE                                                   
          OPTION MSGDDN=DFSMSG,LIST,MSGPRT=ALL,RESINV=0,SORTDD=CTL1,SORTIN=IN1,S
                         RTOUT=T1,DYNALLOC                                     
          SORT FIELDS=COPY                                                     
ICE201I 0 RECORD TYPE IS F - DATA STARTS IN POSITION 1                         
ICE751I 0 C5-K05352 C6-Q95214 C7-K90000 C8-K05352 E9-K06751 C9-BASE   E5-K10929
ICE193I 0 ICEAM2 ENVIRONMENT IN EFFECT - ICEAM2 INSTALLATION MODULE SELECTED   
ICE088I 0 BRARTTF3.STEP020 .        , INPUT LRECL = 1200, BLKSIZE = 22800, TYPE
ICE093I 0 MAIN STORAGE = (MAX,6291456,6291456)                                 
ICE156I 0 MAIN STORAGE ABOVE 16MB = (6234096,6234096)                           
ICE127I 0 OPTIONS: OVFLO=RC0 ,PAD=RC0 ,TRUNC=RC0 ,SPANINC=RC16,VLSCMP=N,SZERO=Y,
ICE128I 0 OPTIONS: SIZE=6291456,MAXLIM=1048576,MINLIM=450560,EQUALS=N,LIST=Y,ERE
ICE129I 0 OPTIONS: VIO=N,RESDNT=ALL ,SMF=NO   ,WRKSEC=Y,OUTSEC=Y,VERIFY=N,CHALT=
ICE130I 0 OPTIONS: RESALL=4096,RESINV=0,SVC=109 ,CHECK=Y,WRKREL=Y,OUTREL=Y,CKPT=
ICE131I 0 OPTIONS: TMAXLIM=6291456,ARESALL=0,ARESINV=0,OVERRGN=16384,CINV=Y,CFW=
ICE132I 0 OPTIONS: VLSHRT=N,ZDPRINT=Y,IEXIT=N,TEXIT=N,LISTX=N,EFS=NONE    ,EXITC
ICE133I 0 OPTIONS: HIPRMAX=OPTIMAL,DSPSIZE=MAX ,ODMAXBF=0,SOLRF=Y,VLLONG=N,VSAMI
ICE235I 0 OPTIONS: NULLOUT=RC0                                                 
ICE084I 0 EXCP ACCESS METHOD USED FOR T1                                       
ICE084I 0 EXCP ACCESS METHOD USED FOR IN1                                       
ICE751I 2 EF-K10929 F0-Q84357 DA-K90000                                         
ICE185A 0 DFSORT TERMINATED WITH SB37  ABEND DURING PHASE C 3                   


Thanks.

Regards,
Ramanan R
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Thu Oct 25, 2007 10:12 pm    Post subject:
Reply with quote

You didn't show the JES messages that identify the data set that got the B37, but it appears from the other messages that it's the T1 data set.

It appears to be a case of just not having enough space for the T1 output records. It may be that the volumes selected just don't have the needed space available. I'm not an expert on this kind of thing, so maybe somebody else has some ideas.

For referenace, approx. how many records does IN1 have? IN2?

I did notice a few things though:

You seem to only need 600 bytes of the 1200 byte records. So you could cut down the amount of space needed by changing your INREC statements to:

Code:

//CTL1CNTL DD *                                       
  INREC BUILD=(1,600,601:SEQNUM,8,ZD)                     
/*                                                   
//CTL2CNTL DD *                                       
  INREC BUILD=(1,600,601:SEQNUM,8,ZD)                     
/*                           


With OVERLAY, the records will still be 1200 bytes. With BUILD, the records will be 608 bytes.

Code:

//CONCT1   DD DSN=*.T1,VOL=REF=*.T1,DISP=(OLD,PASS)             
//         DD DSN=*.T2,VOL=REF=*.T2,DISP=(OLD,PASS)   


Using concatenation with referback this way can cause loss of data due to a system restriction. It would be better to make T1 a MOD data set, do the COPY for IN1 and IN2 to T1 and eliminate T2.

Code:

...
//T1       DD DSN=&&T1,UNIT=DISK,SPACE=(CYL,(999,999),RLSE),
//         DISP=(MOD,PASS),VOL=(,,,10)             
//T3       DD DSN=&&T3,UNIT=DISK,SPACE=(CYL,(999,999),RLSE),
//         DISP=(,PASS),VOL=(,,,10) 
...
COPY FROM(IN1) TO(T1) USING(CTL1)                     
COPY FROM(IN2) TO(T1) USING(CTL2)                     
SPLICE FROM(T1) TO(T3) ON(601,8,ZD) WITH(1,1)


I'm not sure if this will help or hurt with your space problem, but it will avoid the system restriction that causes data loss.
Back to top
View user's profile Send private message
Ramanan-R

New User


Joined: 21 Mar 2007
Posts: 66
Location: Chennai, Tamilnadu, India

PostPosted: Fri Oct 26, 2007 11:08 am    Post subject:
Reply with quote

Frank,

Thanks for your suggestions.

I tried by making the changes you mentioned, but problem still persists.

There are around 4 million records in both the input files.

JCL:

Code:

//STEP020  EXEC  PGM=ICETOOL                                     
//TOOLMSG  DD SYSOUT=*                                           
//DFSMSG   DD SYSOUT=*                                           
//IN1      DD DSN=USER.INPUT1,     
//         DISP=SHR                                             
//IN2      DD DSN=USER.INPUT2,                   
//         DISP=SHR                                             
//T1       DD DSN=&&T1,UNIT=DISK,SPACE=(CYL,(999,999)),
//         DISP=(MOD,PASS),VOL=(,,,10)                 
//T2       DD DSN=&&T2,UNIT=DISK,SPACE=(CYL,(999,999)),
//         DISP=(NEW,PASS),VOL=(,,,10)                 
//OUT      DD DSN=USER.FORMATED,           
//         DISP=(NEW,CATLG,DELETE),                             
//         UNIT=DISK,                                           
//         SPACE=(CYL,(100,100),RLSE),                           
//         VOL=(,,,10),                                         
//         DCB=(LRECL=600,RECFM=FB)                             
//TOOLIN   DD    *                                   
  COPY FROM(IN1) TO(T1) USING(CTL1)                     
  COPY FROM(IN2) TO(T1) USING(CTL2)                     
  SPLICE FROM(T1) TO(T2) ON(601,8,ZD) WITH(1,1)         
  SELECT FROM(T2) TO(OUT) ON(601,8,ZD) FIRST USING(CTL3)
/*                                                   
//CTL1CNTL DD *                                       
   INREC BUILD=(1,600,601:SEQNUM,8,ZD)
/*                                                   
//CTL2CNTL DD *                                       
   INREC BUILD=(1,600,601:SEQNUM,8,ZD) 
/*                                                   
//CTL3CNTL DD *                                       
  OUTREC BUILD=(1,600)                               
/*                                                   
//*                                                   


Can anyone help me on this?

Thanks.

Regards,
Ramanan R
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Fri Oct 26, 2007 11:18 am    Post subject: Reply to: How to avoid SB37 abend in ICETOOL?
Reply with quote

As Frank asked earlier, why can't you provide the entire job output ? JES messages etc


Gerry
Back to top
View user's profile Send private message
Ramanan-R

New User


Joined: 21 Mar 2007
Posts: 66
Location: Chennai, Tamilnadu, India

PostPosted: Fri Oct 26, 2007 4:01 pm    Post subject:
Reply with quote

Please find the entire JES output below,

Code:

1                      J E S 2  J O B  L O G  --  S Y S T E M  C P U 0  --  N O D E  T E M P
0
 22.25.15 J1234567 ---- THURSDAY,  25 OCT 2007 ----
 22.25.15 J1234567  $HASP373 TESTJOB STARTED - INIT 65   - CLASS A - SYS CPU1
 22.25.15 J1234567  ACF9CCCD USERID USER   IS ASSIGNED TO THIS JOB - TESTJOB
 22.25.15 J1234567  IEF403I TESTJOB - STARTED
 22.25.15 J1234567  SVM3482I TESTJOB, STEP010, DSN1, OUTPUT.FORMATED HANDLED BY MODDELET
 22.25.17 J1234567  ACF99900 ACF2 LOGGING-08,06,USER,PUB104,OUTPUT.FORMATED,N/A
 22.25.18 J1234567  ACF99900 ACF2 LOGGING-08,08,USER,PUB104,OUTPUT.FORMATED,N/A
 22.25.18 J1234567  - CHN-SC Z/OS 1.7 JOB SUMMARY STATISTICS   ------TIMINGS (SECONDS)------- -- PERFORMANCE -- - PAGING

COUNTS -
 22.25.18 J1234567  -STEPNAME PROCSTEP PROGRAM     RC   EXCP        CPU        SRB      CLOCK   SERV SRVCLASS PAGE SWAP  VIO

SWAP
 22.25.18 J1234567  -STEP010  DELETE   IEFBR14     00      4        .00        .00       3.49    234 1           0    0    0 

  0
 22.25.28 J1234567  ACF99900 ACF2 LOGGING-08,06,USER,PRD9J5,OUTPUT.FORMATED,N/A
 22.29.33 J1234567  SVM4000I TESTJOB, STEP020, T1, ATTEMPTING SPACVOLA FOR SYS07298.T222515.RA000.TESTJOB.T1.H01, PUB109, 4
 22.29.33 J1234567  SVM4452I RECOVERY TERMINATED: DATA SET BEING PROCESSED BY EXCP
 22.29.33 J1234567  SVM4000I TESTJOB, STEP020, T1, ATTEMPTING SPACVOLA FOR SYS07298.T222515.RA000.TESTJOB.T1.H01, PUB109, 4
 22.29.33 J1234567  SVM4452I RECOVERY TERMINATED: DATA SET BEING PROCESSED BY EXCP
 22.29.33 J1234567  IEC030I B37-04,IFG0554A,TESTJOB,STEP020,T1,1109,PUB109,E6002130,SYS07298.T222515.RA000.TESTJOB.T1.H01
 22.29.33 J1234567  IEA995I SYMPTOM DUMP OUTPUT  309
    309             SYSTEM COMPLETION CODE=B37  REASON CODE=00000004
    309              TIME=22.29.33  SEQ=32560  CPU=0000  ASID=0095
    309              PSW AT TIME OF ERROR  075C1000   80DFECDE  ILC 2  INTC 0D
    309                NO ACTIVE MODULE FOUND
    309                NAME=UNKNOWN
    309                DATA AT PSW  00DFECD8 - 41003846  0A0DB20A  00509808
    309                GR 0: 00DFEEE8   1: A4B37000
    309                   2: 0000DD50   3: 00DFE6A2
    309                   4: 009BE420   5: 00E14000
    309                   6: 009BE6C4   7: 009BE71C
    309                   8: 009BE6E4   9: 009BF4F8
    309                   A: 009E6BA8   B: 009BFEC8
    309                   C: 009A908C   D: 00000008
    309                   E: 00DFEB04   F: 00000004
    309              END OF SYMPTOM DUMP
 22.29.34 J1234567  IEF450I TESTJOB STEP020 - ABEND=SB37 U0000 REASON=00000004
 22.29.34 J1234567  ACF99900 ACF2 LOGGING-08,08,USER,PRD9J5,OUTPUT.FORMATED,N/A
 22.29.34 J1234567  -STEP020           ICETOOL  *SB37   5388      17.79       1.61     255.91  1908K 1           0    0    0 

  0
 22.29.34 J1234567  IEF404I TESTJOB - ENDED
 22.29.34 J1234567  -TESTJOB ENDED.  NAME-RAMANAN R            TOTAL CPU TIME=     17.79     TOTAL ELAPSED TIME=    259.80
 22.29.34 J1234567  $HASP395 TESTJOB ENDED
0------ JES2 JOB STATISTICS ------
-  25 OCT 2007 JOB EXECUTION DATE
-           40 CARDS READ
-          590 SYSOUT PRINT RECORDS
-            0 SYSOUT PUNCH RECORDS
-           47 SYSOUT SPOOL KBYTES
-         4.33 MINUTES EXECUTION TIME
           //TESTJOB JOB (USER,USER),'RAMANAN R',                             J1234567
           //         CLASS=A,MSGCLASS=T,TIME=NOLIMIT,
           //         NOTIFY=USER
           //* $ACFJ219 ACF2 ACTIVE CHHN                                              ACF2
           //**
           //STEP010  EXEC DLT,
           //         DSN1='OUTPUT.FORMATED'
         
           //DELETE      EXEC PGM=IEFBR14,REGION=6144K
           //DSN1        DD DSN=OUTPUT.FORMATED,DISP=(MOD,DELETE),
           //            UNIT=(SYSALLDA,,DEFER),SPACE=(TRK,0)
           //**
           //STEP020  EXEC  PGM=ICETOOL
           //TOOLMSG  DD SYSOUT=*
           //DFSMSG   DD SYSOUT=*
           //IN1      DD DSN=J063SC.F063SCHY.TFBBBDNC.UNLOAD.FY06DATA,
           //         DISP=SHR
           //IN2      DD DSN=J481SC.USER.REFORMAT.DATA,
           //         DISP=SHR
           //T1       DD DSN=&&T1,UNIT=DISK,SPACE=(CYL,(999,999)),
           //         DISP=(MOD,PASS),VOL=(,,,10)
           //T2       DD DSN=&&T2,UNIT=DISK,SPACE=(CYL,(999,999)),
           //         DISP=(NEW,PASS),VOL=(,,,10)
           //OUT      DD DSN=OUTPUT.FORMATED,
           //         DISP=(NEW,CATLG,DELETE),
           //         UNIT=DISK,
           //         SPACE=(CYL,(999,999),RLSE),
           //         VOL=(,,,10),
           //         DCB=(LRECL=600,BLKSIZE=0,RECFM=FB)
           //TOOLIN   DD    *
           //CTL1CNTL DD *
           //CTL2CNTL DD *
           //CTL3CNTL DD *
           //*
  STMT NO. MESSAGE
          ACF99900 ACF2 LOGGING-08,06,USER,PUB104,OUTPUT.FORMATED,N/A
 IEF236I ALLOC. FOR TESTJOB DELETE STEP010
 IGD100I 1104 ALLOCATED TO DDNAME DSN1     DATACLAS (        )
 ACF99900 ACF2 LOGGING-08,08,USER,PUB104,OUTPUT.FORMATED,N/A
 IEF142I TESTJOB DELETE STEP010 - STEP WAS EXECUTED - COND CODE 0000
 IEF285I   OUTPUT.FORMATED           DELETED
 IEF285I   VOL SER NOS= PUB104.
 ****************************************************************************************************************************
 * DDNAME     UNIT       EXCPS BLKSIZE     
 * DSN1     D-1104           0     N/A     
 ****************************************************************************************************************************
 IEF373I STEP/DELETE  /START 2007298.2225
 IEF374I STEP/DELETE  /STOP  2007298.2225 CPU    0MIN 00.00SEC SRB    0MIN 00.00SEC VIRT     4K SYS   356K EXT       4K SYS   

26512K
 ACF99900 ACF2 LOGGING-08,06,USER,PRD9J5,OUTPUT.FORMATED,N/A
 IEF236I ALLOC. FOR TESTJOB STEP020
 IEF237I JES2 ALLOCATED TO TOOLMSG
 IEF237I JES2 ALLOCATED TO DFSMSG
 IEF237I 0F61 ALLOCATED TO IN1
 IEF237I 072A ALLOCATED TO IN1
 IEF237I 096E ALLOCATED TO IN1
 IEF237I 0877 ALLOCATED TO IN1
 IEF237I 085F ALLOCATED TO IN1
 IEF237I 084A ALLOCATED TO IN1
 IEF237I 0839 ALLOCATED TO IN1
 IEF237I 0702 ALLOCATED TO IN2
 IEF237I 1061 ALLOCATED TO IN2
 IEF237I 1062 ALLOCATED TO IN2
 IEF237I 1063 ALLOCATED TO IN2
 IEF237I 1064 ALLOCATED TO IN2
 IGD100I 1109 ALLOCATED TO DDNAME T1       DATACLAS (        )
 IGD100I 1106 ALLOCATED TO DDNAME T2       DATACLAS (        )
 IGD100I 0645 ALLOCATED TO DDNAME OUT      DATACLAS (        )
 IEF237I JES2 ALLOCATED TO TOOLIN
 IEF237I JES2 ALLOCATED TO CTL1CNTL
 IEF237I JES2 ALLOCATED TO CTL2CNTL
 IEF237I JES2 ALLOCATED TO CTL3CNTL
 IEC030I B37-04,IFG0554A,TESTJOB,STEP020,T1,1109,PUB109,E6002130,SYS07298.T222515.RA000.TESTJOB.T1.H01
 IEA995I SYMPTOM DUMP OUTPUT
 SYSTEM COMPLETION CODE=B37  REASON CODE=00000004
  TIME=22.29.33  SEQ=32560  CPU=0000  ASID=0095
  PSW AT TIME OF ERROR  075C1000   80DFECDE  ILC 2  INTC 0D
    NO ACTIVE MODULE FOUND
    NAME=UNKNOWN
    DATA AT PSW  00DFECD8 - 41003846  0A0DB20A  00509808
    GR 0: 00DFEEE8   1: A4B37000
       2: 0000DD50   3: 00DFE6A2
       4: 009BE420   5: 00E14000
       6: 009BE6C4   7: 009BE71C
       8: 009BE6E4   9: 009BF4F8
       A: 009E6BA8   B: 009BFEC8
       C: 009A908C   D: 00000008
       E: 00DFEB04   F: 00000004
  END OF SYMPTOM DUMP
 IEF237I JES2 ALLOCATED TO SORTSNAP
 ACF99900 ACF2 LOGGING-08,08,USER,PRD9J5,OUTPUT.FORMATED,N/A
 IEF472I TESTJOB STEP020 - COMPLETION CODE - SYSTEM=B37 USER=0000 REASON=00000004
 IEF285I   USER.TESTJOB.J1234567.D0000105.?          SYSOUT
 IEF285I   USER.TESTJOB.J1234567.D0000106.?          SYSOUT
 IEF285I   J063SC.F063SCHY.TFBBBDNC.UNLOAD.FY06DATA     KEPT
 IEF285I   VOL SER NOS= PRD9C3,PRD9FE,PRD9G6,PRD9D9,PRD9F4,
 IEF285I   VOL SER NOS= PRD9E2,PRD9R7.
 IEF285I   J481SC.USER.REFORMAT.DATA                  KEPT
 IEF285I   VOL SER NOS= PRD9ZF,PRD9Z8,PRD9Z9,PRD9ZA,PRD9ZB.
 IEF285I   OUTPUT.FORMATED           DELETED
 IEF285I   VOL SER NOS= PRD9J5.
 IEF285I   USER.TESTJOB.J1234567.D0000101.?          SYSIN
 IEF285I   USER.TESTJOB.J1234567.D0000102.?          SYSIN
 IEF285I   USER.TESTJOB.J1234567.D0000103.?          SYSIN
 IEF285I   USER.TESTJOB.J1234567.D0000104.?          SYSIN
 IEF285I   USER.TESTJOB.J1234567.D0000107.?          SYSOUT
 ****************************************************************************************************************************
 * DDNAME     UNIT       EXCPS BLKSIZE      DDNAME     UNIT       EXCPS BLKSIZE      DDNAME     UNIT       EXCPS BLKSIZE    *
 * TOOLMSG  X/JES          N/A     N/A      DFSMSG   X/JES          N/A     N/A      IN1      D-0F61         127   22800    *
 * IN1      D-072A         143   22800      IN1      D-096E         833   22800      IN1      D-0877         310   22800    *
 * IN1      D-085F         833   22800      IN1      D-084A         122   22800      IN1      D-0839         215   22800    *
 * IN2      D-0702          40    6000      IN2      D-1061         150    6000      IN2      D-1062         267    6000    *
 * IN2      D-1063         239    6000      IN2      D-1064           0    6000      T1       D-1109       1,968   27968    *
 * T2       D-1106           0     N/A      OUT      D-0645           0     N/A      TOOLIN   X/JES          N/A     N/A    *
 * CTL1CNTL X/JES          N/A     N/A      CTL2CNTL X/JES          N/A     N/A      CTL3CNTL X/JES          N/A     N/A    *
 * SORTSNAP X/JES          N/A     N/A                                                                                      *
 ****************************************************************************************************************************
 *             TOTAL            DISK            TAPE             VIO           OTHER                                        *
 * EXCPS       5,388           5,247               0               0             141                                        *
 ****************************************************************************************************************************
 IEF373I STEP/STEP020 /START 2007298.2225
 IEF374I STEP/STEP020 /STOP  2007298.2229 CPU    0MIN 17.79SEC SRB    0MIN 01.61SEC VIRT  1108K SYS   400K EXT    6196K SYS   

26768K
 IEF237I 1109 ALLOCATED TO SYS00001
 IEF285I   SYS07298.T222934.RA000.TESTJOB.R0172058     KEPT
 IEF285I   VOL SER NOS= PUB109.
 IEF285I   SYS07298.T222515.RA000.TESTJOB.T1.H01       DELETED
 IEF285I   VOL SER NOS= PUB109.
 IEF237I 1106 ALLOCATED TO SYS00002
 IEF285I   SYS07298.T222934.RA000.TESTJOB.R0172059     KEPT
 IEF285I   VOL SER NOS= PUB106.
 IEF285I   SYS07298.T222515.RA000.TESTJOB.T2.H01       DELETED
 IEF285I   VOL SER NOS= PUB106.
 IEF375I  JOB/TESTJOB/START 2007298.2225
 IEF376I  JOB/TESTJOB/STOP  2007298.2229 CPU    0MIN 17.79SEC SRB    0MIN 01.61SEC
1ICE600I 0 DFSORT ICETOOL UTILITY RUN STARTED

 ICE650I 0 VISIT http://www.ibm.com/storage/dfsort FOR ICETOOL PAPERS, EXAMPLES AND MORE

 ICE632I 0 SOURCE FOR ICETOOL STATEMENTS:  TOOLIN


 ICE630I 0 MODE IN EFFECT:  STOP

           COPY FROM(IN1) TO(T1) USING(CTL1)
 ICE606I 0 DFSORT CALL 0001 FOR COPY FROM IN1      TO T1       USING CTL1CNTL COMPLETED
 ICE602I 0 OPERATION RETURN CODE:  00

           COPY FROM(IN2) TO(T1) USING(CTL2)
1ICE200I 0 IDENTIFIER FROM CALLING PROGRAM IS 0001
 ICE143I 0 BLOCKSET     COPY  TECHNIQUE SELECTED
 ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES AND MORE
 ICE000I 0 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R5 - 22:25 ON THU OCT 25, 2007 -
0            INREC BUILD=(1,600,601:SEQNUM,8,ZD)
 ICE146I 0 END OF STATEMENTS FROM CTL1CNTL - PARAMETER LIST STATEMENTS FOLLOW
           DEBUG NOABEND,ESTAE
           OPTION MSGDDN=DFSMSG,LIST,MSGPRT=ALL,RESINV=0,SORTDD=CTL1,SORTIN=IN1,SO*
                          RTOUT=T1,DYNALLOC
           SORT FIELDS=COPY
 ICE201I 0 RECORD TYPE IS F - DATA STARTS IN POSITION 1
 ICE751I 0 C5-K05352 C6-Q95214 C7-K90000 C8-K05352 E9-K06751 C9-BASE   E5-K10929 E7-K90000
 ICE193I 0 ICEAM2 ENVIRONMENT IN EFFECT - ICEAM2 INSTALLATION MODULE SELECTED
 ICE088I 0 TESTJOB.STEP020 .        , INPUT LRECL = 1200, BLKSIZE = 22800, TYPE = FB
 ICE093I 0 MAIN STORAGE = (MAX,6291456,6291456)
 ICE156I 0 MAIN STORAGE ABOVE 16MB = (6234096,6234096)
 ICE127I 0 OPTIONS: OVFLO=RC0 ,PAD=RC0 ,TRUNC=RC0 ,SPANINC=RC16,VLSCMP=N,SZERO=Y,RESET=Y,VSAMEMT=Y,DYNSPC=256
 ICE128I 0 OPTIONS: SIZE=6291456,MAXLIM=1048576,MINLIM=450560,EQUALS=N,LIST=Y,ERET=RC16 ,MSGDDN=DFSMSG
 ICE129I 0 OPTIONS: VIO=N,RESDNT=ALL ,SMF=NO   ,WRKSEC=Y,OUTSEC=Y,VERIFY=N,CHALT=N,DYNALOC=N             ,ABCODE=MSG
 ICE130I 0 OPTIONS: RESALL=4096,RESINV=0,SVC=109 ,CHECK=Y,WRKREL=Y,OUTREL=Y,CKPT=N,STIMER=Y,COBEXIT=COB2
 ICE131I 0 OPTIONS: TMAXLIM=6291456,ARESALL=0,ARESINV=0,OVERRGN=16384,CINV=Y,CFW=Y,DSA=0
 ICE132I 0 OPTIONS: VLSHRT=N,ZDPRINT=Y,IEXIT=N,TEXIT=N,LISTX=N,EFS=NONE    ,EXITCK=S,PARMDDN=DFSPARM ,FSZEST=N
 ICE133I 0 OPTIONS: HIPRMAX=OPTIMAL,DSPSIZE=MAX ,ODMAXBF=0,SOLRF=Y,VLLONG=N,VSAMIO=N,MOSIZE=MAX
 ICE235I 0 OPTIONS: NULLOUT=RC0
 ICE084I 0 EXCP ACCESS METHOD USED FOR T1
 ICE084I 0 EXCP ACCESS METHOD USED FOR IN1
 ICE751I 1 EF-K10929 F0-Q84357 E8-K90000
 ICE090I 0 OUTPUT LRECL = 608, BLKSIZE = 27968, TYPE = FB   (SDB)
 ICE171I 0 SORTOUT LRECL OF 608 IS DIFFERENT FROM SORTIN(NN) LRECL OF 1200 - RC=0
 ICE055I 0 INSERT 0, DELETE 0
 ICE054I 0 RECORDS - IN: 3258883, OUT: 3258883
 ICE052I 0 END OF DFSORT
1ICE200I 0 IDENTIFIER FROM CALLING PROGRAM IS 0002
 ICE143I 0 BLOCKSET     COPY  TECHNIQUE SELECTED
 ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES AND MORE
 ICE000I 0 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R5 - 22:28 ON THU OCT 25, 2007 -
0            INREC BUILD=(1,600,601:SEQNUM,8,ZD)
 ICE146I 0 END OF STATEMENTS FROM CTL2CNTL - PARAMETER LIST STATEMENTS FOLLOW
           DEBUG NOABEND,ESTAE
           OPTION MSGDDN=DFSMSG,LIST,MSGPRT=ALL,RESINV=0,SORTDD=CTL2,SORTIN=IN2,SO*
                          RTOUT=T1,DYNALLOC
           SORT FIELDS=COPY
 ICE201I 0 RECORD TYPE IS F - DATA STARTS IN POSITION 1
 ICE751I 0 C5-K05352 C6-Q95214 C7-K90000 C8-K05352 E9-K06751 C9-BASE   E5-K10929 E7-K90000
 ICE193I 0 ICEAM2 ENVIRONMENT IN EFFECT - ICEAM2 INSTALLATION MODULE SELECTED
 ICE088I 0 TESTJOB.STEP020 .        , INPUT LRECL = 600, BLKSIZE = 6000, TYPE = FBA
 ICE093I 0 MAIN STORAGE = (MAX,6291456,6291456)
 ICE156I 0 MAIN STORAGE ABOVE 16MB = (6233454,6233454)
 ICE127I 0 OPTIONS: OVFLO=RC0 ,PAD=RC0 ,TRUNC=RC0 ,SPANINC=RC16,VLSCMP=N,SZERO=Y,RESET=Y,VSAMEMT=Y,DYNSPC=256
 ICE128I 0 OPTIONS: SIZE=6291456,MAXLIM=1048576,MINLIM=450560,EQUALS=N,LIST=Y,ERET=RC16 ,MSGDDN=DFSMSG
 ICE129I 0 OPTIONS: VIO=N,RESDNT=ALL ,SMF=NO   ,WRKSEC=Y,OUTSEC=Y,VERIFY=N,CHALT=N,DYNALOC=N             ,ABCODE=MSG
 ICE130I 0 OPTIONS: RESALL=4096,RESINV=0,SVC=109 ,CHECK=Y,WRKREL=Y,OUTREL=Y,CKPT=N,STIMER=Y,COBEXIT=COB2
 ICE131I 0 OPTIONS: TMAXLIM=6291456,ARESALL=0,ARESINV=0,OVERRGN=16384,CINV=Y,CFW=Y,DSA=0
 ICE132I 0 OPTIONS: VLSHRT=N,ZDPRINT=Y,IEXIT=N,TEXIT=N,LISTX=N,EFS=NONE    ,EXITCK=S,PARMDDN=DFSPARM ,FSZEST=N
 ICE133I 0 OPTIONS: HIPRMAX=OPTIMAL,DSPSIZE=MAX ,ODMAXBF=0,SOLRF=Y,VLLONG=N,VSAMIO=N,MOSIZE=MAX
 ICE235I 0 OPTIONS: NULLOUT=RC0
 ICE084I 0 EXCP ACCESS METHOD USED FOR T1
 ICE084I 0 EXCP ACCESS METHOD USED FOR IN2
 ICE751I 2 EF-K10929 F0-Q84357 DA-K90000
 ICE185A 0 DFSORT TERMINATED WITH SB37  ABEND DURING PHASE C 3


Thanks.

Regards,
Ramanan R
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Fri Oct 26, 2007 11:11 pm    Post subject:
Reply with quote

It managed to copy the IN1 records to T1, but got the B37 trying to copy the IN2 records to T1.

The following seem to be space related messages for T1, but I don't know what product is issuing them or what they mean:

Code:

22.29.33 J1234567  SVM4000I TESTJOB, STEP020, T1, ATTEMPTING SPACVOLA FOR SYS07298.T222515.RA000.TESTJOB.T1.H01, PUB109, 4
 22.29.33 J1234567  SVM4452I RECOVERY TERMINATED: DATA SET BEING PROCESSED BY EXCP
 22.29.33 J1234567  SVM4000I TESTJOB, STEP020, T1, ATTEMPTING SPACVOLA FOR SYS07298.T222515.RA000.TESTJOB.T1.H01, PUB109, 4
 22.29.33 J1234567  SVM4452I RECOVERY TERMINATED: DATA SET BEING PROCESSED BY EXCP


This seems to be a space problem unrelated to DFSORT. I'm not a space expert, so I can't help you with this. Maybe somebody else can.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Sat Oct 27, 2007 12:22 am    Post subject:
Reply with quote

Hello,

You could talk with the people who are responsible for storage management for your system. There may not be enough space on UNIT=DISK. The storage management people can tell you if there is another UNIT= you can use for this requirement. You will need to tell them the size and number of records you are working and the expected size of the final output.

It may also be that you need to split the original input files, process the smaller sets, and then merge them back together later.
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Mon Oct 29, 2007 8:23 am    Post subject: Reply to: How to avoid SB37 abend in ICETOOL?
Reply with quote

Hi,
looking at the output you have posted it appears that the T1 DDNAME is not using the additional volumes you have specified.

One way to prove this is to create a permanent dataset instead of a temporary one and changing the disp to MOD,CATLG,CATLG.

After the job completes (abends), under ISPF 3.4 you should be able to see the number of volumes used.

If the dataset is not using more than 1 volume, this is your problem assuming you are using 3390's as disk space.

The total number of cyls required for 8 million records should be about 6000 cyls (almost 2 3390's )
You can always write the output to cart.


Gerry
Back to top
View user's profile Send private message
reeno_sj

New User


Joined: 21 Mar 2007
Posts: 1
Location: chennai

PostPosted: Thu Mar 20, 2008 12:11 am    Post subject: Reply to: How to avoid SB37 abend in ICETOOL?
Reply with quote

Hi,

I faced the similar problem and changing the UNIT=(WORK,8) solved this problem. My input records were also having 9.3 million recordsand I used UNIT = SYSDA previously. Hope this might solve your problem.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Display ZEDLMSG without Pressing F1 &... anandgbe CLIST & REXX 8 Thu Dec 15, 2016 4:20 pm
No new posts IMS BMP program causes 878 system abend Artemk IMS DB/DC 7 Tue Nov 22, 2016 8:26 pm
No new posts How to delete second instance from Fl... Gunapala CN DFSORT/ICETOOL 6 Tue Oct 18, 2016 11:42 pm
No new posts abend sort based on count records in ... anatol DFSORT/ICETOOL 5 Mon Oct 17, 2016 10:10 pm
No new posts ICETOOL/SYNCSORT - SYSPRINT output nartcr DFSORT/ICETOOL 17 Wed Oct 05, 2016 10:46 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us