Discussion :

[gege91]

Bonsoir à tous,

J'ai une question qui va peut-être sembler bizarre.
J'ai un 1er AS400 en version 5r1 que j'appelrai AS400-1
J'ai un deuxième AS400 en version 5r3 que j'appellerai AS400-2
AS400-1
Sur l'AS400-1, j'ai des bibs avec des applis pour la prod.
Je crée une nouvelle bib TOTO par exemple
Depuis pdm, je recopie tous les objets d'une des bibs de prod (COMPTA par exemple) dans cette nouvelle bib TOTO. (option 3)
Je renomme la bib de prod COMPTA en COMPTA1 par exemple (option 7)
Je renomme la bib TOTO en COMPTA (option 7)
Je lance l'appli COMPTA, pas de problème.
AS400-2
Sur l'AS400-2, j'ai restauré les bibs avec les applis pour la prod.
A priori, toutes les applis tournent
Mais là où ça se complique :
Je crée une nouvelle bib TOTO par exemple
Depuis pdm, je recopie tous les objets d'une des bibs de prod (COMPTA dans mon exemple) dans cette nouvelle bib TOTO. (option 3)
Je renomme la bib de prod COMPTA en COMPTA1 par exemple (option 7)
Je renomme la bib TOTO en COMPTA (option 7)
Je lance l'appli COMPTA, et ça plante. J'ai un message interne de l'appli COMPTA qui me dit que je n'ai pas le droit de modifier. (L'appli n'est pas simple et ça part dans tout les sens avec de l'ILE, des modules, des programmes de service, des BND, des CL de création d'objets, des bibs de fichiers utilisés dans les compiles, etc.)

J'ai fait le même test sur d'autres bibs d'autres applis (qui en son temps ont été réalisées par le même programmeur qui est parti) et c'est le même problème.

Quelqu'un aurait-il une idée ? (Dans un coin, j'ai trouvé un CL qui contrôle le numéro de série des AS400, dans ce CL. J'ai ajouté le numéro de série du nouvel AS400 mais sans succès)

J'en déduit que lors de la copie (via l'option 3 de PDM) quelques chose "estempille" la copie des objets recopiés.


Merci de votre aide

[Simka1000]

Peux être un problème de propriétaire et de droits ? existants sur AS400-1 et pas AS400-2 ?

[jump400]

hum ... je sens bien aussi un pb de profil : le paramètre "propriétaire" OWNER n'est-il pas différent entre les 2 machines sur le profil utilisé ?
c'est à dire à *USRPRF sur une machine et à *GRPPRF sur l'autre ?

[gege91]

Tout d'abord merci à vous tous d'avoir pris le temps de lire ma littérature.
Pour répondre à plusieurs de vos questions :
- Sur l'AS400-2 (v5r3) tout fonctionne correctement (COMPTA, BL, STOCK, etc.) Lors de la bascule, je ne me suis pas posé de question, j'ai recopié toutes les bibs de l'AS400-1, évitant de faire un ménage à la volé qui est parfois un peu hasardeux.
Après les manips de "copie", "rename", c'est là que ça ne marche plus.(problème identique sur bib COMPTA, sur bib BL, sur bib STOCK)
Du coté des clés de licences, pas de problème sur ce sujet, il n'y en n'a pas.
A priori, je ne pense pas à un problème de propriétaire ou de droits.
J'ai eu un doute là-dessus alors j'ai recrée à l'identique les profils de l'AS400-1sur l'AS400-2, mais ça n'a rien changé à mon problème.
Pour ce qui pourrait être des problèmes de mauvaises réplications lors de la copie, j'ai refait la manip plusieurs fois et toujours le même problème.
Côté API, je n'ai pas recherché dans cette direction.

Je pense qu'il ne me reste que le mode "debug" pour essayer de pister le problème. Mais là, je ne suis pas un spécialiste (Faut bien commencer un jour)

Merci de votre aide

[Mercure]

Tu pourrais nous dire ici le message de plantage que tu reçois, ça peut bien aider.

Et puis, au lieu de procéder par l'option 3 de PDM, j'aurais de préférence fait un savlib/savobj suivi d'un rstlib/rstobj (ou savrstlib/savrstobj). Ensuite, ce que signale Fabrice à propos de la BDD pas au même niveau et des APIs est tout à fait fondé.

[Hédhili Jaïdane]

Bonjour.

- Une fois restauré les objets sur le 2, ont devrait restaurer les droits privés. Les objets restaurés ou dupliqués héritent uniquement les droits publics et même pas ceux du param CRTAUT de la bib. Si des objets existent au moment de la restauration ou de la duplication (replace=*yes), les droits publics sont ceux des objets remplacés. Donc si tu dois reprendre, il faudrait les effacer avant.
- Si tu veux travailler sur une copie, il faudrait laisser COMPTA telle qu'elle, puisqu'elle marche, faire une copie TOTO, laisser la prod travailler avec COMPTA et toi tu fais le ménage dans TOTO petit à petit. On a souvent des problèmes avec les LF quand on fait les manips que tu as faites (surtout le rename).
- Si tu dis que tu as un problème de sécurité interne liée au S/N, il peut y avoir autre chose, comme le nom du système, etc...

[gege91]

Compte tenu de toutes vos réponses, j'ai plusieurs pistes à exploiter.
Juste pour répondre à certaines de vos questions :
- Le message reçu : Comme je l'ai indiqué, ce n'est pas un message std AS400, c'est un message d'erreur interne à l'appli : "Modifications non autorisées"
- j'ai recopié uniquement les bibs applis et bibs spécifiques de l'entreprise. Pas les bibs standard IBM comme QGPL ou QUSRSYS

Je refais des manips et je reviens vers vous.

Merci déjà de toutes vos réponses

[Simka1000]

Il faudrait (si tu le peux) que tu fasses un DEBUG sur l'appli , histoire de voir pourquoi et comment le message est généré (ça doit être conditionné dans un programme)