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 handle the sign bit for ZD values

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

Active User


Joined: 17 Mar 2008
Posts: 148
Location: Anna NGR

PostPosted: Fri Sep 18, 2009 3:56 pm    Post subject: How to handle the sign bit for ZD values
Reply with quote

Hi,
i have a requirement to sum the total and write the o/p

i/p file is
Code:
00000000000010A
00000000000012M


o/p if the total is negative
Code:
00000000000002L


o/p if the total is positive
Code:
00000000000007G


but the o/p i recieve is not handling the sign values
Code:
000000000000023
000000000000077


code i used is
Code:
OUTFIL FNAMES=SYSUT2,NODETAIL,REMOVECC,             
TRAILER1=(1:TOT=(02,15,ZD,EDIT=(TTTTTTTTTTTTTTT)))


pls. assist me...
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: Fri Sep 18, 2009 9:30 pm    Post subject:
Reply with quote

It's handling the sign exactly as you told it to (not at all). EDIT=(TTTTTTTTTTTTTTT) does not contain a sign. If you want the total to be ZD values with a C sign for plus and a D sign for minus, use these DFSORT statements:

Code:

  OPTION COPY                                         
  OUTFIL FNAMES=SYSUT2,NODETAIL,REMOVECC,             
   TRAILER1=(1:TOT=(02,15,ZD,TO=ZDC,LENGTH=15))       
Back to top
View user's profile Send private message
kratos86

Active User


Joined: 17 Mar 2008
Posts: 148
Location: Anna NGR

PostPosted: Wed Sep 23, 2009 8:54 pm    Post subject:
Reply with quote

Thanks Frank, it worked icon_biggrin.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 BI,TO=ZD Changing Values Tyler Dunbar DFSORT/ICETOOL 4 Tue Jul 25, 2017 12:12 am
No new posts Sorting of hex values Saurabh_mi DFSORT/ICETOOL 11 Thu May 25, 2017 3:49 pm
No new posts Replace values in the input data Vikas Maharnawar DFSORT/ICETOOL 10 Thu May 11, 2017 2:18 pm
No new posts Compare two files and subtract values ameetmund DFSORT/ICETOOL 7 Fri Mar 31, 2017 3:35 pm
No new posts Check Binary Values for symbols gandikk CA Products 3 Tue Mar 21, 2017 5:11 am


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