IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

doubt on edit


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
ajayvamsi

New User


Joined: 21 Jul 2005
Posts: 56
Location: Hyderabad

PostPosted: Tue Dec 18, 2007 9:14 pm
Reply with quote

hi all,
could you please help how to place sign field in output file

I have declared
OUTREC FIELDS=(11,2,PD,EDIT=(STTT.TT))

if the input file amount field contains sign then I am not getting sign in output file instead I am getting as 'S' before the value even it is -/+

input file :-123.12 it is declared as comp-3
output file :S123.12 which is wrong

expected should be : -123.12 in displayable format with out using file-aid.

I want to use EDIT only since we can declare the number of byte accordingly.

thanks
ajay
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Tue Dec 18, 2007 9:42 pm
Reply with quote

You can't have -123.12 in a 2-byte PD field. You would need a 3-byte PD field -> X'12312D'.

You need a SIGNS parameter to tell DFSORT what you want for the leading and trailing signs.

If you want + for the plus sign and - for the minus sign, use:

Code:

  OUTREC FIELDS=(11,3,PD,EDIT=(STTT.TT),SIGNS=(+,-))


If you want a blank for the plus sign and - for the minus sign, use:

Code:

  OUTREC FIELDS=(11,3,PD,EDIT=(STTT.TT),SIGNS=(,-))
Back to top
View user's profile Send private message
ajayvamsi

New User


Joined: 21 Jul 2005
Posts: 56
Location: Hyderabad

PostPosted: Wed Dec 19, 2007 5:45 pm
Reply with quote

Thanks a lot it is working now icon_smile.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts Query on edit primary command CLIST & REXX 5
No new posts Query on edit primary command CLIST & REXX 1
No new posts Need help to resolve a hard edit COBOL Programming 8
This topic is locked: you cannot edit posts or make replies. Need help to resolve a hard edit COBOL Programming 4
No new posts create rexx edit Macro that edits the... CLIST & REXX 3
Search our Forums:

Back to Top