Discussion :

[a_karim_fr]

Est-ce que il y a un JCL qui permet de vérifier les zones déclarer au niveau de WORKING et qui ne sont pas utiliser au niveau de PROCEDURE DIVISION ?

exemple

Code :

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

1
2
3
4
5
6
7
8
9
WORKING-STORAGE SECTION.
01  W-D-TER             PIC X(02).
01  W-D-CLC             PIC X(10).
01  W-D-DATE           PIC 9(10).

PROCEDURE DIVISION.

MOVE '01'                     TO  W-D-TER
MOVE 'A12345698B'             TO  W-D-CLC

Alors la variable W-D-DATE est non utilisé au niveau de PROCEDURE DIVISION ni dans le reste du programme alors comment savoir que W-D-DATE est déclaré sans être utilisé ?

[Mercure]

Regarde dans la Cross Reference List du listing de compil.

[a_karim_fr]

Merci, est-ce que je peux avoir un exemple car j'ai ajouté :

Code :

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

PARM.COB='RENT,NOSSR,LIST,MAP,AR(E)',

Est-ce que il manque une paramètre a ajouter

[a_karim_fr]

Merci, est-ce que je peux avoir un exemple car j'ai ajouté :

Code :

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

PARM.COB='XREF,VBREF,RENT,NOSSR,LIST,MAP,NOSOURCE',

Au niveau de Sysout de compile j'ai :

Code :

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

1
2
3
4
5
 Defined   Cross-reference of data names   References

     15   W-D-TER  . . . . . . . . . .  M24 27
     16   W-D-CLC. . . . . . . . . . .  23 25
     18   W-D-DATE

Alors si je trouve dans Cross-reference of data names une variable pas attaché a un numéro ça veux dire que n'est pas utiliser dans le traitement ?

[Mercure]

Une référence précédée de la lettre "M" veut dire qu'elle est Modifiée dans le programme à la ligne indiquée.

Ainsi, dans ton exemple reproduit ci-dessous, la zone "W-D-TER" définie en ligne 15 est modifiée en ligne 24 et utilisée en ligne 27. La zone "W-D-CLC" définie en ligne 18 n'est jamais modifiée mais est utilisée en ligne 23 et ligne 25. La zone "W-D-DATE" définie en ligne 18 n'est ni utilisée ni modifiée.

Code :

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

1
2
3
4
5
 Defined   Cross-reference of data names   References

     15       W-D-TER  . . . . . . . . . .   M24 27
     16       W-D-CLC. . . . . . . . . . .    23 25
     18       W-D-DATE

Voir aussi ici.