Création de données dans un sous fichier (as400) [Résolu]

[mery007]

s'il vous plait si quelqu’un a déjà rencontre ce problème:

j'ai un sous fichier normal (création,modification,suppression...avec un champ ou on ramène les donnes d une autre table par la touche F4).
quand je fais la création manuel (c'est a dire je crée moi même sans faire l invite pour le champs ou il y a F4 )ça marche ,l enregistrement s'ajoute dans le fichier.
mais quand je fais la création et j' utilise la touche F4 ,l enregistrement ne s'ajoute pas.
quand je fais le débogage ==>
si je crée manuellement les donnes ça marche .
mais si je fais l invite ,il continue pas après le positionne sur le fichier il sors .

[mery007]

un autre petit détail
quand je lance le programme et je termine
je fais un CLRPFM sur le fichier ou bien je recompile je reçois le message suivant (fichier en cour d'utilisation ),je dois donc me déconnecter de la session et me reconnecter pour le faire

[larry57]

Bonjour,

Pour voir qui lock ton fichier, fait un WRKOBJLCK.
Ensuite, il faut que tu regardes dans ton programme si tu fais bien les writes ou les update.
Utilise la commande STRDBG et tu fait F11 sur tes variables.

Larry57

[larry57]

Autre chose, pour ton F4, tu appelles un autre programme ou tu reste dans le même.
Pour moi, tu doit avoir une perte des données lors de l'appel.

Larry57

[mery007]

D'abord merci infiniment pour votre reponse ,

1-Pour la commande WRKOBJLCK je l'ai utilisé ,mais le problem est que quand je lance le programme en utilisante la touche F4,je trouve que le fichier est vereuiller,et il faut que je me deconnecte pour le devrouiller.et si je cree manuelement sans la touche F4,je le trouve pas vereuiller (un peu bizard mais vrai).

2-Pour la touche F4 ,fait apel a un autre programme avec des parametres .

3- le debeug je le fait ,mais comme je vous ai dit,pendant la creation manuel sans F4 tout marche bien mais si je fait F4,il beug dans le positionnement du fichier ,donc le problem est dans le fichier ?je ne comprend pas ..!!!

4-et pour les update et les write ,je pense qu'ils sont bien ,parce que sinon meme la creation manuel ne va pas passé,je croix!!

donc est ce que le problem est dans l'objet ,la compilation du fichier?quelques options a ajouté?dans le programme?

[larry57]

Tu programmes en quel langage ?
Si c'est du RPG, rajoute cela dans ton programme :

Code :

D##FICHIER    e ds                  Extname(ton fichier dans lequel tu écris)

Tu fait ton debug et tu met un point d'arrêt après ton F4 lors du retour dans ton programme initiale.

dans la ligne du debug tu tapes :
Eval Fichier.
Tu auras le contenu de ton record.

Si cela peux t'aider à analyser.
Pour moi, tu effaces les données lors de ton appel.

Autre chose, ton programme F4 accède peux-être au fichier dans lequel tu va écrire. Il faut du coup rajouter un UNLOCK (ton fichier).

Larry57

[mery007]

Merci Lary encore une fois,

pour la solution c'est a peu pres comme vous avez dit ,la difference c'est que je l' ai fait sur le fichier utilisé pour controler le champ pour la touche F4.

donc j'ai mis==>

DSFRS E DS EXTNAME(fichier utilisé dans F4)

DSFRS est le parametre recuperé par le call du programme de l'invite

Et voila merci mille fois LARY