The Encoding= Option and Packed Decimals

Reply
N/A
Posts: 1

The Encoding= Option and Packed Decimals

Hi!

I'm running into some oddities using the encoding option.  I'm trying to download IBM mainframe data into a UNIX SAS environment, and am running into trouble with packed decimals.

When I run the following code --

filename rawdata ftp

("'MYFILE'")

host="myhost"

user=&user

pass=&pass

lrecl=73

recfm=F

debug ;

DATA WORK.SrcFile_Binary ;

    format PDecimal               best32.;

  INFILE RAWDATA EOV=FILEEND;

INPUT

       @07 PDecimal                     S370FPD08.00

       @ ;

RUN ;

I get valid values for PDecimal.

However, when I write it using the ENCODING= option..

filename rawdata ftp

("'MYFILE'")

host="myhost"

user=&user

pass=&pass

lrecl=73

recfm=F

    encoding=EBCDIC

debug ;

DATA WORK.SrcFile_Native ;

    format PDecimal               best32.;

  INFILE RAWDATA EOV=FILEEND;

INPUT

       @07 PDecimal                    PD08.00

       @ ;

RUN ;

The query does NOT return valid values.

I've tried several different informats, including PD08.00, FPD08.00, etc.

As an example, here's the binary version of one number.

0x031500750025292C

This should be transcoded to "31500920003150", but I can't find the command to make that happen.  Note that character columns work fine.

Any help you can give would be appreciated!

Super Contributor
Posts: 490

Re: The Encoding= Option and Packed Decimals

Check

Reading EBCDIC Files on ASCII Systems

maybe it will help

Ask a Question
Discussion stats
  • 1 reply
  • 167 views
  • 0 likes
  • 2 in conversation