Convert character to numeric

Bettie HoTong · Posted: Thu Apr 12, 2012 7:22 am

I am trying to convert the last 6 bytes of the 25 byte record to TT.TTT format

Input:

vasanthz · Posted: Thu Apr 12, 2012 9:07 am

The sort cards,

Bill Woodger · Posted: Thu Apr 12, 2012 12:03 pm

Frank Yaeger · Posted: Thu Apr 12, 2012 10:52 pm

Bettie,

The DFSORT control statements you show give the output you say you want.

Are you showing the expected output incorrectly (see Bill's post)? If so, you need to show me the exact output you want.

Does your input file have RECFM=FB or RECFM=VB? If RECFM=VB, then we would need to account for the 4-byte RDW in each record.

At any rate, I can't answer your question until you give me accurate information about your requirement.

Bettie HoTong · Posted: Thu Apr 12, 2012 11:02 pm

All , thanks for replying!

Bill,
The output you are showing is what I need.
As you see, the 2.9 became 0.029 , I was expecting 02.900. And the 4 became 00.004 instead of 04.000.

This is FB file.

So, what am I missing ?

Thanks again for your help!

Frank Yaeger · Posted: Thu Apr 12, 2012 11:29 pm

It's a bit more complicated than you think.

If all of your values were normalized to dd.ddd, then your control statements would work. But you have unnormalized values of d.ddd, d.d, d.ddd, dd.dd, etc, so you have to handle the various unnormalized forms.

For example, if you have b2.9bb (b for blank), UFF treats that as 29, but you want it treated as 02900. So you have to be more clever.

Here's a DFSORT job that will give you what you want:

Bettie HoTong · Posted: Fri Apr 13, 2012 12:20 am

Frank
Thanks so much!!! I will try it.
Bettie