Re: Function CHGACGCDE not allowed.

[Stuart Rowe <rowestu@xxxxxxxxx>]

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.