Discussion :

[bghr12]

Bonjour ,

Je cherche à ajouter sur un écran d'interrogation de suivi d'OF (MKI3) qui a pour table de référence MFGOPETRK un champ de la table TABMAT (EMPDES) et qui correspond à l'intitulé du matricule (EMPNUM) présent dans la table MFGOPETRK.

J'arrive à ajouter mon champ dans l'écran lié à ma fonction GESTKI qui à pour action GOBJECT mais celui-ci ne me ramène aucune valeur .

Quelqu'un peut il m'aiguiller sur la procédure?

[jeromecha]

Il faut que tu mettes une action avant_zone sur ton champ avec le code suivant (à vérifier/contrôler)

Code :

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

1
2
3
4
5
6
7
8
If clalev ([ZTMA])=0 : Local File TABMAT [ZTMA] : Endif
 
Read [F:ZTMA]TMA0 = [M:MKI3]EMPNUM(nolign-1)
If !fstat Then 
  VALEUR= [F:ZTMA]EMPDES
Else
  VALEUR ="####"
Endif

[bghr12]

Bonjour Jeromecha,

Merci pour ton aide. Comme je suis un peu novice dans le domaine, ce fameux code ou dois je le renseigner? il faut que crée une nouvelle action?

[jeromecha]

Si tu as plusieurs demandes de cet type il faudrait que :
- soit tu suives une petite formation dev X3
- soit tu demandes à un développeur X3 freelance (il y en a quelques uns sur le forum) que te faire le développement;
On ne peut pas expliquer tout le dév X3 sur le forum !!

Je vais quand même essayer de t'aider sur ce point précis !!
1/tu vas dans l'écran MKI3
2/tu sélectionnes la ligne du champs EMPDES
3/tu ajoutes une action spé de type avant_zone

4/ Tu valides ton écran
5/ Tu édites le traitement SPEMKI3
6/ Tu ajoutes le code que je t'ai donné dans la partie Subprog AV_EMPDES(VALEUR)
7/ Tu compiles (F7)


Il faut surement également revalider la transaction (Paramétrage/Production /Transaction de saisie/Ordre de fabrication

Et c'est tout

[bghr12]

Je ne suis pas si mauvais que ça j'étais arrivé jusqu'à ton étape 4 c'est a partir de l'édition du traitement que je bloque . Je ne sais pas d’où éditer le traitement pour y ajouter le code c'est la mon petit problème

[bghr12]

J'ai trouver c'est bon merci pour ton aide me reste à tester mais a priori tout est ok

[bghr12]

Bon encore des progrès a faire. la compilation ne fonctionne pas.

Voici le code ajouter à la suite de Subprog :

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
# Gestion du masque MKI3 (Spécifique)
 
 
######################################################################################
 
######################################################################################
## Etiquette ajoutée par le superviseur (écran MKI3) 13/02/2019 16:02:02 (ADMIN)
######################################################################################
Subprog AV_EMPDES(VALEUR)If clalev ([ZTMA])=0 : Local File TABMAT [ZTMA] : Endif
 
Read [F:ZTMA]TMA0 = [M:MKI3]EMPNUM(nolign-1)
If !fstat Then 
  VALEUR= [F:ZTMA]EMPDES
Else
  VALEUR ="####"
Endif
 
######################################################################################

Je pense que j'ai fait un petit carnage de langage

[jeromecha]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Subprog AV_EMPDES(VALEUR)
Variable Char    VALEUR()
If clalev ([ZTMA])=0 : Local File TABMAT [ZTMA] : Endif
 
Read [F:ZTMA]TMA0 = [M:MKI3]EMPNUM(nolign-1)
If !fstat Then 
  VALEUR= [F:ZTMA]EMPDES
Else
  VALEUR ="####"
Endif
 
End

[bghr12]

Génial merci pour l'aide tout fonctionne correctement. Tu sais s'il existe des tuto en ligne de dev pour prendre quelques cours ou il faut carrément une formation ?