Traitement CRDLIB : Fiche Technique
PECRDCTR : Contrôle réponse fiche technique
Le point d’entrée PECRDCTR permet de rajouter des contrôles dans les réponses des fiches techniques
Contexte et mode de fonctionnement
Transaction
Fichier trace
Cas d’appel
Le point d’entrée est placé juste après les contrôles standards ou ceux définies .
Variables et masques disponibles
Variable ASW contenant la réponse . Cette variable est de type « char » « décimal » « date » ou « integer » suivant la réponse attendue
L instruction « type » permet de retrouver le type d une variable
Tables ouvertes
PEQLYA : Rajout action réponse fiche technique
Le point d’entrée PEQLYA permet de rajouter des actions sur les rubriques de l écran des réponses fiches techniques
Suivant le menu local 31
Contexte et mode de fonctionnement
Transaction
Fichier trace
Cas d’appel
Le point d’entrée est placé juste après les contrôles standards ou ceux définies .
Variables et masques disponibles
Variable ASW contenant la réponse . Cette variable est de type « char » « décimal » « date » ou « integer » suivant la réponse attendue
L instruction « type » permet de retrouver le type d une variable
Tables ouvertes
PEWRIQLA : Avant écriture fichier QLYCRDASW (Fiches Qualité - Réponses)
Le point d’entrée PEWRICTR permet d alimenter des champs spécifiques dans le fichier Fiches Qualité – Réponses QLYCRDASW
Contexte et mode de fonctionnement
Transaction
Oui
Fichier trace
Cas d’appel
Le point d’entrée est placé juste avant l écriture de l enregistrement QLYCRDASW
Variables et masques disponibles
Tables ouvertes
CALSMPCOD : Calcul de la taille et du code de l échantillon
Le point d’entrée CALSMPCOD permet de déterminer la taille et le code de l échantillon de facon spécifique
Contexte et mode de fonctionnement
Transaction
Il ni a pas de transaction en cours
Fichier trace
Cas d’appel
Le point d’entrée est placé à la fin du composant CALSMPCOD du traitement CRDLIB
Le composant CALSMPCOD calcul la taille et la code de l échantillon
Le PE dispose des éléments suivants :
Variable integer LTRT : 1 Détermination automatique
Variable décimal LQTY : Quantité initial du lot
Variable char LCODE : Code de l échantillon calculé
Variable décimal LSMP : Taille de l échantillon
Le contenu de la table diverse 103 "Taille échantillon plan simple" est stocké dans divers variable
de type global
Global décimal GNBR103 : Nombre de code
Global décimal GQTY103 : Lot initial
Global integer GSMP103 : Taille
global char GCOD103 : Code
Variables et masques disponibles
Tables ouvertes
CALACPPRM : Calcul de la taille du rejet de l échantillon
Le point d’entrée CALACPPRM permet de déterminer la taille du rejet de l échantillon de facon spécifique
Contexte et mode de fonctionnement
Transaction
Il ni a pas de transaction en cours
Fichier trace
Cas d’appel
Le point d’entrée est placé à la fin du composant CALLACPRM du traitement CRDLIB
Le composant CALACPRM calcul la taille du rejet l échantillon
Le PE dispose des éléments suivants :
Variable integer LNQA : Valeur de la rubrique NQA de la table ITMFACILIT
Variable décimal LCODE : Code de l échantillon
Variable char LCODE : Code de l échantillon calculé
Variable décimal LACP : Taille du rejet
La lecture de la table QLYCRDNQA/NQA "Echantillonnage : Critères NQA" (table Données d' indus) clef : 1;LNQA;LCODE détermine la taille du rejet
Tables ouvertes
PEQLYARPL : Rajout action nouvelle fiche
Le point d’entrée PEQLYARPL permet de rajouter des actions sur la rubrique nouvelle fiche de l écran des réponses fiches techniques
Suivant le menu local 31
Contexte et mode de fonctionnement
Transaction
Fichier trace
Cas d’appel
Le point d’entrée est placé juste après les contrôles standards ou ceux définies .
Variables et masques disponibles
Variable ASW contenant la réponse . Cette variable est de type « char » Tables ouvertes
QLQGENCRD : Avant génération de l'écran de saisie des réponses
Le point d’entrée QLQGENCRD permet au moment de la génération de la fiche qualite, de modifier le contenu de la table de travail correspondant aux réponses . Il permet par exemple : de ne pas initialiser les champs de réponse, avec les valeurs par défaut des questions
Contexte et mode de fonctionnement
Transaction
Oui
Fichier trace
Non
Cas d’appel
Le point d'entrée est situé dans le sous-programme GENCRD (génération de l'écran de saisie des réponses) du traitement CRDLIB
Le point d’entrée est placé dans la boucle de lecture des réponses d une fiche technique
Chaque réponse est stockée dans une table dimensionnée par le nombre de ligne -1 de l écran QLYCRD1/QLY1 (Réponses fiche qualité) stocké dans la variable W_MAX
les composants de la table sont :
W_QST : Question
W_TYP : Type de réponse (menu local 252)
W_CTL : Type de controle (menu local 253)
W_STD : Réponse divers autorisé (menu local 1)
W_TCT : Table de controle
W_INT : Intitulé
W_DEF : Réponse par défaut
W_LOK : Type de blocage (menu local 266)
En standard le chargement est constitué comme suit :
W_QST (W_I) = [F:QLC]QSTNUM
W_TYP (W_I) = [F:QLQ]DEMASWTYP
W_CTL (W_I) = [F:QLQ]DEMCTLTYP
W_STD (W_I) = [F:QLQ]OSDASW
W_TCT (W_I) = [F:QLQ]TCT
W_LOK (W_I) = [F:QLQ]LOKTYP
W_INT (W_I) = "func CRDLIB.GETQSTSHOAXX('" + [F:QLQ]QSTNUM + "')"
Case [F:QLQ]DEMASWTYP
When 1 : W_DEF (W_I) = '"'+[F:QLQ]ALPDEFASW+'"'
When 2 : W_DEF (W_I) = num$([F:QLQ]NUMDEFASW)
When 4 : W_DEF (W_I) = num$([F:QLQ]NUMDEFASW+1)
When Default : W_DEF (W_I) = ""
L indice de chargement est stocké dans la variable W_I . Pour modifier la valeur d'un des composants
de la table il faut utilisé la valeur de cet indice moins 1 (W_I -1), car en fin de chargement l' et avant l appel du point d'entré, l'indice est augmenté de 1
Variables et masques disponibles
Tables ouvertes
QLYCRD/QLC : Fiche Technique
QLYCRDQST/QLQ : Réponses
GEN_ONGLET : Ajout zone commentaire à chaques questions
Le point d’entrée GEN_ONGLET permet de rajouter une zone commentaire saisissable à chaque question; au moment de la génération de la fiche tecnhique.
Contexte et mode de fonctionnement
Transaction
Oui
Fichier trace
Non
Cas d’appel
Le point d'entrée est situé dans le sous-programme GEN_ONGLET (génération de l'écran de saisie des réponses) du traitement CRDLIB
Le point d’entrée est placé dans la boucle de création des zones de chaque réponse d une fiche technique
pour rajouter une zone commentaire à chaque réponse il faut écrire les lignes suivantes dans le point d entrée :
GPE = 1
[F:AMZ2]NOZONE = [F:AMZ1]NOZONE
For W_I = 0 To W_MAX-1
If W_QST(W_I) <> ""
W_NUM = ((W_J-1)*W_MAX)+(W_I+1)
W_FLD = "XXX"+format$("N0:3#",W_NUM)
[F:AMZ2]CODZON = W_FLD
Write [AMZ2]
If fstat
Call FSTA("AMZ2") From GLOCK
GOK = 0
Endif
Gosub COP_PARMSK1 from CRDLIB
If GOK <> 1
Break
Endif
Endif
[F:AMZ2]NOZONE += 1
Next W_I
Bien positionner la variable GPE à 1
"XXX" étant le nom de la nouvelle zone
Tables ouvertes
QLYCRD/QLC : Fiche Technique
QLYCRDQST/QLQ : Réponses
LECFIC : Lecture des zones spécifiques de la table QLYCRDASW
Le point d’entrée LECFIC permet de lire les zones spécifiques de la table QLYCRDASW rajouter pas l autre point d'entrée PEWRIQLA.
Contexte et mode de fonctionnement
Transaction
non
Fichier trace
Non
Cas d’appel
Le point d'entrée est situé dans le sous-programme LECFIC (Sous programme de chargement des réponses déjà saisie).
Le point d’entrée est placé dans la boucle de lecture de la table QLYCRDASW