Re: Function CHGACGCDE not allowed.

CHGACGCDE cannot run in a multi-threaded job (according to the error
message). Might have something to do with your Java classes as Java runs
in
multiple threads, might be affecting your job.

Stu



On Mon, Feb 28, 2011 at 21:46, Chamara Withanachchi <chamaraw@xxxxxxxxxx

wrote:

Dear All,

In our Day End Program it tries to change the Accounting Level by using
CHGACGCDE command but it is giving an Error message I have list the
messages

dditional Message Information



Message ID . . . . . . :
CPA0702

Date sent . . . . . . : 01/03/11 Time sent . . . . . . :
00:50:55



Message . . . . : CPF180B received by procedure PCOMBDAILY. (C D I
R)



Cause . . . . . : ILE Control language (CL) procedure PCOMBDAILY in
module

PCOMBDAILY in program PCOMBDAILY in library I720MSDBP detected an error
at

statement number 0000089020. Message text for CPF180B is:
Function

CHGACGCDE not allowed. Use F10 (if available) or the Display Job
Log

(DSPJOBLOG) command to see the messages in the job log for a more
complete

description of what caused the error. If you still are unable to solve
the

problem, please contact your technical support
person.

Recovery . . . : This inquiry message can be avoided by changing
the

procedure. Monitor for the error (MONMSG command) and perform error
recovery

within the procedure. To continue, choose a reply
value.


More...


Type reply below, then press
Enter.

Reply . . . .




F1=Help F3=Exit F6=Print F9=Display message
details

F10=Display messages in job log F12=Cancel F21=Select assistance
level





Display All
Messages

System:
S65D8902

Job . . : PCOMBDA001 User . . : ITDEP639 Number . . . :
949817



QGPL.


Printer device PRT01 not found. Output queue changed to QPRINT in
library

QGPL.


Printer device PRT01 not found. Output queue changed to QPRINT in
library

QGPL.


550 - CALL
PGM(STM004)

Printer device PRT01 not found. Output queue changed to QPRINT in
library

QGPL.


556 - CLRPFM
FILE(SHR00101)

Member SHR00101 file SHR00101 in I720SDBDTF
cleared.

557 - CALL
PGM(SHR002)

Environment variable
added.

Java Virtual Machine is
Classic.

Environment variable removed.



More...


Press Enter to
continue.



F3=Exit F5=Refresh F12=Cancel F17=Top
F18=Bottom









Display All
Messages

System:
S65D8902

Job . . : PCOMBDA001 User . . : ITDEP639 Number . . . :
949817



- RETURN /* RETURN due to end of CL program
*/

- RETURN /* RETURN due to end of CL program */


89000 - CHGDTAARA DTAARA(RESTART (1 10))
VALUE(CLRFILES)

89020 - CHGACGCDE
ACGCDE('001CLRFILES')

Function CHGACGCDE not
allowed.

Function check. CPF180B unmonitored by PCOMBDAILY at statement
0000089020,

instruction
X'0000'.

CPF180B received by procedure PCOMBDAILY. (C D I
R)

? R


89020 - CHGACGCDE
ACGCDE('001CLRFILES')

Function CHGACGCDE not
allowed.

Function check. CPF180B unmonitored by PCOMBDAILY at statement
0000089020,

instruction
X'0000'.

CPF180B received by procedure PCOMBDAILY. (C D I
R)


Bottom


Press Enter to
continue.



F3=Exit F5=Refresh F12=Cancel F17=Top
F18=Bottom







Display Module
Source



Program: BPCOMBD Library: I720LSDBP Module:
BPCOMBD

1
PGM

2


3 /* Variable Declaration
*/

4 DCL VAR(&RTNVAL) TYPE(*CHAR) LEN(1) VALUE('
')

5


6 /* Call Transaction Server Batch Audit Program
*/

7 CALL PGM(SPD001R)
PARM('A')

8


9 /* Check the Month End
*/

10 CALL PGM(CHKMONE)
PARM(&RTNVAL)

11


12 IF COND(&RTNVAL = '1')
THEN(DO)

13 CALL PGM(MONBPCOM)


14


15
ENDDO


More...


Debug . .
.
THREAD(*SERIALIZE)




F3=End program F6=Add/Clear breakpoint F10=Step F11=Display
variable

F12=Resume F17=Watch variable F18=Work with watch F24=More

keys

MONBPCOM program calls the SHR001R program and it is calling some Java
Classes The SHR001R program compiled with THREAD(*SERIALIZE) can any one
tell me how to overcome this.



--
Regards,

Chamara Withanachchi
IBM Certified Power System Expert
RPG Programmer
(owner of www.rpgiv.info)

WWW.RPGIV.INFO
Mob: +94 77 1678646
chamaraw@xxxxxxxxxx

i want to be future ready. i want control. i want an i.
--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing

list

To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.