The Encoding= Option and Packed Decimals

[BrianT]

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!

[mohamed_zaki]

Check

Reading EBCDIC Files on ASCII Systems

maybe it will help