Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum 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 Add the name in the PS file and creat... dharmaraok DFSORT/ICETOOL 9 Wed Apr 01, 2020 10:43 am
No new posts DFSORT Output file order query A_programmers DFSORT/ICETOOL 1 Thu Mar 26, 2020 11:59 pm
No new posts Error Creating KSDS file, REASON CODE... sandeep prajapati JCL & VSAM 8 Tue Mar 24, 2020 12:05 pm
No new posts Issue while reading a file in browse ... sivasaras TSO/ISPF 7 Sun Mar 01, 2020 12:20 pm
No new posts doubt when executing a file when logg... Renato Zangerolami TSO/ISPF 2 Fri Feb 07, 2020 6:07 pm

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