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
 

 

doubt on edit

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

New User


Joined: 21 Jul 2005
Posts: 56
Location: Hyderabad

PostPosted: Tue Dec 18, 2007 9:14 pm    Post subject: doubt on edit
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 Moderator


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

PostPosted: Tue Dec 18, 2007 9:42 pm    Post subject:
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
Currently Banned

New User


Joined: 21 Jul 2005
Posts: 56
Location: Hyderabad

PostPosted: Wed Dec 19, 2007 5:45 pm    Post subject:
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    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 Mass comment and edit elixir1986 IBM Tools 3 Thu Mar 02, 2017 10:09 pm
No new posts Doubt in MFS abdulrafi IMS DB/DC 2 Fri Oct 21, 2016 3:09 pm
No new posts Use of Edit & FTOV migusd SYNCSORT 3 Wed Jun 08, 2016 1:49 am
No new posts How storage is calculated for AN-Edit... Raghu navaikulam COBOL Programming 2 Wed Mar 09, 2016 3:51 pm
No new posts Too many edit macro's and too few PF ... don.leahy TSO/ISPF 7 Wed Feb 17, 2016 3:00 am


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