IBM Mainframe Forum

by **samb01** » Tue Dec 30, 2014 2:00 pm

Hello,

my job is in error at a step of dfsort;:

$MOT*** ETAPE : PTBENQ_010
$MOT PE272 RECHERCHE NUM DIFFERE PTBENQ
$MOT INFO SGD : NUMERO DE DIFFERE RECUPERE HORS REPRISE = 0009
**** CONTINUOUS WAIT TIME LIMIT EXPIRED **** JOB : EPTBENQ2
IEC502E K 0D94,409267,SL,EPTBENQ2,SGD,PROBPT.EPTBENQ.ENRPART
TMS014 IEC502E K 0D94,409267,SL,EPTBENQ2,SGD,PROBPT.EPTBENQ.ENRPART
IEC501A M 0D94,410205,SL,COMP,EPTBENQ2,SGD.S010,PROBPT.EPTBENQ.ENRPART
IEC502E K 0D94,410205,SL,EPTBENQ2,SGD,PROBPT.EPTBENQ.ENRPART
TMS014 IEC502E K 0D94,410205,SL,EPTBENQ2,SGD,PROBPT.EPTBENQ.ENRPART
IEC501A M 0D94,411737,SL,COMP,EPTBENQ2,SGD.S010,PROBPT.EPTBENQ.ENRPART
$HASP375 EPTBENQ2 ESTIMATED KBYTES EXCEEDED
$HASP375 EPTBENQ2 ESTIMATE EXCEEDED BY 1,000 KBYTES
$HASP375 EPTBENQ2 ESTIMATE EXCEEDED BY 2,000 KBYTES
$HASP375 EPTBENQ2 ESTIMATE EXCEEDED BY 3,000 KBYTES
$HASP375 EPTBENQ2 ESTIMATE EXCEEDED BY 4,000 KBYTES
$HASP375 EPTBENQ2 ESTIMATE EXCEEDED BY 5,000 KBYTES
$HASP375 EPTBENQ2 ESTIMATE EXCEEDED BY 6,000 KBYTES
$HASP375 EPTBENQ2 ESTIMATE EXCEEDED BY 7,000 KBYTES
$HASP375 EPTBENQ2 ESTIMATE EXCEEDED BY 8,000 KBYTES
...
$HASP375 EPTBENQ2 ESTIMATE EXCEEDED BY 340,000 KBYTES 1
$HASP375 EPTBENQ2 ESTIMATE EXCEEDED BY 341,000 KBYTES 1
$HASP375 EPTBENQ2 ESTIMATE EXCEEDED BY 342,000 KBYTES 1
$HASP375 EPTBENQ2 ESTIMATE EXCEEDED BY 343,000 KBYTES 1
$HASP375 EPTBENQ2 ESTIMATE EXCEEDED BY 344,000 KBYTES 1
$HASP375 EPTBENQ2 ESTIMATE EXCEEDED BY 345,000 KBYTES 1
$HASP375 EPTBENQ2 ESTIMATE EXCEEDED BY 346,000 KBYTES 1
$HASP375 EPTBENQ2 ESTIMATE EXCEEDED BY 347,000 KBYTES 1
IEA995I SYMPTOM DUMP OUTPUT 943
USER COMPLETION CODE=0046
TIME=01.08.13 SEQ=06788 CPU=0000 ASID=0146
PSW AT TIME OF ERROR 078D1E00 87040288 ILC 2 INTC 0D
NO ACTIVE MODULE FOUND
NAME=UNKNOWN
DATA AT PSW 07040282 - B2600BA0 0A0D9188 DB984780
AR/GR 0: 00000000/00000000_0038C0F8 1: 00000000/0C100000_8000002E
2: 00000000/00000000_3BB74A9C 3: 00000000/00000000_3BB3F8E8
4: 00000000/00000000_00000000 5: 00000000/00000000_00000000
6: 00000000/00000000_00000007 7: 00000000/00000000_000000
8: 00000000/00000000_3BB7B100 9: 00000000/00000000_86F824
A: 00000000/00000000_87040288 B: 00000000/00000000_870400
C: 00000000/00000000_06F802C0 D: 00000000/00000000_0038C0
E: 00000000/00000000_00000000 F: 01000002/0C100000_000000
END OF SYMPTOM DUMP
IEF450I EPTBENQ2 SGD S010 - ABEND=S000 U0046 REASON=00000000 022
TIME=01.09.25
IEF234E K 0D94,411737,PVT,EPTBENQ2,SGD
TMS014 IEF234E K 0D94,411737,PVT,EPTBENQ2,SGD
IEF234E K 0E32,206788,PVT,EPTBENQ2,SGD
TMS014 IEF234E K 0E32,206788,PVT,EPTBENQ2,SGD
-IEFACTRT S010 SGD U0046 187K .64 .03 29.55 33972K
-IEFACTRT S010 COND0 FLUSH 0 .00 .00 .00 0
-IEFACTRT S020 SGD FLUSH 0 .00 .00 .00 0

The dataset in input is on tape withe theses information :

