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 Using ICETOOL, how we can seperate th... bshkris SYNCSORT 5 Tue May 09, 2017 8:33 pm
No new posts QUESTION: RETURN CHANNEL pahiker CA Products 21 Thu Apr 20, 2017 12:31 am
No new posts Group elements using ICETOOL Learncoholic DFSORT/ICETOOL 2 Fri Apr 14, 2017 11:01 am
No new posts The Last Two Question For You To Ask ... CaptBill Mainframe Interview Questions 0 Fri Apr 14, 2017 5:42 am
No new posts PA02 - Programmtically control attent... dodithegreat IMS DB/DC 1 Thu Apr 06, 2017 8:33 pm


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