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
 
Comments on the right of instructions in File Manager

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IBM Tools
View previous topic :: :: View next topic  
Author Message
tgo60

New User


Joined: 19 Apr 2006
Posts: 6

PostPosted: Wed Jul 02, 2014 1:12 am    Post subject: Comments on the right of instructions in File Manager
Reply with quote

1) We've gone from insync to file-aid to insync to file-aid to now file manager over the past 15 yrs, I suspect we will to continue to flip flop as each vendor cuts a better deal.

2) Not sure if I'm getting too old for change or don’t care any more but I would feel much better if I could get the executives offices locks changed every month and have them fill out a request for the new key with a 10 day lead time.

3) Now for the question. I've searched high and far but can't find if it is possible to list comments to the right in ex. 2 as that can in ex. 1, I've tried a slew of combinations but no avail. fyi {<-USE 'HKP'} is the comment.

4) Also, I know this is a lazy way out but have one ran across any sites that have a ton of file manager examples, I do much better with examples than trying to decipher the cryptic syntax listed in the manuals.

Code:
Ex 1
//SYSIN DD *                                                 
$$FILEM DSC INPUT=DD01,OUTPUT=DD01O,PROC=*                   
IF FLD(10,4)   = 'THIS' &,      /* CASE SENSITIVE         */
   FLD(20,4,U) = 'THAT' &,      /* NOT CASE SENS.         */
   FLD(30,2)   = 'C1C2'X &,     /* HEXADECIMAL            */
   FLD(40,5,P) = 1234 &,        /* PACKED DECIMAL         */
   FLD(50,4,B) = 567 &,         /* BINARY NUMERIC X'0237' */
   FLD(60,6,Z) = 89 &,          /* ZONED DECIMAL          */
   FLD_TYPE(70,6,P)=1,          /* CHK VALID NUM DATA     */
THEN RETURN                                                 
RETURN DROP                                                 
/*         


Code:
Ex 2
//SYSIN DD *           
$$FILEM FCH INPUT=DDIN,   
$$FILEM     MEMBER=*       
F '(HKT)'       <-USE 'HKP'
F '//DHK'       <-USE 'CHK'
F '//SHK'       <-USE 'CHK'
F '//QHK'       <-USE 'CHK'
F '.DHK'        <-USE 'CHK'
F '.SHK'        <-USE 'CHK'
Back to top
View user's profile Send private message

tgo60

New User


Joined: 19 Apr 2006
Posts: 6

PostPosted: Wed Jul 23, 2014 2:54 am    Post subject: Reply to: Comments on the right of instructions in File Mana
Reply with quote

Thanks for everyone the viewed the question.

IBM response:
I heard back from development, there is not a way to comment the FIND command with FCH function.
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 -> IBM Tools All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Execute JCL step based on the content... sprikitik JCL & VSAM 2 Tue Oct 03, 2017 10:03 am
This topic is locked: you cannot edit posts or make replies. PS file data should be passed as symb... d_sarlie JCL & VSAM 15 Tue Oct 03, 2017 5:18 am
No new posts Garbage on output file Hervey Martinez SYNCSORT 4 Wed Sep 27, 2017 12:50 am
No new posts File Aid tool to compare numeric data balaji81_k Compuware & Other Tools 2 Tue Sep 26, 2017 3:35 am
No new posts Compare yesterday's date to the one o... migusd SYNCSORT 11 Fri Sep 22, 2017 11:35 pm

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