R: X-Files -- RPG400-L

Title: RE: X-Files

I had a situation like that:

From a CLLE I alloc a member of a PFM that is a DDMF on a remote AS/400,

I make some operation on this file,

At the end I disalloc the file and remove the member.

The CLLE broke down because the MBR’s PFM is still allocated.

I discover that on the remote AS/400 are still a allocation on the MBR’s PFM because a first allocation was made by the DDM and another one was added from my allocation command, so when I run my disallocation command I remove only one real allocation on the remote AS/400 and when I try to remove the member the CLLE properly broke down.

I solve this problem compiling that CLLE with DFTACTGRP *YES.

-----Messaggio originale-----
Da: Schlemme, Michael C. [mailto:mschlemme@frpaper.com]
Inviato: mercoled� 31 maggio 2000 23.08
A: 'RPG400-L@midrange.com'
Oggetto: RE: X-Files

I use QRPLOBJ as a 'temporary work' library. It gets cleaned out every other weekend (IPL). I changed the program from a CLLE to a CLP and all is fine now.

-----Original Message-----
From:   Leland, David [SMTP:dleland@Harter.com]
Sent:   Wednesday, May 31, 2000 2:46 PM
To:     'RPG400-L@midrange.com'
Subject:        RE: X-Files

I think you're just asking for trouble by creating objects directly into QRPLOBJ. I doubt that's what your problem is, but QRPLOBJ is not intended to be a user library.

Dave

-----Original Message-----
From: Schlemme, Michael C. [mailto:mschlemme@frpaper.com]
Sent: Wednesday, May 31, 2000 1:56 PM
To: 'RPG400-L@midrange.com'
Subject: X-Files

Dear list,
Could anyone out there (sounds like an X-File thing) help me understand why when the 2 highlighted statements (17400, 17700) are run in a batch program, I get the errors listed in this job log, but when I run the exact 2 statements interactively, everything works fine?

Thanks..............

17400 - CRTDDMF FILE(QRPLOBJ/CUBERRDDM) RMTFILE(SALES/SLSCUBW6JR)
RMTLOCNAME(FOXY)
Ownership of object CUBERRDDM in QRPLOBJ type FILE changed.
AUT parameter ignored.
Replaced object CUBERRDDM type *FILE was added to QRPLOBJ.
File CUBERRDDM created in library QRPLOBJ.
17700 - CPYF FROMFILE(QRPLOBJ/CUBERRDDM) TOFILE(SLSCUBW6JR) MBROPT(*ADD)
Remote database job started.
Remote database job started.
DDM object CUBERRDDM in QRPLOBJ uses remote object SALES/SLSCUBW6JR.
Value not allowed for PATHID, macro CNSSNRCV.
Pointer not set for location referenced.
Function check. MCH3601 unmonitored by QTSCOPY at statement *N,
instruction X'0815'.
Pointer not set for location referenced.
Function check. MCH3601 unmonitored by QTSCOPY at statement *N,
instruction X'0816'.
Pointer not set for location referenced.
Function check. MCH3601 unmonitored by QTSCOPY at statement *N,
instruction X'0817'.
Pointer not set for location referenced.
Function check. MCH3601 unmonitored by QTSCOPY at statement *N,
instruction X'081D'.
Pointer not set for location referenced.
Function check. MCH3601 unmonitored by QTSCOPY at statement *N,
instruction X'081E'.
Pointer not set for location referenced.
Function check. MCH3601 unmonitored by QTSCOPY at statement *N,
instruction X'081F'.
Value not allowed for PATHID, macro CNSERR.
Cannot load or unload DDM file CUBERRDDM in QRPLOBJ.
0 records copied to SLSCUBW6JR in UTLOBJ.
Function check. CPF9212 unmonitored by DWH001C12 at statement 0000017700,
instruction X'0000'.
CPF9212 received by procedure DWH001C12. (C D I R)