IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Incomplete Spool Print


IBM Mainframe Forums -> IBM Tools
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
shr_amar
Warnings : 2

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Mon Jun 22, 2009 6:16 pm
Reply with quote

Dear Friends ,

I am trying to take my spool data into PS and i am facing a problem that some part of spool data is not coming to PS.

Is their any limitation of size / Page while doing XDC ;given below is the code i have used

"DROPBUF"
QUEUE 'OWNER ' IBMAS1
QUEUE 'PREFIX *'
QUEUE 'ST'
QUEUE 'AFD REFRESH'
QUEUE 'ARRANGE MAX-RC A C'
QUEUE 'END'
QUEUE 'EXIT'
"ALLOC F(ISFIN) TRACKS SPACE(1) REU" /* USED BY SDSF */
"ALLOC FI(ISFOUT) DSN('"SDSFDSN"') SHR REUSE"
"EXECIO" QUEUED()" DISKW ISFIN (FINIS" /* INPUT TO SDSF BATCH */
"CALL *(SDSF) '++32,255'"
"FREE FI(ISFIN ISFOUT)"

Please let me know if you are looking for more inforamtion.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Mon Jun 22, 2009 6:28 pm
Reply with quote

Any particulat part of the sysout missing, or can we guess ?
Back to top
View user's profile Send private message
shr_amar
Warnings : 2

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Mon Jun 22, 2009 6:31 pm
Reply with quote

if my spool have 15 job detail , first 10 are coming to PS last 5 is missing
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Mon Jun 22, 2009 6:35 pm
Reply with quote

Quote:
Is their any limitation of size / Page while doing XDC


other than based on allocation of destination ds?
Back to top
View user's profile Send private message
shr_amar
Warnings : 2

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Mon Jun 22, 2009 6:37 pm
Reply with quote

I have used now ISFAFD instead of CALL *(SDSF) '++32,255'" . Now 12 job details are coming but 3 are still missing .


There is no issue with output PS spcase as i have given ample space there.

Looking for ward to see the responses
Back to top
View user's profile Send private message
shr_amar
Warnings : 2

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Mon Jun 22, 2009 10:15 pm
Reply with quote

Any view on this issue
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Mon Jun 22, 2009 10:57 pm
Reply with quote

Quote:
There is no issue with output PS spcase as i have given ample space there.
What do you define as "ample space"? And how big an output spool (i.e., how many lines) are you attempting to write into this file?
Back to top
View user's profile Send private message
shr_amar
Warnings : 2

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Tue Jun 23, 2009 10:23 am
Reply with quote

While creating output spool (PS file) i have given following parameter which seems to have enough space to insert max number of lines .

"ALLOC F(TEST1) DA('"SDSFDSN"') NEW SPACE(500,200) DSORG(PS)
RECFM(F B) Lrecl(256) "

Please let me know if something else is required .
Back to top
View user's profile Send private message
shr_amar
Warnings : 2

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Tue Jun 23, 2009 10:43 am
Reply with quote

One more thing i have noticed is that the MAX number of lines coming to
ISFOUT is 480.

Is there is any extra command i have to put to increase the number of lines
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Tue Jun 23, 2009 11:22 am
Reply with quote

shr_amar wrote:
While creating output spool (PS file) i have given following parameter which seems to have enough space to insert max number of lines .
"ALLOC F(TEST1) DA('"SDSFDSN"') NEW SPACE(500,200) DSORG(PS)
RECFM(F B) Lrecl(256) "
Please let me know if something else is required .

And the allocation units are ..............
What does 3.4 I show for the attributes of the file
Back to top
View user's profile Send private message
shr_amar
Warnings : 2

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Tue Jun 23, 2009 11:28 am
Reply with quote

General Data Current Allocation
Management class . . : SEMI Allocated blocks . : 18
Storage class . . . : STANDARD Allocated extents . : 1
Volume serial . . . : DITSPL
Device type . . . . : 3390
Data class . . . . . : **None** Current Utilization
Organization . . . : PS Used blocks . . . . : 4
Record format . . . : FBA Used extents . . . : 1
Record length . . . : 133
Block size . . . . : 27930
1st extent blocks . : 18
Secondary blocks . : 20
Data set name type : SMS Compressible : NO

Creation date . . . : 23/06/2009 Referenced date . . : 23/06/2009
Expiration date . . : ***None***
Back to top
View user's profile Send private message
shr_amar
Warnings : 2

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Tue Jun 23, 2009 11:37 am
Reply with quote

As per my understanding this is nothing related to space of the output file.
as now i have inserted the print line and output line is increased from 480 to 660 .

Please have a look of new code .

"DROPBUF"
QUEUE 'OWNER ' user_id
QUEUE 'PREFIX *'
QUEUE 'ST'
QUEUE 'AFD REFRESH'
QUEUE 'ARRANGE MAX-RC A C'
QUEUE "PRINT FILE TEMPPRT " /* Print to temp dataset */
QUEUE "PRINT 1 99999"
QUEUE "PRINT CLOSE"
QUEUE 'END'
QUEUE 'EXIT'
"ALLOC F(TEMPPRT) DA('MY.DATASET') SHR"
"ALLOC F(ISFIN) TRACKS SPACE(1) REU" /* USED BY SDSF */
"ALLOC FI(ISFOUT) DSN('"SDSFDSN"') SHR REUSE"
"EXECIO" QUEUED()" DISKW ISFIN (FINIS"
"CALL *(ISFAFD) ' ++32,255'"



Still if there is 200 jobs present on spool 660 lines are unable to acommadte .

Please helpme here
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Tue Jun 23, 2009 12:00 pm
Reply with quote

Are you doing this in batch or foreground
Back to top
View user's profile Send private message
shr_amar
Warnings : 2

Active User


Joined: 02 May 2005
Posts: 128
Location: UK

PostPosted: Tue Jun 23, 2009 12:05 pm
Reply with quote

In forground
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Tue Jun 23, 2009 1:54 pm
Reply with quote

Mmmmmmmmmmm, OK, so I'm doing something slightly different but this works for both foreground and batch with no problems.

Code:
/* REXX *** CALL SDSF IN FOREGROUND                                  */
"FREE  FI(ISFIN,ISFOUT)"                                               
"ALLOC FI(ISFIN) DA('Input dataset(member)') SHR"                         
"ALLOC FI(ISFOUT) DA('Output dataset') SHR"                             
"CALL *(SDSF)"                                                         
EXIT                                                                   

I did notice that in foreground that the number of lines displayed was always 57, hence the DOWN 57 statements below. In batch I could specify the number of lines displayed on one screen using the code below and changing the DOWN parameter cards.
Code:

//SDSF     EXEC PGM=SDSF,PARM='++100,133'

And in the input dataset member
Code:

PRE *                 
SET DISPLAY           
O                     
SORT JOBNAME A JNUM A
O                     
DOWN 57               
DOWN 57               
DOWN 57               
DOWN 57   
DOWN 57   
DOWN 57   
DOWN 57   
SORT OFF 
END       
END       
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> IBM Tools

 


Similar Topics
Topic Forum Replies
No new posts JCL sortcard to print only the records DFSORT/ICETOOL 11
No new posts Search string in job at regular Spool... CLIST & REXX 0
No new posts is there a way to print time in HH:MM... SYNCSORT 12
No new posts Capturing logs from spool dd JCL & VSAM 6
No new posts Print out all lines with 'IBM' compil... CLIST & REXX 8
Search our Forums:

Back to Top