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
 

 

ICETOOL Control Card Question

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

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Wed Jan 23, 2013 9:35 pm    Post subject: ICETOOL Control Card Question
Reply with quote

In the below examples from the DFSORT manual, what is the significance of the 5X paramenter.

Code:

OUTREC FIELDS=(21,20,SQZ=(SHIFT=RIGHT),5X,
    152,18,SQZ=(SHIFT=LEFT,PREBLANK=X’05’,
        LEAD=C’VOL=SER=’,MID=C’,’,PAIR=QUOTE,LENGTH=30))


Code:

 OUTFIL FNAMES=TRIM3,VLTRIM=C’*’,
             OUTREC=(1,15,5X,16,8,5X,28)


Code:

INREC FIELDS=(1,10,
    21,20,JFY=(SHIFT=RIGHT),5X,
    52,12,JFY=(SHIFT=LEFT,PREBLANK=C’()’,LEAD=C’VOL=SER=’,
    LENGTH=16))
Back to top
View user's profile Send private message

dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Jan 23, 2013 9:58 pm    Post subject:
Reply with quote

Hello,

The 5X parameters specify 5 blanks (x'40) are to be inserted.
Back to top
View user's profile Send private message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Wed Jan 23, 2013 11:38 pm    Post subject: Reply to: ICETOOL Control Card Question
Reply with quote

Thank you for your response. Scott
Back to top
View user's profile Send private message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Wed Jan 23, 2013 11:45 pm    Post subject: Reply to: ICETOOL Control Card Question
Reply with quote

I have one followup. What would be the best method of taking a fixed file of records. removing all blanks, and substituting a hex '05' as a delimiter to create a downloadable spreadsheet file?

Code:

AAAAAAAAAA          BBBBBBBBB       CCCCC        DDD


Let say @ is representative of the hex '05' delimiter. The output should look like:

Code:

AAAAAAAAAA@BBBBBBBBB@CCCCC@DDD@
Back to top
View user's profile Send private message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Wed Jan 23, 2013 11:52 pm    Post subject: Reply to: ICETOOL Control Card Question
Reply with quote

Please disregard my question. I was successful using:

Code:

 SORT FIELDS=COPY                                             
 OUTFIL FNAMES=OUTFILE,CONVERT,                               
       OUTREC=(1,80,SQZ=(SHIFT=LEFT,MID=X'05',TRAIL=X'05'))   
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 delete second instance from Fl... Gunapala CN DFSORT/ICETOOL 6 Tue Oct 18, 2016 11:42 pm
This topic is locked: you cannot edit posts or make replies. How to use 2 input files in control c... Gunapala CN DFSORT/ICETOOL 23 Thu Oct 13, 2016 3:42 pm
No new posts ICETOOL/SYNCSORT - SYSPRINT output nartcr DFSORT/ICETOOL 17 Wed Oct 05, 2016 10:46 pm
This topic is locked: you cannot edit posts or make replies. Sort card to replace text using cross... Susanta SYNCSORT 32 Tue Sep 13, 2016 4:17 pm
No new posts Icetool or Joinkeys example to compar... ishant chauhan DFSORT/ICETOOL 21 Sat Aug 20, 2016 2:40 am


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