Pb de version d'un programme exécutable

**edw4rd** · 30/05/2013, 11h12

Bonjour,

Sur un serveur, j'ai deux bibliothèques qui contiennent deux versions différentes d'un même programme... dans la théorie.

PGM_NEW/TRAITEMENT
PGM_OLD/TRAITEMENT

Dans la pratique lorsque j'effectue un debug, sur les deux programmes, je trouve les nouvelles lignes de codes dans les deux, alors qu'elles devraient être uniquement présentes dans l'un de ces deux programmes.

à priori j'ai deux fois le même programme, et pourtant quand j'affiche la description de chaque programme, j'ai des dates de créations différentes (ce qui est attendu... dans la théorie). Par contre, la taille du programme est identique pour les deux versions...

une idée ?

**m4k-Hurrican** · 30/05/2013, 11h51

Bonjour,

Regarde surtout les infos du source à l'origine de l'objet, avec la commande DSPPGM (aller jusqu'au module si programme ILE).

**edw4rd** · 30/05/2013, 14h50

Je ne sais pas si ça vient du type SQLCBLLE.

Il y a un paramètre de compilation "Fichier INCLUDE" par défaut sur *SRCFILE

Je le change bien pour mettre le fichier qui m'intéresse, mais cela ne change rien à mon problème.

**m4k-Hurrican** · 30/05/2013, 17h14

Fais un :

Code :

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

DSPPGM PGM(NomDeLaBiblio/NomDuPgm) DETAIL(*MODULE)

Ensuite 5 en face du module correspondant. Colle ensuite la page ici (fais çà pour les 2 pgm).

**edw4rd** · 31/05/2013, 13h01

Ci-dessous, la description du module de chaque programme:

PGM_OLD/TRAITEMENT

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
Attributs de module:                                                   
  Module . . . . . . . . . . . . . . . . . . . . :   TRAITEMENT            
    Bibliothèque . . . . . . . . . . . . . . . . :     QTEMP           
  Fichier source . . . . . . . . . . . . . . . . :   QLBLSRC           
    Bibliothèque . . . . . . . . . . . . . . . . :     LIB_SOURCE      
  Membre source  . . . . . . . . . . . . . . . . :   TRAITEMENT            
  Attribut du module . . . . . . . . . . . . . . :   CBLLE             
  Date et heure de création du module  . . . . . :   12/04/13 16:20:17
  Date et heure de modification du fichier source:   12/04/13 14:20:40
  ID codé de jeu de caractères . . . . . . . . . :   297               
  Données de création  . . . . . . . . . . . . . :   *YES              
  Table de séquence de tri . . . . . . . . . . . :   *HEX              
  Identificateur de langue . . . . . . . . . . . :   *JOBRUN           
  Niveau d'optimisation  . . . . . . . . . . . . :   *NONE             
  Niveau d'optimisation maximal  . . . . . . . . :   *FULL      
  Données de débogage  . . . . . . . . . . . . . :   *YES   
  Données de profilage . . . . . . . . . . . . . :   *NOCOL 
  Nombre de procédures . . . . . . . . . . . . . :   4      
  Nombre de procédures réordonnées par bloc  . . :   0      
  Nombre de procédures mesurées en ordre de bloc :   0      
  Collecte performances possible . . . . . . . . :   *PEP   
  Espace mémoire à téraoctets activé . . . . . . :   *YES   
  Modèle d'espace mémoire  . . . . . . . . . . . :   *SNGLVL
  Module créé en édition . . . . . . . . . . . . :   V5R4M0
  Module créé pour édition . . . . . . . . . . . :   V5R4M0
  Niveau de contrôle de l'objet  . . . . . . . . :          
  Modifié par utilisateur  . . . . . . . . . . . :   *YES   
  Logiciel sous licence  . . . . . . . . . . . . :          
  Numéro de PTF  . . . . . . . . . . . . . . . . :          
  ID APAR  . . . . . . . . . . . . . . . . . . . :         
  Options du microcode sous licence  . . . . . . :   *NONE
Attributs de module DB2 UDB for i5/OS:                         
  Nombre d'instructions SQL  . . . . . . . . . . :   13        
  Contrôle de validation . . . . . . . . . . . . :   *NONE     
  Base de données relationnelle  . . . . . . . . :   *LOCAL    
  Convention d'appellation . . . . . . . . . . . :   *SYS      
  Copie de données admise  . . . . . . . . . . . :   *OPTIMIZE 
  Groupage admis . . . . . . . . . . . . . . . . :   *ALLREAD  
  Différer PREPARE . . . . . . . . . . . . . . . :   *NO       
  Fermer curseur SQL . . . . . . . . . . . . . . :   *ENDACTGRP
  Format de date . . . . . . . . . . . . . . . . :   *DMY      
  Séparateur de date . . . . . . . . . . . . . . :   /         
  Format d'heure . . . . . . . . . . . . . . . . :   *HMS      
  Séparateur d'heure . . . . . . . . . . . . . . :   :         
  Nom de collection par défaut . . . . . . . . . :   *NONE     
  Nom de module SQL  . . . . . . . . . . . . . . :   TRAITEMENT            
    Bibliothèque . . . . . . . . . . . . . . . . :     LIB_PROGRM
  Profil utilisateur dynamique . . . . . . . . . :   *USER       
  Table de séquence de tri SQL . . . . . . . . . :   *HEX        
  Identificateur de langue SQL . . . . . . . . . :   FRA         
  Méthode de connexion . . . . . . . . . . . . . :   *DUW        
  Chemin SQL . . . . . . . . . . . . . . . . . . :   *LIBL

PGM_NEW/TRAITEMENT

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
Attributs de module:                                                   
  Module . . . . . . . . . . . . . . . . . . . . :   TRAITEMENT            
    Bibliothèque . . . . . . . . . . . . . . . . :     QTEMP           
  Fichier source . . . . . . . . . . . . . . . . :   QLBLSRC           
    Bibliothèque . . . . . . . . . . . . . . . . :     LIB_SOURCE      
  Membre source  . . . . . . . . . . . . . . . . :   TRAITEMENT            
  Attribut du module . . . . . . . . . . . . . . :   CBLLE             
  Date et heure de création du module  . . . . . :   14/05/13 13:53:50
  Date et heure de modification du fichier source:   14/05/13 13:49:28
  ID codé de jeu de caractères . . . . . . . . . :   297               
  Données de création  . . . . . . . . . . . . . :   *YES              
  Table de séquence de tri . . . . . . . . . . . :   *HEX              
  Identificateur de langue . . . . . . . . . . . :   *JOBRUN           
  Niveau d'optimisation  . . . . . . . . . . . . :   *NONE             
  Niveau d'optimisation maximal  . . . . . . . . :   *FULL       
  Données de débogage  . . . . . . . . . . . . . :   *YES    
  Données de profilage . . . . . . . . . . . . . :   *NOCOL  
  Nombre de procédures . . . . . . . . . . . . . :   4       
  Nombre de procédures réordonnées par bloc  . . :   0       
  Nombre de procédures mesurées en ordre de bloc :   0       
  Collecte performances possible . . . . . . . . :   *PEP    
  Espace mémoire à téraoctets activé . . . . . . :   *YES    
  Modèle d'espace mémoire  . . . . . . . . . . . :   *SNGLVL 
  Module créé en édition . . . . . . . . . . . . :   V5R4M0  
  Module créé pour édition . . . . . . . . . . . :   V5R4M0  
  Niveau de contrôle de l'objet  . . . . . . . . :           
  Modifié par utilisateur  . . . . . . . . . . . :   *YES    
  Logiciel sous licence  . . . . . . . . . . . . :           
  Numéro de PTF  . . . . . . . . . . . . . . . . :           
  ID APAR  . . . . . . . . . . . . . . . . . . . :           
  Options du microcode sous licence  . . . . . . :   *NONE
Attributs de module DB2 UDB for i5/OS:                          
  Nombre d'instructions SQL  . . . . . . . . . . :   13         
  Contrôle de validation . . . . . . . . . . . . :   *NONE     
  Base de données relationnelle  . . . . . . . . :   *LOCAL     
  Convention d'appellation . . . . . . . . . . . :   *SYS      
  Copie de données admise  . . . . . . . . . . . :   *OPTIMIZE 
  Groupage admis . . . . . . . . . . . . . . . . :   *ALLREAD  
  Différer PREPARE . . . . . . . . . . . . . . . :   *NO       
  Fermer curseur SQL . . . . . . . . . . . . . . :   *ENDACTGRP
  Format de date . . . . . . . . . . . . . . . . :   *DMY      
  Séparateur de date . . . . . . . . . . . . . . :   /          
  Format d'heure . . . . . . . . . . . . . . . . :   *HMS      
  Séparateur d'heure . . . . . . . . . . . . . . :   :          
  Nom de collection par défaut . . . . . . . . . :   *NONE     
  Nom de module SQL  . . . . . . . . . . . . . . :   TRAITEMENT            
    Bibliothèque . . . . . . . . . . . . . . . . :     LIB_PROGRM
  Profil utilisateur dynamique . . . . . . . . . :   *USER       
  Table de séquence de tri SQL . . . . . . . . . :   *HEX        
  Identificateur de langue SQL . . . . . . . . . :   FRA         
  Méthode de connexion . . . . . . . . . . . . . :   *DUW        
  Chemin SQL . . . . . . . . . . . . . . . . . . :   *LIBL

**FORMULARY** · 31/05/2013, 13h38

Dans la pratique lorsque j'effectue un debug, sur les deux programmes, je trouve les nouvelles lignes de codes dans les deux, alors qu'elles devraient être uniquement présentes dans l'un de ces deux programmes.

Je ne connais pas les options pour Cobol, mais en RPG, lorsqu'on spécifie simplement "Vue de débogage" avec *SOURCE, le programme n'est pas compilé avec le source dans l'objet, mais seulement la référence à la ligne du membre source. Dans ce cas, si on modifie le source du programme et qu'on débogue le programme, c'est le nouveau source qui est affiché et non l'ancien. Quand on fait du pas à pas, on peut donc voir le programme s'arrêter sur une ligne de commentaire par exemple ...

Pour que le source soit stocké avec le programme, il faut préciser DBGVIEW(*LIST) et OPTION(*SRCSTMT *SHOWCOPY)
Attention aussi aux sources qui utilisent des INCLUDE ...

Le fait que le débogage des deux programmes donnent le même source peut donc être tout à fait normal, car ils ont tous les deux été compilés à partir du même membre source (le même nom seulement, puisque le membre a été modifié entre les deux compilations)

**m4k-Hurrican** · 31/05/2013, 21h00

Formulary pointe le problème de manière pertinente.
En effet on voit bien que tes sources, même si le membre a le même nom dans le même fichier et la même bibliothèque, n'ont pas du tout la même date de modification. Tes objets sont donc aussi différents.
C'est juste ton option de compilation qui n'est pas la bonne.

Pb de version d'un programme exécutable

AS/400

Discussions similaires

Partager

Partager