Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
Overlay number to spaces in file

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
Author Message
sunnyk

Active User


Joined: 20 Oct 2004
Posts: 59

PostPosted: Wed Jun 22, 2005 8:53 pm    Post subject: Overlay number to spaces in file
Reply with quote

hi,
I am having a input file which has a month field like 01,02....10,11,12

here I want to convert 01 - 09 to ^1-^9 ... where ^ is space i.e to convert a number like 0 to a space.

plz suggest using DFSORT....


thnx
Back to top
View user's profile Send private message
References
PostPosted: Wed Jun 22, 2005 8:53 pm    Post subject: Re: Overlay number to spaces in file Reply with quote

Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 4190
Location: San Jose, CA

PostPosted: Wed Jun 22, 2005 9:10 pm    Post subject:
Reply with quote

Here's a DFSORT job that will do what you asked for:

Code:

//S1    EXEC  PGM=ICEMAN
//SYSOUT    DD  SYSOUT=*
//SORTIN DD *
01
02
03
04
05
06
07
08
09
10
11
12
/*
//SORTOUT DD SYSOUT=*
//SYSIN    DD    *
  OPTION COPY
  INREC IFTHEN=(WHEN=(1,1,CH,EQ,C'0'),OVERLAY=(1:X))
/*
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1