Consultor Eletrônico



Kbase 19884: Errno 3440 Running Native 4GL program - AS/400
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   11/12/2002
Status: Unverified

SYMPTOM(s):

** Unable to run startup procedure <name>. (492)

** Unable to open file: <file-name>. Errno=<number>. (98)

You might get the following errors when running a procedure using the
native 4GL Client and ROOT path resolution:

STRPROCLI STRPROC('/qsys.lib/qgpl.lib/prog.file/p.mbr')
Ownership of object P003048959 in PROTMP type *USRSPC
changed.
Ownership of object LBISPC0000 in QTEMP type *USRSPC changed.
Could not open member P in file PROG in library QGPL.

Application error. *N unmonitored by *N at statement *N, instruction X'4000'.

CAUSE:

This happens if the file is transferred via FTP as a physical file (not a stream file). The problem is that the type of file created is PF-DTA but it needs to be PF-SRC (Source File).

FIX:

In order to successfully run a procedure that must be transferred
via FTP, you must first create a source file on AS/400 at the
location you want to transfer it to, and then transfer the file.

To accomplish this, follow these steps:

1) To create a source file under AS/400, run:

QSYS/CRTSRCPF FILE(QGPL/PROG)

2) From the FTP session, send the file to the same location as
the newly-created source file:

put prog.p qgpl/prog.