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
 

 

sort help: how to replace '#' with SPACES

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

New User


Joined: 26 Sep 2006
Posts: 4

PostPosted: Mon Jan 28, 2008 3:31 pm    Post subject: sort help: how to replace '#' with SPACES
Reply with quote

Hi,

how to replace '#' with SPACES in file with hepl of dfsort.

Regards,
Back to top
View user's profile Send private message

krisprems

Active Member


Joined: 27 Nov 2006
Posts: 649
Location: India

PostPosted: Mon Jan 28, 2008 6:05 pm    Post subject:
Reply with quote

What is the position of the field?
What are the attributes of the file?
Back to top
View user's profile Send private message
guptae

Moderator


Joined: 14 Oct 2005
Posts: 1187
Location: Bangalore,India

PostPosted: Mon Jan 28, 2008 8:41 pm    Post subject:
Reply with quote

Hi all,

I have similar kind of problem . I need to replace all '#' with space for VB file.

Record length is 1200
I am using following sort card

Code:
OPTION COPY                       
ALTSEQ CODE=(7B40) 
OUTREC FIELDS=(1,4,5,1196,TRAN=ALTSEQ),VLFILL=X'40'   


Now the problem is output of this job is going as input of another job & since in this sort card we are filling all the shorter record with spaces so RDW of all the record will show it as 1200 BYTE.
One way which i m thinking is to convert this file into FB at the time of changing all # to spaces & VLFILl with some special character & then again convert it to VB again & use VLTRIM option

Please guide me if we have any other better approch to acheive this.
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Mon Jan 28, 2008 9:40 pm    Post subject:
Reply with quote

You don't need to convert the file to FB. You just need to use the correct syntax for VB. p,TRAN=ALTSEQ will do the change from position p to the end of each input record. So the control statements would be:

Code:

//SYSIN    DD *                     
  OPTION COPY                     
  ALTSEQ CODE=(7B40)               
  OUTREC BUILD=(1,4,5,TRAN=ALTSEQ)
Back to top
View user's profile Send private message
guptae

Moderator


Joined: 14 Oct 2005
Posts: 1187
Location: Bangalore,India

PostPosted: Mon Jan 28, 2008 10:22 pm    Post subject:
Reply with quote

Hi Kolusu,

Thanks for ur input.
I will try it tomorrow & let u know
Back to top
View user's profile Send private message
guptae

Moderator


Joined: 14 Oct 2005
Posts: 1187
Location: Bangalore,India

PostPosted: Tue Jan 29, 2008 11:32 am    Post subject:
Reply with quote

Hi Kolusu,

I have used VLFILL=X'40' OPTION because it showing

Quote:
ICE218A 3 128 BYTE VARIABLE RECORD IS SHORTER THAN 1200 BYTE MINIMUM FOR *OUTREC
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: Tue Jan 29, 2008 9:49 pm    Post subject:
Reply with quote

Quote:
ICE218A 3 128 BYTE VARIABLE RECORD IS SHORTER THAN 1200 BYTE MINIMUM FOR *OUTREC


You could NOT have gotten that error message with the control statements shown in Kolusu's post:

Code:

//SYSIN    DD *                     
  OPTION COPY                     
  ALTSEQ CODE=(7B40)               
  OUTREC BUILD=(1,4,5,TRAN=ALTSEQ)


What control statements are you actually using?
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 change 'K' or 'M' use Sort vice_versa DFSORT/ICETOOL 5 Thu May 18, 2017 7:11 am
No new posts Fileaid Update Replace with null string descann Compuware & Other Tools 4 Mon May 15, 2017 3:00 pm
No new posts Replace values in the input data Vikas Maharnawar DFSORT/ICETOOL 10 Thu May 11, 2017 2:18 pm
No new posts Adding big TEXT lines to each record ... bshkris SYNCSORT 4 Sat May 06, 2017 1:40 am
This topic is locked: you cannot edit posts or make replies. SORT trick needed bshkris SYNCSORT 6 Tue May 02, 2017 4:35 am


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