Consultor Eletrônico

SUMMARY:

You might get the following errors when you run a program and use the
AS/400 native 4GL client on AS/400 that was transferred via FTP:

NOTE: ** Unable to understand after -- "ÀÁÃÎ/ÊÑ/ËÑ>ÈÀÁÃÎ/Ê". (247)
NOTE: ** /IFS directory/program.p Could not understand line 1. (198)
NOTE: ** Unable to run startup procedure /IFS directory/program.p.
(492)
Application error. *N unmonitored by *N at statement *N, instruction
>X'4000'.

EXPLANATION:

When you use FTP to transfer a file into an IFS directory, a binary transfer is performed. Functionally, this means that no translation is performed because your .p is now on the A/S400 in ASCII.

SOLUTION:

To avoid this error, you can use the TRANSFIL.P utility that is
shipped on a floppy with the product. If the files are already
transferred via FTP, you can use one of the following options to avoid the error:

1) Translate manually by using the CPY command as follows:

CPY OBJ('/IFS directory/program.p')TOOBJ(program.p)
TOCODEPAGE(037)
DTAFMT(*TEXT)

NOTE: A verification of the code page shows this is 819. A
code page 037 should be used for the data conversion (for an
AS/400 with a codepage 037, USA).

Refer to Progress Knowledge Base Solution 16933 for more
information about the AS/400 Native 4GL code pages and
-cpstream parameter.

or,

2) Use PROPARMS('-cpstream IBM850') when you execute the program
using the STRPROCLI command. It should look something like the
following:

STRPROCLI STRPROC('/IFS directory/program.p')
SCHDB(Schemadb)
PROPARMS( '-cpstream IBM850')

NOTE: If you use -cpstream IBM850, any output that is
directed to a printer or stream file will be in ASCII, not
EBCDIC.


Reference to Written Documentation:

Progress/400 DataServer Guide, AS/400 Programming, Control Language Reference.