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

Need to convert COMP-3 to decimal using Syncsort


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

Active User


Joined: 17 Nov 2009
Posts: 129
Location: India

PostPosted: Wed Mar 18, 2015 4:30 pm
Reply with quote

Hi

Need to convert S9(8)V9(2) USAGE COMP-3. to displayable decimal . could you please help. using syncsort.


tried with below card but gives error "WER268A OUTFIL STATEMENT : SYNTAX ERROR "

Code:
SORT FIELDS=COPY                                           
OUTFIL FNAMES=FINAL1,                                       
OUTREC BUILD=(1:C'1'                                             
             ,2:6,6,PD,TO=ZD,LENGHT=10),                           
       REMOVECC,HEADER1=('0',2:'xyzfile   ',12:DATE=(4MD-)),
       TRAILER1=('9',COUNT=(M11,LENGTH=10))


Code'd
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Wed Mar 18, 2015 5:50 pm
Reply with quote

LENGHT. Fix the typo.

Please use the Code tags to preserve spacing in future posts, and ensure that the marker which indicates the location of the error appears in the correct place. To see what your posting looks like before submitting it, use the Preview button.
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Wed Mar 18, 2015 5:55 pm
Reply with quote

Having now code'd it, it looks a real mess.

Code:
 SORT FIELDS=COPY                                           
 OUTFIL FNAMES=FINAL1,                                       
        BUILD=(C'1',                                             
               6,6,PD,
                TO=ZD,
                LENGTH=10),                           
        REMOVECC,
        HEADER1=('0',2:'xyzfile   ',12:DATE=(4MD-)),
        TRAILER1=('9',COUNT=(M11,LENGTH=10))
Back to top
View user's profile Send private message
Susanta

Active User


Joined: 17 Nov 2009
Posts: 129
Location: India

PostPosted: Wed Mar 18, 2015 6:18 pm
Reply with quote

if i want to conver the PD to ZD with visible decimal pointer and leading +/- sign, how can i do that..
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Wed Mar 18, 2015 6:21 pm
Reply with quote

Use EDIT= with the mask you want. Examples here, also all explained in your SyncSORT documentation. In future please try to post in the correct part of the forum.
Back to top
View user's profile Send private message
View previous topic : : View next topic  
Post new topic   Reply to topic All times are GMT + 6 Hours
Forum Index -> SYNCSORT

 


Similar Topics
Topic Forum Replies
No new posts Write record twice based on condition... SYNCSORT 7
No new posts Convert CSV to flat file. DFSORT/ICETOOL 6
No new posts convert arbitrary UTC to local (SYD) ... COBOL Programming 1
No new posts Convert Service Unit to CPU Seconds All Other Mainframe Topics 1
No new posts Help required to reset decimal points... DFSORT/ICETOOL 10
Search our Forums:


Back to Top