Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Masking in easytrieve

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CA Products
View previous topic :: :: View next topic  
Author Message
srinivasarao.gunja

New User


Joined: 30 Jul 2014
Posts: 3
Location: india

PostPosted: Mon Aug 11, 2014 7:49 pm    Post subject: Masking in easytrieve
Reply with quote

Can any one suggest me how can I mask

Input var:
Code:
SEQNUM            W     3 N MASK ('ZZZ')


Output var:
Code:
OUT-SEQID       111     10 A


i am getting output as
Code:
001
002
003


But i need it in this fashion
Code:
  1
  2
  3


Thanks in advance...

Code'd
Back to top
View user's profile Send private message

Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7236

PostPosted: Mon Aug 11, 2014 8:10 pm    Post subject: Reply to: Masking in easytrieve
Reply with quote

A simple search or browse of the forum, or a simple read of the manual, would indicate that MASKs are only processed when data is output to a PRINTER file. So, from DISPLAY or PRINT statements. Not from PUT, or WRITE.

There is a file-exit here, kindly coded and tested by Chandan Inst, but you case is too simple even for that.

Redefine the field, twice. Firstly, first two bytes, secondly, first byte. Test first two bytes for zero, if true set to space. Else test first byte, if true set to space, else leave it alone.
Back to top
View user's profile Send private message
seagull

New User


Joined: 28 May 2007
Posts: 24
Location: Dublin

PostPosted: Wed Aug 20, 2014 10:01 pm    Post subject:
Reply with quote

Why would you put a mask on an input field? It doesn't affect what is moved.
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7236

PostPosted: Wed Aug 20, 2014 10:44 pm    Post subject: Reply to: Masking in easytrieve
Reply with quote

It is very common to have MASKs on input fields. The MASK only operates on DISPLAY or PRINT. Where do you think the MASKs would best be?
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 -> CA Products All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Easytrieve - Report writing - Only 1 ... Abhi Nature CA Products 2 Wed Sep 14, 2016 11:40 am
No new posts Masking Db2 data kishpra DB2 3 Fri Sep 02, 2016 9:23 pm
No new posts RACF Easytrieve Plus macro Susan Jackson CA Products 0 Fri Jun 03, 2016 8:25 pm
No new posts Query regarding Easytrieve program shanudarling All Other Mainframe Topics 2 Wed Jan 06, 2016 5:33 pm
No new posts Adjust Heading Position in Easytrieve thesumitk CA Products 4 Mon Dec 21, 2015 3:26 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us