Select all

BTHDATE= 12/12/2012 VENDOR = BLANKS COUNT = 00313 TWERRC = 00000
DATECLN= ZEROS USECLN = 00000 CLNCNT = 000 TRERRI = 00000
VOLSEQ = 0001 ROBTY = VIBM ROBID = 002 TWERRI = 00000
1STVOL = 409267 NEXTVOL= 410205 PREVVOL= PRERRC = 00000
NUMDSNB= 00000 1STDSNB= 00000000 LSTDSNB= 00000000 PWERRC = 00000
LABEL = SL DEN = 38KC TRTCH = 36X2 PRERRI = 00000
RECFM = FB LRECL = 001500 BLKSIZE= 027000 PWERRI = 00000
AUDATE = 30/12/2014 AUTIME = 0051 BESKEY = 00000 BLKCNT = 0000929241
AUCODE = 01 AUFLAG1= 00 CPUID = CPU1 USERID = OPC

and in the jcl, there is this sysin (that's apprently not enought..) :

Select all

//SGD.SORTWK01 DD DSN=&VVQUAL1..&VVQUAL2..WK01,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK02 DD DSN=&VVQUAL1..&VVQUAL2..WK02,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK03 DD DSN=&VVQUAL1..&VVQUAL2..WK03,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK04 DD DSN=&VVQUAL1..&VVQUAL2..WK04,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK05 DD DSN=&VVQUAL1..&VVQUAL2..WK05,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK06 DD DSN=&VVQUAL1..&VVQUAL2..WK06,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK07 DD DSN=&VVQUAL1..&VVQUAL2..WK07,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK08 DD DSN=&VVQUAL1..&VVQUAL2..WK08,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK09 DD DSN=&VVQUAL1..&VVQUAL2..WK09,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK10 DD DSN=&VVQUAL1..&VVQUAL2..WK10,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK11 DD DSN=&VVQUAL1..&VVQUAL2..WK11,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK12 DD DSN=&VVQUAL1..&VVQUAL2..WK12,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK13 DD DSN=&VVQUAL1..&VVQUAL2..WK13,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK14 DD DSN=&VVQUAL1..&VVQUAL2..WK14,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK15 DD DSN=&VVQUAL1..&VVQUAL2..WK15,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK16 DD DSN=&VVQUAL1..&VVQUAL2..WK16,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK17 DD DSN=&VVQUAL1..&VVQUAL2..WK17,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK18 DD DSN=&VVQUAL1..&VVQUAL2..WK18,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))

Could you help me and tell me what could i do to put the right sysin.

Thank's for your help.

by **NicC** » Tue Dec 30, 2014 2:48 pm

You have not posted your SYSIN but your SORTWKxx JCL

Why not let sort dynamically allocate the sortwork space? You can tell sort how many records are expectedas you have the lrecl, block size and the number of blocks.

by **BillyBoyo** » Tue Dec 30, 2014 3:36 pm

You'd better show your expanded JCL (file 2 of the output of your job) and the sysout from your failed step. Several things look odd with what you have shown. It seems from the 1,700 that your site is concerned about SORTs holding excessive allocated sortwork space. Why your blocksize is not for "tape" I don't know (if you have big blocking, you can have a blocksize nearly 10 times that size, but even without, you can have 32k or so). Why the DDName is that, we can't yet tell.

by **samb01** » Tue Dec 30, 2014 5:17 pm

this is the sysin :

Select all

SORT FIELDS=(1,57,CH,A,75,8,BI,A,61,14,CH,A)
RECORD TYPE=FB,LENGTH=(500)

the jcl is like this :

Select all

//S010 EXEC RLSGD,DIFFERE=PTBENQ,ETAPE='EXEC_DIFFERE',
// DEBUT=010,FIN=010
//*-------------------------------------------------------------------
//* EN CAS DE PRISE DE PLUSIEURS LOTS POUR EVITER (SORTWK01 A 08
//* IEF450I EPTBENQ2 SGD S010 - ABEND=S000 U0083 REASON=00000000
//*-------------------------------------------------------------------
//SGD.SORTWK01 DD DSN=&VVQUAL1..&VVQUAL2..WK01,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK02 DD DSN=&VVQUAL1..&VVQUAL2..WK02,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK03 DD DSN=&VVQUAL1..&VVQUAL2..WK03,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK04 DD DSN=&VVQUAL1..&VVQUAL2..WK04,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK05 DD DSN=&VVQUAL1..&VVQUAL2..WK05,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK06 DD DSN=&VVQUAL1..&VVQUAL2..WK06,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK07 DD DSN=&VVQUAL1..&VVQUAL2..WK07,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK08 DD DSN=&VVQUAL1..&VVQUAL2..WK08,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK09 DD DSN=&VVQUAL1..&VVQUAL2..WK09,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK10 DD DSN=&VVQUAL1..&VVQUAL2..WK10,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK11 DD DSN=&VVQUAL1..&VVQUAL2..WK11,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK12 DD DSN=&VVQUAL1..&VVQUAL2..WK12,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK13 DD DSN=&VVQUAL1..&VVQUAL2..WK13,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK14 DD DSN=&VVQUAL1..&VVQUAL2..WK14,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK15 DD DSN=&VVQUAL1..&VVQUAL2..WK15,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK16 DD DSN=&VVQUAL1..&VVQUAL2..WK16,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK17 DD DSN=&VVQUAL1..&VVQUAL2..WK17,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK18 DD DSN=&VVQUAL1..&VVQUAL2..WK18,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))

the ddname sgd. is because of the home product...

But in fact, it is a sort.

the dataset PROBPT.EPTBENQ.ENRPART
is created like it :

//CONCAT1 EXEC PGM=SYSGENER
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DSN=&VVQUAL1..&VVQUAL2..LOTI133,DISP=(OLD,KEEP)
// DD DISP=(OLD,KEEP),
// DSN=PROBSS.ESSDRTQ.ENREPBE.Q&VVODDD.&VVOHHMM..FIXE
//*
//SYSUT2 DD DSN=&VVQUAL1..&VVQUAL2..ENRPART,
// DISP=(,CATLG,KEEP),UNIT=(VTS2,,DEFER),
// VOL=(,,,10),LABEL=RETPD=&VVRETPD,
// DCB=(RECFM=FB,LRECL=1500,BLKSIZE=27000)

Could you explain me the problem with the blocsize ? The dataset in input have a blocsize of 27000
and record legnht of : 1500

Sorry, but if i let the system calculate the sortwork, it abended too...

by **BillyBoyo** » Tue Dec 30, 2014 6:10 pm

We need the expanded JCL. All the JCL for the step, and including the JOB card. This will be in the second spool file for the job.

We need to see the sysout from the failed step. This will be in the third spool file for the job.

Tapes support larger blocksizes than DASD does. You are using "half-track" blocking. Tapes don't have tracks.

The abend is a user-abend. None of the messages you show are from SORT. I don't think your problem is to do with sortwork space.

You have some site-specific stuff. To get anywhere to help you, we need to see what has been asked for.

by **samb01** » Tue Dec 30, 2014 6:55 pm

here is the whole jcl :

Select all

***************************** Top of Data ******************************
//XFTRETS2 JOB ,'MISE A JOUR BENEF',MSGCLASS=O, (DAY:&ODAY)
// CLASS=O,REGION=800M
/*JOBPARM SYSAFF=*
//*SICAP SETVAR
//*
//*--------------------------------------------------------------------
//* ETAPE : PTBENQ_000_INIT_TRAITEMENT
//*--------------------------------------------------------------------
//S000 EXEC RLSGD,DIFFERE=PTBENQ,ETAPE='EXEC_DIFFERE',
// DEBUT=000,FIN=000
//*
//*--------------------------------------------------------------------
//* ETAPE : PTBENQ_010
//*--------------------------------------------------------------------
//S010 EXEC RLSGD,DIFFERE=PTBENQ,ETAPE='EXEC_DIFFERE',
// DEBUT=010,FIN=010
//*--------------------------------------------------------------------
//* EN CAS DE PRISE DE PLUSIEURS LOTS POUR EVITER (SORTWK01 A 08
//* IEF450I EPTBENQ2 SGD S010 - ABEND=S000 U0083 REASON=00000000
//*--------------------------------------------------------------------
//SGD.SORTWK01 DD DSN=&VVQUAL1..&VVQUAL2..WK01,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK02 DD DSN=&VVQUAL1..&VVQUAL2..WK02,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK03 DD DSN=&VVQUAL1..&VVQUAL2..WK03,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK04 DD DSN=&VVQUAL1..&VVQUAL2..WK04,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK05 DD DSN=&VVQUAL1..&VVQUAL2..WK05,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK06 DD DSN=&VVQUAL1..&VVQUAL2..WK06,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK07 DD DSN=&VVQUAL1..&VVQUAL2..WK07,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK08 DD DSN=&VVQUAL1..&VVQUAL2..WK08,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK09 DD DSN=&VVQUAL1..&VVQUAL2..WK09,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK10 DD DSN=&VVQUAL1..&VVQUAL2..WK10,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK11 DD DSN=&VVQUAL1..&VVQUAL2..WK11,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK12 DD DSN=&VVQUAL1..&VVQUAL2..WK12,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK13 DD DSN=&VVQUAL1..&VVQUAL2..WK13,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK14 DD DSN=&VVQUAL1..&VVQUAL2..WK14,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK15 DD DSN=&VVQUAL1..&VVQUAL2..WK15,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK16 DD DSN=&VVQUAL1..&VVQUAL2..WK16,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK17 DD DSN=&VVQUAL1..&VVQUAL2..WK17,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//SGD.SORTWK18 DD DSN=&VVQUAL1..&VVQUAL2..WK18,VOL=(,,,10),
// DISP=(,DELETE),STORCLAS=SCREOR,SPACE=(CYL,(1,700))
//*-------------------------------------------------------------
//* INSTANCE : PTBENQ_010_INFOS_RBE_PARTENAIRES
//SGD.SORTIN DD DSN=&VVQUAL1..&VVQUAL2..ENRPART,DISP=OLD
// DD DSN=&VVQUAL1..&VVQUAL2..FORC,DISP=OLD
//* INSTANCE : PTBENQ_010_INFOS_REPERTOIRE
//SGD.SORTOUT DD DSN=&VVQUAL1..&VVQUAL2..ENREPBE,
// DISP=(OLD),DCB=(RECFM=FB,LRECL=1500,BLKSIZE=27000)
//SGD.SGILDD DD DSN=&VVENVIR..PARAM(HAUTEOUI),DISP=SHR
//*
//*--------------------------------------------------------------------
//* ETAPE : PTBENQ_020_MAJ_REPERTOIRE
//*--------------------------------------------------------------------
//S020 EXEC RLSGD,DIFFERE=PTBENQ,ETAPE='EXEC_DIFFERE',
// DEBUT=020,FIN=020
//* INSTANCE : PTBENQ_020_INFOS_REPERTOIRE
//SGD.EENR20 DD DSN=&VVQUAL1..&VVQUAL2..ENREPBE,DISP=OLD
//SGD.SGILDD DD DSN=&VVENVIR..PARAM(HAUTEOUI),DISP=SHR
//*
//*--------------------------------------------------------------------
//* ETAPE : PTBENQ_030_VIDAGE_SOUS_PRODUIT
//*--------------------------------------------------------------------
//S030 EXEC RLSGD,DIFFERE=PTBENQ,ETAPE='EXEC_DIFFERE',
// DEBUT=030,FIN=030
//* INSTANCE : PTBENQ_030_INCIDENTS
//SGD.SINC30 DD DSN=&VVQUAL1..&VVQUAL2..INCID30.FIXE,
// DISP=OLD
//SGD.SGILDD DD DSN=&VVENVIR..PARAM(HAUTEOUI),DISP=SHR
//*
//*----
//DEB040 EXEC PGM=LC000
//DBDGTBD DD DISP=SHR,DSN=&VVDBD
//CADIFT DD *
TRAIT=PTBENQ
ETAPE=040
//*----
//EXTRACT EXEC PGM=IKJEFT01,DYNAMNBR=20,COND=(8,EQ,DEB040)
//SYSTSPRT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=W,HOLD=YES
//SYSPRINT DD SYSOUT=*
//SYSPUNCH DD DUMMY
//SYSREC00 DD DISP=SHR,DSN=&VVQUAL1..&VVQUAL2..MUNA40
//SYSTSIN DD DSN=&VVENVIR..PARAM(SSN&VVDB2.),DISP=SHR
// DD DSN=&VVENVIR..PARAM(DSNTIAUA),DISP=SHR
//SYSIN DD *
SELECT DISTINCT MUNA
FROM REEL.TNA516 ;
/*
//*----------------------------------------------------------------
// EXEC PGM=SYS087,COND=((8,EQ,DEB040),(4,GE,EXTRACT))
//*----------------------------------------------------------------
//FIN040 EXEC PGM=LC001,COND=(8,EQ,DEB040)
//DBDGTBD DD DISP=SHR,DSN=&VVDBD
//CADIFT DD *
TRAIT=PTBENQ
ETAPE=040
//*=================================================================
//*
//* APPELS AUX PA962
//*
//*=================================================================
//LA962 EXEC PGM=LA962
// INCLUDE MEMBER=SNAPDUMP
//DSNAP DD SYSOUT=*
//PARAM DD *
PRESTATION = TOUTES
//*FILTRE MUNAC = 19001815 REPETER JUSQU'A 20 FOIS
//*FILTRE PSEUDO = G98FMXXXXXX REPETER JUSQU'A 20 FOIS
//*PRESTATION = CM OU 'TOUTES'
//*BENEF SS = XXX
//FINDIC DD DISP=SHR,DSN=&VVQUAL1..&VVQUAL2..MUNA40
//ANO DD DISP=SHR,DSN=&VVQUAL1..&VVQUAL2..ANOLA962
//SORTIE DD DSN=&VVQUAL1..&VVQUAL2..SORTIE,DISP=OLD,
// RECFM=FB,LRECL=500,BLKSIZE=27500
//DCBGES DD DSN=&VVTEC1..GESBD,DISP=SHR
//DBDGTBD DD DSN=&VVDBD,DISP=SHR
//PARGES DD DSN=&VVENVIR..PARAM(GESAS),DISP=SHR
//PARGTBD DD DSN=&VVENVIR..PARAM(GTBD07),DISP=SHR
//SGILDD DD DSN=&VVENVIR..PARAM(HAUTEOUI),DISP=SHR
//SERVM DD DSN=&VVENVIR..PARAM(SERVM),DISP=SHR
//CADIFT DD *
TRAIT=PTBENQ
ETAPE=050
//*
//*----
//DEB060 EXEC PGM=LC000
//DBDGTBD DD DISP=SHR,DSN=&VVDBD
//CADIFT DD *
TRAIT=PTBENQ
ETAPE=060
//*==================================================================
//* COMPTAGES ET EDITION
//*==================================================================
//SB479 EXEC SASEX,WORK='1000,500',SASAUTO=&VVENVIR..SASBIB,
// COND=(8,EQ,DEB060)
//MACLIB DD DISP=SHR,DSN=&VVENVIR..SASBIB
//FT11F001 DD SYSOUT=*
//FT12F001 DD SYSOUT=*
//WORK DD DSN=&&WORK,DISP=(NEW,DELETE,DELETE),
// SPACE=(CYL,(1500,800)),UNIT=DISK
//TRAIT DD *
TDB KORELIO
//IN DD DISP=SHR,DSN=&VVQUAL1..&VVQUAL2..SORTIE
//OUT DD DUMMY
//****CDOM DD DUMMY (DEJA EN COMMENTAIRE)
//****FMPERS DD DUMMY (DEJA EN COMMENTAIRE)
//DEPT DD DSN=PROBPT.EPTBENQ.DEPT.FIXE,DISP=SHR
//DARRET DD DUMMY
//SYSIN DD DSN=&VVENVIR..SASBIB(SB479),DISP=SHR
//*----------------------------------------------------------------
// EXEC PGM=SYS087,COND=((8,EQ,DEB060),(4,GE,SB479.SAS))
//*----------------------------------------------------------------
//FIN060 EXEC PGM=LC001,COND=(8,EQ,DEB060)
//DBDGTBD DD DISP=SHR,DSN=&VVDBD
//CADIFT DD *
TRAIT=PTBENQ
ETAPE=060
//*--------------------------------------------------------------------
//DEB070 EXEC PGM=LC000
//DBDGTBD DD DISP=SHR,DSN=&VVDBD
//CADIFT DD *
TRAIT=PTBENQ
ETAPE=070
//*==================================================================
//* SELECTION DES COMPTES EN PARTENARIAT AVEC LA SMBTP
//*==================================================================
//SV596 EXEC SASEX,WORK='1000,500',SASAUTO=&VVENVIR..SASBIB,
// COND=(8,EQ,DEB070)
//MACLIB DD DISP=SHR,DSN=&VVENVIR..SASBIB
//FT11F001 DD SYSOUT=*
//FT12F001 DD SYSOUT=*
//PTBENQ DD DISP=SHR,DSN=&VVQUAL1..&VVQUAL2..SORTIE
//OUTMME DD DISP=SHR,DSN=&VVQUAL1..&VVQUAL2..ADHMME
//SYSIN DD DSN=&VVENVIR..SASBIB(SV596),DISP=SHR
//*----------------------------------------------------------------
// EXEC PGM=SYS087,COND=((8,EQ,DEB070),(4,GE,SV596.SAS))
//*----------------------------------------------------------------
//FIN070 EXEC PGM=LC001,COND=(8,EQ,DEB070)
//DBDGTBD DD DISP=SHR,DSN=&VVDBD
//CADIFT DD *
TRAIT=PTBENQ
ETAPE=070
//*
//*=================================================================
//* APPEL AU PV586 POUR EXTRAIRE LES INFORMATIONS
//*=================================================================
//LV586 EXEC PGM=LV586
// INCLUDE MEMBER=SNAPDUMP
//DSNAP DD SYSOUT=*
//FINDIC DD DISP=SHR,DSN=&VVQUAL1..&VVQUAL2..ADHMME
//SORTIE DD DISP=SHR,DSN=&VVQUAL1..&VVQUAL2..ADHADR
//ANO DD DISP=SHR,DSN=&VVQUAL1..&VVQUAL2..ANOLV586
//DCBGES DD DSN=&VVTEC1..GESBD,DISP=SHR
//DBDGTBD DD DSN=&VVDBD,DISP=SHR
//PARGES DD DSN=&VVENVIR..PARAM(GESAS),DISP=SHR
//PARGTBD DD DSN=&VVENVIR..PARAM(GTBD07),DISP=SHR
//SGILDD DD DSN=&VVENVIR..PARAM(HAUTEOUI),DISP=SHR
//CADIFT DD *
TRAIT=PTBENQ
ETAPE=080
//*
//*--------------------------------------------------------------------
//DEB090 EXEC PGM=LC000
//DBDGTBD DD DISP=SHR,DSN=&VVDBD
//CADIFT DD *
TRAIT=PTBENQ
ETAPE=090
//*=================================================================
//* MISE EN FORME DU FICHIER POUR LA SMBTP
//*=================================================================
//SV624 EXEC SASEX,WORK='1000,500',SASAUTO=&VVENVIR..SASBIB,
// COND=(8,EQ,DEB090)
//MACLIB DD DISP=SHR,DSN=&VVENVIR..SASBIB
//FT11F001 DD SYSOUT=*
//FT12F001 DD SYSOUT=*
//ENTREE DD DISP=SHR,DSN=&VVQUAL1..&VVQUAL2..ADHADR
//SORTIE DD DISP=MOD,DSN=&VVQUAL1..&VVQUAL2..FICOUT
//SYSIN DD DSN=&VVENVIR..SASBIB(SV624),DISP=SHR
//*----------------------------------------------------------------
// EXEC PGM=SYS087,COND=((8,EQ,DEB090),(4,GE,SV624.SAS))
//*----------------------------------------------------------------
//FIN090 EXEC PGM=LC001,COND=(8,EQ,DEB090)
//DBDGTBD DD DISP=SHR,DSN=&VVDBD
//CADIFT DD *
TRAIT=PTBENQ
ETAPE=090
//*
//*=================================================================
//* APPELS AU PX985 POUR EXTRAIRE LES INFORMATIONS
//*=================================================================
//LX985 EXEC PGM=LX985
// INCLUDE MEMBER=SNAPDUMP
//DSNAP DD SYSOUT=*
//FINDIC DD DISP=SHR,DSN=&VVQUAL1..&VVQUAL2..MUNA40
//ANO DD DISP=SHR,DSN=&VVQUAL1..&VVQUAL2..ANOLX985
//SORTIE DD DSN=&VVQUAL1..&VVQUAL2..SORTI100,DISP=OLD,
// RECFM=FB,LRECL=80,BLKSIZE=27920
//DCBGES DD DSN=&VVTEC1..GESBD,DISP=SHR
//DBDGTBD DD DSN=&VVDBD,DISP=SHR
//PARGES DD DSN=&VVENVIR..PARAM(GESAS),DISP=SHR
//PARGTBD DD DSN=&VVENVIR..PARAM(GTBD07),DISP=SHR
//SGILDD DD DSN=&VVENVIR..PARAM(HAUTEOUI),DISP=SHR
//SERVM DD DSN=&VVENVIR..PARAM(SERVM),DISP=SHR
//CADIFT DD *
TRAIT=PTBENQ
ETAPE=100
//*
//*--------------------------------------------------------------------
//DEB110 EXEC PGM=LC000
//DBDGTBD DD DISP=SHR,DSN=&VVDBD
//CADIFT DD *
TRAIT=PTBENQ
ETAPE=110
//*=================================================================
//* COMPTAGE ET EDITIONS
//*=================================================================
//SY727 EXEC SASEX,WORK='1000,500',SASAUTO=&VVENVIR..SASBIB,
// COND=(8,EQ,DEB110)
//MACLIB DD DISP=SHR,DSN=&VVENVIR..SASBIB
//FT11F001 DD SYSOUT=*
//FT12F001 DD SYSOUT=*
//DARRET DD DUMMY
//IN DD DISP=SHR,DSN=&VVQUAL1..&VVQUAL2..SORTI100
//SYSIN DD DSN=&VVENVIR..SASBIB(SY727),DISP=SHR
//*----------------------------------------------------------------
// EXEC PGM=SYS087,COND=((8,EQ,DEB110),(4,GE,SY727.SAS))
//*----------------------------------------------------------------
//FIN110 EXEC PGM=LC001,COND=(8,EQ,DEB110)
//DBDGTBD DD DISP=SHR,DSN=&VVDBD
//*=================================================================
//SY727 EXEC SASEX,WORK='1000,500',SASAUTO=&VVENVIR..SASBIB,
// COND=(8,EQ,DEB110)
//MACLIB DD DISP=SHR,DSN=&VVENVIR..SASBIB
//FT11F001 DD SYSOUT=*
//FT12F001 DD SYSOUT=*
//DARRET DD DUMMY
//IN DD DISP=SHR,DSN=&VVQUAL1..&VVQUAL2..SORTI100
//SYSIN DD DSN=&VVENVIR..SASBIB(SY727),DISP=SHR
//*----------------------------------------------------------------
// EXEC PGM=SYS087,COND=((8,EQ,DEB110),(4,GE,SY727.SAS))
//*----------------------------------------------------------------
//FIN110 EXEC PGM=LC001,COND=(8,EQ,DEB110)
//DBDGTBD DD DISP=SHR,DSN=&VVDBD
//CADIFT DD *
TRAIT=PTBENQ
ETAPE=110
//*
//*--------------------------------------------------------------------
//* ETAPE : PTBENQ_999_FIN_TRAITEMENT
//S999 EXEC RLSGD,DIFFERE=PTBENQ,ETAPE='EXEC_DIFFERE',
// DEBUT=999,FIN=999
**************************** Bottom of Data ****************************

by **BillyBoyo** » Tue Dec 30, 2014 7:33 pm

Sorry, but this is the unexpanded JCL that you submit. You are using a proc, and we need to see what is inside the proc. And need the sysout from the step which failed.

by **samb01** » Tue Dec 30, 2014 7:48 pm

here is the procédure (but i am not sure it will help you):

Select all

********************************* Top of Data **********************************
//RLSGD PROC DIFFERE=,ETAPE='EXEC_DIFFERE',DEBUT=,FIN=,SIMUL=NON,CH=
//SGD EXEC PGM=LD750,
// PARM=('STACK(1280K,256K),TRAP(ON)/&DIFFERE',
// '&ETAPE,&DEBUT,&FIN,&SIMUL,&CH')
//*
//* CARTE PARAM POUR FORCER LA TRANCHE DE MARQUAGE
//* PGMIMS COL 1 A 9:TRANCHE=X
//*
// INCLUDE MEMBER=SNAPDUMP
//PGMIMS DD DSN=&VVENVIR..PARAM(PSGDRL5),DISP=SHR
//PARHAND DD DSN=&VVENVIR..PARAM(SGDHANDD),DISP=SHR
//PAPIERA4 OUTPUT PAGEDEF=N90X08
//FDISPLAY DD SYSOUT=*,
// DCB=(RECFM=FB,LRECL=133,BLKSIZE=27930)
//SYSDBOUT DD SYSOUT=W,HOLD=YES
//SYSABOUT DD SYSOUT=W,HOLD=YES
//* AGEN048 MODE PERFORMANT
//PARAG048 DD DUMMY
//* PRISE DE SNAP
//SNAPOK DD DUMMY
//OBJETMEM DD SYSOUT=*,CHARS=MSF2,
// DCB=(RECFM=FBA,LRECL=141,BLKSIZE=27918)
//RESULTAT DD SYSOUT=*,CHARS=MSF2,
// DCB=(RECFM=FBA,LRECL=141,BLKSIZE=27918)
//PARGTBD DD DSN=&VVENVIR..PARAM(GTBD00),DISP=SHR
//PARBDSQ DD DSN=&VVENVIR..PARAM(GTBD34),DISP=SHR
//PARSGD DD DSN=&VVENVIR..PARAM(PSGDRL1),DISP=SHR
//PARGROUP DD DSN=&VVENVIR..PARAM(PSGDRL2),DISP=SHR
//OVERINS DD DSN=&VVENVIR..PARAM(PSGDRL3),DISP=SHR
//CHARGSYS DD DSN=&VVENVIR..PARAM(PSGDRL4),DISP=SHR
//SGILDD DD DSN=&VVENVIR..PARAM(HAUTEOUI),DISP=SHR
//*
//* COL 4 A 16:MSGDDN=SGDTRI
//* INDIQUE AU TRI QUE LES RESULTATS SONT ECRITS DANS SGDTRI
//DFSPARM DD DSN=&VVENVIR..PARAM(PSGDRL6),DISP=SHR
//*
//* INDIQUE AU TRI D'ALLOUER DYNAMIQUEMENT 6 SORTWORKS 3390
//* IL EST POSSIBLE D'OVERIDER CETTE CARTE EN METTANT DANS LE JCL
//* SGD.SORTWKXX DD
//*
//* COL 4 A 27:OPTION DYNALLOC=(3390,6)
//SORTCNTL DD DSN=&VVENVIR..PARAM(PSGDRL7),DISP=SHR
//*
//SGDTRI DD DSN=&&SGDTRI,DISP=(,DELETE),SPACE=(TRK,1),UNIT=DISK,
// DCB=(LRECL=121,BLKSIZE=27951,RECFM=FB)
//*
//* LE DDNAME TRI CORRESPOND A LA SYSPRINT DU TRI
//*
//TRI DD SYSOUT=*
//PAREDIT DD DSN=&VVENVIR..PARAM(PSGDRL8),DISP=SHR
//DDEDIT1 DD SYSOUT=Y
//DDEDIT2 DD SYSOUT=Y
//DDEDIT3 DD SYSOUT=Y
//DDEDIT4 DD SYSOUT=Y
//DDEDIT5 DD SYSOUT=Y
//DDEDIT6 DD SYSOUT=Y
//DDEDIT7 DD SYSOUT=Y
//DDEDIT8 DD SYSOUT=Y
//DDEDIT9 DD SYSOUT=Y
//DDEDITA DD SYSOUT=Y
//DDEDITB DD SYSOUT=Y
//DDEDITC DD SYSOUT=Y
//DDEDITD DD SYSOUT=Y
//DDEDITE DD SYSOUT=Y
//DDEDITF DD SYSOUT=Y
//DBDGTBD DD DSN=&VVDBD,DISP=SHR
//DCBGES DD DSN=&VVTEC1..GESBD,DISP=SHR
//SECU DD DSN=&VVTEC1..SECUTRBD,DISP=SHR
//CATAL DD DSN=&VVTEC1..CATALBD,DISP=SHR
//FB DD DSN=&VVTEC1..PRTBDF.BDFFB,DISP=SHR
//TM DD DSN=&VVTEC1..PRTBDF.BDFTM,DISP=SHR
//SERVM DD DSN=&VVENVIR..PARAM(SM),DISP=SHR
//EDICADIF DD SYSOUT=*,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=27930)
//*--------------------------------------------------
//COND0 EXEC PGM=SYS087,COND=(0,EQ,SGD)

i already sent the sysout in the first message. I can't andersatnd what you want more.

by **Terry Heinze** » Tue Dec 30, 2014 8:01 pm

It appears that the ABEND is a user abend (U0046) in program LD750 in PROC RLSGD.

by **samb01** » Tue Dec 30, 2014 8:21 pm

yes but when i increase the sortworks like this :

Select all

//*------------------------------------------------------------------
//SGD.SORTWK01 DD DSN=&VVQUAL1..&VVQUAL2..WORK01,DISP=(,DELETE),
// SPACE=(CYL,8500),STORCLAS=SCREOR,VOL=SER=PREO01,DSNTYPE=LARGE
//SGD.SORTWK02 DD DSN=&VVQUAL1..&VVQUAL2..WORK02,DISP=(,DELETE),
// SPACE=(CYL,8500),STORCLAS=SCREOR,VOL=SER=PREO02,DSNTYPE=LARGE
//SGD.SORTWK03 DD DSN=&VVQUAL1..&VVQUAL2..WORK03,DISP=(,DELETE),
// SPACE=(CYL,8500),STORCLAS=SCREOR,VOL=SER=PREO03,DSNTYPE=LARGE
//SGD.SORTWK04 DD DSN=&VVQUAL1..&VVQUAL2..WORK04,DISP=(,DELETE),
// SPACE=(CYL,8500),STORCLAS=SCREOR,VOL=SER=PREO04,DSNTYPE=LARGE
//SGD.SORTWK05 DD DSN=&VVQUAL1..&VVQUAL2..WORK05,DISP=(,DELETE),
// SPACE=(CYL,8500),STORCLAS=SCREOR,VOL=SER=PREO05,DSNTYPE=LARGE
//SGD.SORTWK06 DD DSN=&VVQUAL1..&VVQUAL2..WORK06,DISP=(,DELETE),
// SPACE=(CYL,8500),STORCLAS=SCREOR,VOL=SER=PREO06,DSNTYPE=LARGE
//SGD.SORTWK07 DD DSN=&VVQUAL1..&VVQUAL2..WORK07,DISP=(,DELETE),
// SPACE=(CYL,8500),STORCLAS=SCREOR,VOL=SER=PREO07,DSNTYPE=LARGE
//SGD.SORTWK08 DD DSN=&VVQUAL1..&VVQUAL2..WORK08,DISP=(,DELETE),
// SPACE=(CYL,8500),STORCLAS=SCREOR,VOL=SER=PREO08,DSNTYPE=LARGE
//SGD.SORTWK09 DD DSN=&VVQUAL1..&VVQUAL2..WORK09,DISP=(,DELETE),
// SPACE=(CYL,8500),STORCLAS=SCREOR,VOL=SER=PREO09,DSNTYPE=LARGE
//SGD.SORTWK10 DD DSN=&VVQUAL1..&VVQUAL2..WORK10,DISP=(,DELETE),
// SPACE=(CYL,8500),STORCLAS=SCREOR,VOL=SER=PREO10,DSNTYPE=LARGE
//SGD.SORTWK11 DD DSN=&VVQUAL1..&VVQUAL2..WORK11,DISP=(,DELETE),
// SPACE=(CYL,8500),STORCLAS=SCREOR,VOL=SER=PREO11,DSNTYPE=LARGE
//SGD.SORTWK12 DD DSN=&VVQUAL1..&VVQUAL2..WORK12,DISP=(,DELETE),
// SPACE=(CYL,8500),STORCLAS=SCREOR,VOL=SER=PREO12,DSNTYPE=LARGE
//SGD.SORTWK13 DD DSN=&VVQUAL1..&VVQUAL2..WORK13,DISP=(,DELETE),
// SPACE=(CYL,8500),STORCLAS=SCREOR,VOL=SER=PREO13,DSNTYPE=LARGE
//SGD.SORTWK14 DD DSN=&VVQUAL1..&VVQUAL2..WORK14,DISP=(,DELETE),
// SPACE=(CYL,8500),STORCLAS=SCREOR,VOL=SER=PREO14,DSNTYPE=LARGE
//SGD.SORTWK15 DD DSN=&VVQUAL1..&VVQUAL2..WORK15,DISP=(,DELETE),
// SPACE=(CYL,8500),STORCLAS=SCREOR,VOL=SER=PREO15,DSNTYPE=LARGE
//SGD.SORTWK16 DD DSN=&VVQUAL1..&VVQUAL2..WORK16,DISP=(,DELETE),
// SPACE=(CYL,8500),STORCLAS=SCREOR,VOL=SER=PREO16,DSNTYPE=LARGE
//*-------------------------------------------------------------

it works, there's no abend anymore...

IBM Mainframe Forum

How much Sortwork for this dfsort

How much Sortwork for this dfsort

Re: How much Sortwork for this dfsort

Re: How much Sortwork for this dfsort

Re: How much Sortwork for this dfsort

Re: How much Sortwork for this dfsort

Re: How much Sortwork for this dfsort

Re: How much Sortwork for this dfsort

Re: How much Sortwork for this dfsort

Re: How much Sortwork for this dfsort

Re: How much Sortwork for this dfsort