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
 

 

+0 with leading sign using DFSort

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

New User


Joined: 11 Feb 2008
Posts: 35
Location: Chennai

PostPosted: Fri Jul 03, 2009 12:37 pm    Post subject: +0 with leading sign using DFSort
Reply with quote

Hi,
I want to write a +0 (ZD) of 9(11)v99 to my output file using DFSort. Please let me know the way.

The leading sign '+' must showup when i lookup the output file in InSync or FileAid
Back to top
View user's profile Send private message

nelson.pandian

Active User


Joined: 09 Apr 2008
Posts: 133
Location: Phoenix, AZ

PostPosted: Fri Jul 03, 2009 2:43 pm    Post subject:
Reply with quote

Hi vasif,

Change your ZD value to normal formate with the sign in the front. The following piece of code is one way to achieve this. Change the position according to your formate.
Code:
OUTREC OVERLAY=(1:1,13,ZD,EDIT=(SIIIIIIIIII.TT),SIGNS=(+,-))
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 Jul 03, 2009 8:06 pm    Post subject:
Reply with quote

Quote:
I want to write a +0 (ZD) of 9(11)v99 to my output file using DFSort. Please let me know the way.


How you would do that depends on what hex value Insync and FileAid require to display the value the way you want it.

A COBOL value of 9(11)v99 corresponds to a 13-byte ZD value for DFSORT. I don't know how Insync or FileAid displays that value. You need to figure out and show what hex value for 0 will produce the display you want with Insync and Fileaid. Once you show me what the value has to look like in hex, I can show you how to get that hex value in DFSORT.
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 How to get the remainder and quotient... vnktrrd DFSORT/ICETOOL 2 Mon Oct 31, 2016 10:59 am
No new posts Change date (DD/MM/YY) in 2nd record ... uday kiran DFSORT/ICETOOL 12 Wed Sep 07, 2016 10:57 pm
No new posts DFSORT sorting only specific records akodakka DFSORT/ICETOOL 4 Thu Aug 04, 2016 11:24 am
No new posts Symbolic Parameters in SYSIN DD state... madishpa DFSORT/ICETOOL 3 Mon Jun 27, 2016 6:23 pm
No new posts DFSORT to match two files and write John F Dutcher DFSORT/ICETOOL 6 Thu May 12, 2016 5:17 pm


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