Discussion :

[perseepj]

Bonjour,

Nous venons d’installer COBOL v6.2.
Je n’arrive plus à lancer mes JCls de compilations. J’ai une erreur dans la step de compilation :

USER COMPLETION CODE=4093 REASON CODE=0000001C

En détail :
Le PDS où se trouve IGYCRCTL est IGY.V62.SIGYCOMP

JOB et JOBLIB sont construits comme cela :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
//#KMW004X JOB (_________),'0,0000000-COMPI62',
//        CLASS=A,MSGCLASS=X,NOTIFY=#PAJ002,
//        LINES=90000,
//        REGION=4M,MSGLEVEL=(1,1)

//JOBLIB  DD DISP=SHR,DSN=CEE.SCEERUN
//        DD DISP=SHR,DSN=IGY.V62.SIGYCOMP
//        DD DISP=SHR,DSN=CICSTS54.CICS.SDFHLOAD

La step de compilation

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
//COBOLII EXEC PGM=IGYCRCTL,
//        PARM=('NOC(E),DATA(31),TRUNC(BIN),FLAG(I,I),MAP',
//        'OFFSET,XREF,APOST,LIB,NODYNAM,RENT'),COND=(7,LT)

L’exécution me retourne l’erreur

USER COMPLETION CODE=4093 REASON CODE=0000001C

L’active module au moment de l’abend est CEEPLPKA

Le manuel « Language Environment Run-Time Messages” liste cette explication pour erreur 4093 / 1C

X'1C' (28)
Stack management could not allocate stack and/or heap storage. Ensure that the REGION size is sufficient to run the application. Verify that the storage sizes specified in the HEAP, ANYHEAP, BELOWHEAP, STACK, LIBSTACK and STORAGE runtime options are reasonable, given the region size allocated to the application.

Je ne sais pas si cette explication corresponds à l’erreur. En tout cas je n’arrive pas à corriger cette anomalie.

Merci d'avance pour toute explication
Pascal Jean

[macgawel]

Bonjour.
https://www.ibm.com/support/knowledg...00/cs00020.htm

X'1C' (28)
Stack management could not allocate stack and/or heap storage. Ensure that the REGION size is sufficient to run the application. Verify that the storage sizes specified in the HEAP, ANYHEAP, BELOWHEAP, STACK, LIBSTACK and STORAGE runtime options are reasonable, given the region size allocated to the application.

Commence par essayer REGION=8M.

[perseepj]

Merci Macgawel,
J'ai essayé avec 8M, 7M et 6M. L'erreur S822 est retournée.
Avec 5M on retombe dans l'erreur initiale.
J'essaie plus tard avec 0M.

[perseepj]

Bonjour,
J'ai exécuté le JCL en mettant REGION=0M et en ajoutant ces lignes:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
//SYSUT8   DD  UNIT=SYSDA,SPACE=(TRK,(50,50))
//SYSUT9   DD  UNIT=SYSDA,SPACE=(TRK,(50,50))
//SYSUT10  DD  UNIT=SYSDA,SPACE=(TRK,(50,50))
//SYSUT11  DD  UNIT=SYSDA,SPACE=(TRK,(50,50))
//SYSUT12  DD  UNIT=SYSDA,SPACE=(TRK,(50,50))
//SYSUT13  DD  UNIT=SYSDA,SPACE=(TRK,(50,50))
//SYSUT14  DD  UNIT=SYSDA,SPACE=(TRK,(50,50))
//SYSUT15  DD  UNIT=SYSDA,SPACE=(TRK,(50,50))
//SYSMDECK DD  UNIT=SYSDA,SPACE=(TRK,(50,50))

Merci pour les réponses
Pascal Jean

[Luc Orient]

Bonjour,

Et ça marche maintenant ?

[perseepj]

Bonjour Luc,

Oui cela compile et link maintenant.
Pour être précis, l'extrait du JCL concerne les ajouts dans la step de compilation IGYCRCTL
Pour la step de link HEWLH096, le SYSLMOD doit être un PDSE.