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

S9(11)V9(02) to S9(9)V9(2) COMP-3


IBM Mainframe Forums -> SYNCSORT
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
sprikitik

New User


Joined: 29 Jan 2007
Posts: 61
Location: Makati City, Philippines

PostPosted: Tue Oct 23, 2018 6:19 pm
Reply with quote

Hello, need help pls..

INPUT:
LRECL 13 -> S9(11)V9(02).

OUTPUT needs to be S9(9)V9(2) COMP-3.

Please comment if OUTREC FIELDS=((1,13,SFF,MUL,+10),TO=PD,LENGTH=6) is correct?

Thanks!!
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Tue Oct 23, 2018 6:53 pm
Reply with quote

Quote:
Please comment if OUTREC FIELDS=((1,13,SFF,MUL,+10),TO=PD,LENGTH=6) is correct?
What happens when you try it? Why are you multiplying the input value? And you do realize that you may be losing significant digits by moving 11 digits before the decimal point to 9 digits before the decimal point?
Back to top
View user's profile Send private message
sergeyken

Senior Member


Joined: 29 Apr 2008
Posts: 2010
Location: USA

PostPosted: Wed Oct 24, 2018 4:03 am
Reply with quote

sprikitik wrote:
Hello, need help pls..

INPUT:
LRECL 13 -> S9(11)V9(02).

OUTPUT needs to be S9(9)V9(2) COMP-3.

Please comment if OUTREC FIELDS=((1,13,SFF,MUL,+10),TO=PD,LENGTH=6) is correct?

Actually the PIC S9(11)V9(2) does correspond to format ZD,13 in SYNCSORT, not SFF.
SFF is likely PIC X(13).

From the original post it is unclear why to multiply by +10 ???
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 -> SYNCSORT

 


Similar Topics
Topic Forum Replies
No new posts COBOL - Move S9(11)v9(7) COMP-3 to -(... COBOL Programming 5
No new posts Converting ASCII values to COMP-3 (ZD... JCL & VSAM 2
No new posts Interviewers are surprised with my an... Mainframe Interview Questions 6
No new posts Cobol COMP-2 fields getting scrambled... Java & MQSeries 6
No new posts convert alphanumeric PIC X(02) to hex... COBOL Programming 3
Search our Forums:

Back to Top