MVSFORUMS.com

[neelesh]

Hi,

I am getting a problem while performimg SORT in REXX, but when i submit a job directly i am getting the expected results.

Problem is : WER153A INSUFFICIENT VIRTUAL STORAGE IN FINAL MERGE PHASE
How to resolve this.?

I am executing the REXX in batch using IKJEFT01.

The SYSOUT message is :

SYSIN :
OUTFIL FNAMES=SORTOUT,ENDREC=1,OUTREC=(3,2,BI,EDIT=(TTTTTTTT))
SUM FIELDS=NONE
SORT FIELDS=(3,2,BI,D)
WER164B 102,404K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 102,380K BYTES USED
WER146B 16K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I SORTIN : RECFM=F ; LRECL= 29114; CISIZE = 26624
WER110I SORTOUT : RECFM=FB ; LRECL= 8; BLKSIZE= 800
WER410B 100,356K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,
WER410B 0 BYTES RESERVE REQUESTED, 98M BYTES USED
WER036B G=1769,B=1,BIAS=00
WER162B 0 PREALLOCATED SORTWORK TRACKS, 37,500 DYNAMICALLY ALLOCATED,
WER162B 0 ACQUIRED IN SECONDARY EXTENTS, 10,515 RELEASED, TOTAL OF 26,383 T
WER124I ESTIMATED PREALLOCATED/USED SORTWORK SPACE USAGE FACTOR < 0.01
WER045C END SORT PHASE
WER055I INSERT 0, DELETE 2381824
WER153A INSUFFICIENT VIRTUAL STORAGE IN FINAL MERGE PHASE
WER418I DATASPACE(S) AND/OR HIPERSPACE(S) USED
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000


My REXX program:

AIXCLUST = TEST.TSTS.PROD.AIX

DO
"ALLOC DD(SORTOUT) DS('"USERID()".TSTS.T1') MOD SP(1 1)",
"TRACKS LRECL(8) RECFM(F,B) BLKSIZE(800) UNIT(SYSDA)",
"REU"

"ALLOC DD(SORTIN) DS('"AIXCLUST"') SHR REU"
"SP(120 120) CYLINDERS" */
"ALLOC DD(SORTWK01) DUMMY"
"ALLOC DD(SYSOUT) DS(*)"
"ALLOC DD(SYSPRINT) DS(*)"
CMD.1=" SORT FIELDS=(3,2,BI,D)"
CMD.2=" SUM FIELDS=NONE"
CMD.3=" OUTFIL FNAMES=SORTOUT,ENDREC=1,OUTREC=(3,2,BI,EDIT=(TTTTTTTT))"
/* WRITE ABOVE SORT STATEMENTS INTO SYSIN FILE */
DO R=1 TO 3
PUSH CMD.R
END
"ALLOC DD(SYSIN) UNIT(SYSDA) NEW DELETE"
"EXECIO" QUEUED() "DISKW SYSIN (FINIS"
ADDRESS ISPEXEC "SELECT PGM(SORT) "
ADDRESS TSO
"FREE DSN(SYSIN SYSPRINT SORTOUT SYSOUT SORTIN SORTWK01)"
END

Thanks,
Neeelsh.

[kolusu]

neelesh,

Try increasing the VSCORE parm . try this

[neelesh]

Kolusu,

Thanks for the response.

Tried the same, but not of much help.

Included INREC to lessen the SORT input, now the VIRTUAL STORAGE
problem is resolved.

But still would like to know, what has to be done for resolving
such problems.

Priviliged to be a part of MVSFORUMS, where knowledge is shared unrelentlessly.

Happy Moments,
Neelesh.