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
 

 

How to use symbol for positioning in OVERLAY

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
per.idoff

New User


Joined: 05 Nov 2013
Posts: 2
Location: Sweden

PostPosted: Tue Nov 05, 2013 11:21 pm    Post subject: How to use symbol for positioning in OVERLAY
Reply with quote

Hi,

Syntax for overlay is: OVERLAY=(position:value)
e.g. OVERLAY=(45:C’NONE’) to put value NONE starting in position 45

Given symbol declaration:
Symbolname,45,10,CH

Is there any way to use a this symbol to position where to overlay?
Something like OVERLAY=(position(Symbolname):C'NONE')
Back to top
View user's profile Send private message

Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1770
Location: Bloomington, IL

PostPosted: Tue Nov 05, 2013 11:33 pm    Post subject:
Reply with quote

As here?
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Wed Nov 06, 2013 12:10 am    Post subject:
Reply with quote

per.idof,

As Akatsukami pointed out you just need to have a colon after the symbol and DFSORT would automatically treat that symbol as position.

Here is a sample. Check the sysout and see how the symbols are translated.

Code:

//STEP0100 EXEC PGM=SORT                                 
//SYSOUT   DD SYSOUT=*                                   
//SYMNOUT  DD SYSOUT=*                                   
//SYMNAMES DD *                                         
POS-VARA,45,10,CH                                       
CONSTANT1,C'NONE'                                       
POS-VARB,*,10,CH                                         
CONSTANT2,C'NEXT FIELD'                                 
//SORTIN   DD *                                         
ABC                                                     
//SORTOUT  DD SYSOUT=*                                   
//SYSIN    DD *                                         
  OPTION COPY                                           
  INREC OVERLAY=(POS-VARA:CONSTANT1,POS-VARB:CONSTANT2) 
//*
Back to top
View user's profile Send private message
per.idoff

New User


Joined: 05 Nov 2013
Posts: 2
Location: Sweden

PostPosted: Wed Nov 06, 2013 5:42 pm    Post subject:
Reply with quote

Thanks! Works like a charm.
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 -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Overlay the system date Danielle.Filteau SYNCSORT 4 Fri Mar 03, 2017 1:16 am
No new posts Overlay with right shift Bill Woodger DFSORT/ICETOOL 3 Thu Jan 28, 2016 7:49 pm
No new posts Overlay with WHEN=Group not working krsenthil85 DFSORT/ICETOOL 7 Wed Oct 21, 2015 4:00 am
No new posts Merge two files with some replace/ove... dheeraj.ramchandani DFSORT/ICETOOL 10 Thu Sep 03, 2015 7:59 pm
No new posts Illegal symbol syntax error HABBIE DB2 5 Wed Aug 26, 2015 5:58 pm


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