Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Possible to read from disk conditionally?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
HameedAli

Active User


Joined: 16 Apr 2009
Posts: 151
Location: India

PostPosted: Thu May 21, 2009 11:16 am    Post subject: Possible to read from disk conditionally?
Reply with quote

Hi!


Code:
"EXECIO * DISKR DDIN (STEM Input. FINIS "


The above will read the input from disk DDIN and will store in the array Input.

Is it possible to read the DDIN contents into the array Input. based on a condition

Let the below be the contents in the datset associated with DD Name DDIN

Code:
step  EXEC PGM=IKJEFT01                                     
STEPLIB  INCLUDE MEMBER=(qqqqq)                                                                   
SYSUDUMP DD SYSOUT=(,),OUTPUT=(*.STD1)                                                   
FILE1  DD DSN=qwerty.qwer.qwe1,
       DISP=SHR                                   
FILE2  DD DSN=qwerty.qwer.qwe,
       DCB=(RECFM=FB,LRECL=115,BUFNO=20),         
       DISP=(NEW,CATLG,DELETE),                   
       UNIT=(SYSDA,25),SPACE=(CYL,(500,500),RLSE)



[/code]


Is it possible to tweak the EXECIO to filter only rows which has 'DSN=' in it?
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8642
Location: Back in jolly old England

PostPosted: Thu May 21, 2009 11:25 am    Post subject:
Reply with quote

NO, EXECIO is simply an I/O operation and not a logic processor.
Back to top
View user's profile Send private message
HameedAli

Active User


Joined: 16 Apr 2009
Posts: 151
Location: India

PostPosted: Thu May 21, 2009 11:56 am    Post subject: Reply to: Possible to read from disk conditionally?
Reply with quote

Thanks Expat
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 -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts how to see when the last read access ... Mike 1304 DB2 1 Tue Sep 12, 2017 7:52 pm
No new posts JES2 job size field matching Windows ... SRICOBSAS All Other Mainframe Topics 4 Tue Sep 05, 2017 5:49 pm
No new posts Read two inputs and write into output... murali.andaluri DFSORT/ICETOOL 6 Wed Jul 26, 2017 7:35 pm
No new posts READ A PACKED "NEGATIVE" FI... jdesouza CA Products 3 Tue May 02, 2017 11:43 pm
No new posts Read of TDQ fails in LENGERR Tracy Hansen CICS 10 Wed Apr 05, 2017 12:10 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us