comp-3 in a txt file

[veronikaluv]

Hi there!
I'm trying to insert a number 100.00 S9(13)V9(2) comp-3n in a txt file.
I have the record:
01 RECORD.
03 REC-TYPE PIC S9(2).
03 REC-TYPE10.
05 FILI PIC X(5).
05 CON PIC X(12).
03 REC-TYPE20 REDEFINES REC-TYPE10
05 CAUS PIC X(5).
05 IMP PIC S9(13)V9(2) COMP-3.
05 FILLER PIC (4).

When I make a physical .txt file on a hard disk, (to open it and read it), just to work with some examples, how do I need to write down the comp-3 value?
If CAUS has the value A (4blanks), IMP has the value 100,00, and filler are 4 spaces. In any way that I tried compiling it, I receive for imp the values like +303030303....
Thanks.

[arunprasad.k]

If you want the variable IMP to be in a readable format use editted variables. Refer this.

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/igy3lr10/5.3.11.9.1?ACTION=MATCHES&REQUEST=ZZ&TYPE=FUZZY&SHELF=&DT=20020920180651&CASE=&searchTopic=TOPIC&searchText=TEXT&searchIndex=INDEX&rank=RANK&ScrollTOP=FIRSTHIT#FIRSTHIT

[CICS Guy]

in a txt file.

Huh? What platform are you trying to do this on?

[dick scherrer]

Hello,

I'm trying to insert a number 100.00 S9(13)V9(2) comp-3n in a txt file.

COMP-3 (packed-decimal) is not valid in a "text file".

You can create a text file or you can create a file with packed-decimal data, but they will not be the same file.

If you explain the requirement, we can probably offer suggestions on how to proceed.

[CICS Guy]

If just trying to get IMP equal to 100.00:
MOVE 100.00 TO IMP.
05 IMP PIC S9(13)V9(2) COMP-3 VALUE 100.00.

[CICS Guy]

values like +303030303....

BTW, that looks like a hex display of unpacked ASCII zeros......