MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Reformatting the fields

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
naveen_kj
Beginner


Joined: 03 Feb 2003
Posts: 18
Topics: 8
Location: India

PostPosted: Thu Aug 28, 2003 3:07 am    Post subject: Reformatting the fields Reply with quote

I need to convert the files from one format to another.

I am facing problem, while converting the numeric fields to characters and viceversa.

From 9(16) to X(16),
X(20) to S9(11) COMP-3,
X(10) to 9(09),
X(10) to 9(05) COMP.

I am using the INREC.

Please suggest the ways to solve it using sort.

Thanks in advance,

Naveen
Back to top
View user's profile Send private message Yahoo Messenger MSN Messenger
coolman
Intermediate


Joined: 03 Jan 2003
Posts: 283
Topics: 27
Location: US

PostPosted: Thu Aug 28, 2003 4:01 am    Post subject: Reply with quote

Do you have FileAid at your shop?

Cheers,
Coolman.
________
Chevrolet 150


Last edited by coolman on Sat Feb 05, 2011 1:27 am; edited 1 time in total
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12376
Topics: 75
Location: San Jose

PostPosted: Thu Aug 28, 2003 5:01 am    Post subject: Reply with quote

Naveen,

Try this

Code:

 INREC FIELDS=(POS,16,ZD,EDIT=(TTTTTTTTTTTTTTTT),
               POS,20,ZD,PD,LENGTH=6
               POS,10,ZD,EDIT=(TTTTTTTTT)
               POS,10,ZD,BI,LENGTH=4)


If you have imbedded spaces for the character fields, the above sort cards will fail.so change use FS instead of ZD for the format


Hope this helps...

cheers

kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
naveen_kj
Beginner


Joined: 03 Feb 2003
Posts: 18
Topics: 8
Location: India

PostPosted: Thu Aug 28, 2003 10:02 am    Post subject: Reply with quote

Kolusu,

I am getting error while converting 9(16) to X(16),

The Error message is:
WER271A INREC STATEMENT : NUMERIC FIELD ERROR

and the '*' is pointing below ,16, (the length of the field)

Quote:

INREC FIELDS=(1:1,2,
3,16,ZD,EDIT=(TTTTTTTTTTTTTTTT),




Coolman we have the FileAid.

Naveen
Back to top
View user's profile Send private message Yahoo Messenger MSN Messenger
Deepakkt
Beginner


Joined: 14 Sep 2003
Posts: 1
Topics: 0

PostPosted: Sun Sep 14, 2003 6:01 am    Post subject: Reply with quote

Naveen,

The length limit is 15 for reformatting / editing.
I have a similar requirement
(to reformat a 32 byte number) to a PD field of length 10 (truncation is okay). Any pointers on how this can be achieved.

Thanks.
Back to top
View user's profile Send private message
vkphani
Intermediate


Joined: 05 Sep 2003
Posts: 483
Topics: 48

PostPosted: Tue Feb 24, 2004 6:54 am    Post subject: Reply with quote

Can anybody pls explain how to change the format using File Aid.
Back to top
View user's profile Send private message Send e-mail
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group