I've run into this before, where the JCL file is greater than rec=-132. If
it is larger, SORT.PUB.SYS has a fit with it.
Change the record size of your JCL file, or re-direct the stdlist of the
sort to a file that is 132 bytes in length. Then you can print out the file
to see how your sort worked.
Ron Horner
Operations Manager
Administrative Management Group
[log in to unmask]
(847) 870-2175
-----Original Message-----
From: Ron Wallace [SMTP:[log in to unmask]]
Sent: Thursday, May 27, 1999 3:29 PM
To: [log in to unmask]
Subject: Error in job writing to the $STDLIST
Can anyone see what is wrong here?
Thanks
Ron Wallace
snip>
271 :
272 :PURGE HUR0101B.VCDATA
273 ^
274 File "HUR0101B.VCDATA.AIH" not found. No purge done.
(CIWARN 383)
275 :PURGE HUR0101C.VCDATA
276 ^
277 File "HUR0101C.VCDATA.AIH" not found. No purge done.
(CIWARN 383)
278 :BUILD HUR0101B.VCDATA;REC=-90,,F,ASCII;DISC=10000,10,2
279 :BUILD HUR0101C.VCDATA;REC=-256,,F,ASCII;DISC=1000,10,2
280 :FILE HUR0100 = HUR0100;DEV=912,10
281 :FILE INFILE = HURDATA.VCDATA
282 :FILE HUR0100B = HUR0101B.VCDATA
283 :FILE HUR0100C = HUR0101C.VCDATA
284 :RUN HUR0100X.WALLRO.AMISYS9T;XL="XL.PUB.!HPACCOUNT"
285
286 SOURCE IS HUR0100.VCCBSRC.AMISYS9T Version 1.002 may
20,1999
287 PARM-5-SUBPRG: VI
288 HUR0100 INPUT READ IS COMPLETE.
289
290 END OF PROGRAM
291 :
292 :COMMENT RON PUSH 1
293 :COMMENT RON PUSH 1
294 :PURGE HUR0101D.VCDATA
295 ^
296 File "HUR0101D.VCDATA.AIH" not found. No purge done.
(CIWARN 383)
297 :COMMENT RON PUSH 2
298 :COMMENT RON PUSH 2
299 :RUN SORT.PUB.SYS
300
304 HP31900A.02.00 TurboSORT THU, MAY 27, 1999, 12:45 PM
305 (C) HEWLETT-PACKARD CO. 1987
306
307 +-F-I-L-E---I-N-F-O-R-M-A-T-I-O-N---D-I-S-P-L-A-Y+
308 ! FILE NAME IS $STDLIST !
309 ! FOPTIONS: SYS,ASCII,$STDLIST,V,CCTL,DEQ,SPF !
310 ! NOLABEL !
311 ! AOPTIONS: OUTPUT,NOMR,NOLOCK,SEMI,BUF,MULTI !
312 ! WAIT,NOCOPY !
313 ! DEVICE TYPE: 32 DEVICE SUBTYPE: 9 !
314 ! LDEV: 16384 DRT: 0 UNIT: 0 !
315 ! RECORD SIZE: 133 BLOCK SIZE: 134 (BYTES) !
316 ! EXTENT SIZE: 0 MAX EXTENTS: 0 !
317 ! RECPTR: 307 RECLIMIT: 0 !
318 ! LOGCOUNT: 307 PHYSCOUNT: 307 !
319 ! EOF AT: 0 LABEL ADDR: %00000000000 !
320 ! FILE CODE: 0 ULABELS: 0 !
321 ! FILE OWNER: MGR.AIH !
322 ! PHYSICAL STATUS: ???????????????? !
323 ! ERROR NUMBER: 43 RESIDUE: 0 !
324 ! BLOCK NUMBER: 3 NUMREC: 1 !
325 +------------------------------------------------+
327
328 Program terminated in an error state. (CIERR 976)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
329 REMAINDER OF JOB FLUSHED.
^^^^^^^^^^^^^^^^^^^^^^^^^
330 CPU sec. = 10. elapsed min. = 2. THU, MAY 27, 1999,
12:45 PM.
>>
|