Traitement FUNMLINK : Plan d'affectation
ADDLIN : Renseignement de zones spécifiques
Ce point d’entrée permet de renseigner des champs spécifiques dans le plan de travail.
Il est appelé dans le traitement BENCHLIB.
Contexte et mode de fonctionnement
Transaction
Il n’y a pas de transaction en cours.
Fichier trace
Il n’y a pas de fichier trace ouvert.
Différents cas d’appel - Variables et masques disponibles
Ce point d’entrée est appelé en fin de boucle d’alimentation des lignes du tableau.
Il permet de prendre la main afin d’alimenter des champs spécifiques du tableau.
La classe écran MFGBENCHD/MTOLINKB(*) est ouverte au moment de l’appel du point d’entrée.
Tables ouvertes
Dans le tableau ci-dessous, le flag contenu significatif signifie que le contenu est en phase avec le contexte.
|
Table |
Contenu significatif |
Intitulé Table |
|
ORDERS |
Oui |
Encours |
|
ITMFACILIT |
Oui |
Articles – Sites |
(*) Suivant les valeurs de GFONCTION respectivement FUNDBENCH/FUNMLINK
CUSSELFLT : Positionnement de filtres supplémentaires
Ce point d’entrée permet de prendre la main en création des filtres de sélections dans le traitement du plan d'affectation (fonction FUNMLINK).
La variable CUSFLT (255 caractères) permet de positionner des filtres sur des zones fichiers supplémentaires.
Le filtre s’applique exclusivement au fichier des encours articles (ORDERS classe [F :ORD] ).
Contexte et mode de fonctionnement
Transaction
Il n’y a pas de transaction en cours.
Fichier trace
Il n’y a pas de fichier trace ouvert
Classes fichiers et écrans disponibles
Le masque MTOLINKB est ouvert et les différentes sélections sont chargées.
Tables ouvertes
Dans le tableau ci-dessous, le flag contenu significatif signifie que le contenu est en phase avec le contexte (…).
|
Table |
Contenu significatif |
Intitulé Table |
|
ITMFACILIT |
Oui |
Article-site |
|
ORDERS |
Non |
Encours articles |
|
ITMMASTER |
Oui |
Articles |
CHECKORD : Choix dans l'affichage des ordres sélectionnés
Ce point d’entrée permet de choisir les ordres à afficher dans le plan de travail parmi ceux qui ont déjà fait l’objet d’une sélection préalable.
Il est appelé dans le traitement BENCHLIB.
Contexte et mode de fonctionnement
Transaction
Il n’y a pas de transaction en cours.
Fichier trace
Il n’y a pas de fichier trace ouvert.
Différents cas d’appel
Ce point d’entrée est appelé en début de boucle d’alimentation des lignes du tableau, juste avant le trans-classe.
Le masque MFGBENCHD/MTOLINKB est ouvert au moment de l’appel du point d’entrée.
Variables et masques disponibles
La variable GPE est utilisée. Elle est positionnée à la valeur 0 par défaut. Elle devra être positionnée à 1 dans le traitement spécifique lié au point d’entrée si on ne souhaite pas afficher l’enregistrement courant. De retour dans le traitement standard, la valeur de GPE est testée. Si elle est différente de 0, la partie concernant l’alimentation de la ligne est court-circuitée.
Tables ouvertes
Dans le tableau ci-dessous, le flag contenu significatif signifie que le contenu est en phase avec le contexte.
|
Table |
Contenu significatif |
Intitulé Table |
|
ORDERS |
Non |
Encours |
|
ITMFACILIT |
Oui |
Articles - Sites |
|
ITMMASTER |
Oui |
Articles |
(*) Suivant les valeurs de GFONCTION respectivement FUNDBENCH/FUNMLINK
CUSSRT : Classements supplémentaires
Ce point d’entrée permet de prendre la main sur le tri des enregistrements du tableau dans le traitement du plan d'affectation (fonction FUNMLINK).
La variable WTRI (de type integer) permet de désactiver le tri standard si un tri spécifique a été mis en œuvre. Pour ce faire, positionner WTRI à la valeur 1.
Ce point d’entrée étant commun aux fonctions Planning global, plan de travail et regroupement, le traitement spécifique est unique et le contexte peut être déterminé via le test du type de transaction :
[F :BTS] BTSTYP = 51 pour le planning global
[F :BTS] BTSTYP = 52 pour le plan de travail
[F :BTS] BTSTYP = 53 pour le regroupement
Exemple de traitement spécifique :
$ACTION
Case ACTION
When "CUSSRT" : Gosub CUSSRT
Endcase
Return
$CUSSRT
Case [F:BTS]BTSTYP
When 51: Sorta [M:MGB]NBLIG [M:MGB]NBLIG Order By [M:MGB]BPRNUM(indice)
When 52: Sorta [M:MGD]NBLIG [M:MGD]NBLIG Order By [M:MGD]BPRNUM(indice)
When 53: Sorta [M:MGP]NBLIG [M:MGP]NBLIG Order By [M:MGP]BPRNUM(indice)
Endcase
WTRI = 1
Return
Contexte et mode de fonctionnement
Transaction
Il n’y a pas de transaction en cours.
Fichier trace
Il n’y a pas de fichier trace ouvert
Classes fichiers et écrans disponibles
Le masque MTOLINKB est ouvert et les différentes sélections sont chargées.
Tables ouvertes
Dans le tableau ci-dessous, le flag contenu significatif signifie que le contenu est en phase avec le contexte (…).
|
Table |
Contenu significatif |
Intitulé Table |
|
ITMFACILIT |
Oui |
Article-site |
|
ORDERS |
Non |
Encours articles |
|
ITMMASTER |
Oui |
Articles |
|
TABUNIT |
Non |
Table des unités |
|
BENCHTRS |
Oui |
Transaction de saisie |
STRSTO : Stock initial
Ce point d’entrée permet de prendre la main sur le stock initial pris en compte dans le plan de travail.
Il est appelé dans le traitement BENCHLIB.
Contexte et mode de fonctionnement
Transaction
Il n’y a pas de transaction en cours.
Fichier trace
Il n’y a pas de fichier trace ouvert.
Classes fichiers et écrans disponibles
Le masque MFGBENCHD/MTOLINKB est ouvert et les différentes sélections sont chargées.
Le stock de départ est déjà calculé (variable WEXT)et peut être modifié suivant les besoins.
La classe [ITV] correspondant à l’enregistrement Cumuls Article/site est en ligne.
Tables ouvertes
Dans le tableau ci-dessous, le flag contenu significatif signifie que le contenu est en phase avec le contexte (…).
|
Table |
Contenu significatif |
Intitulé Table |
|
ITMFACILIT |
Oui |
Article-site |
|
ORDERS |
Non |
Encours articles |
|
ITMMASTER |
Oui |
Articles |
|
ITMMVT |
Oui |
Cumuls Article/site |
|
BENCHTRS |
Oui |
Transaction de saisie |
(*) Suivant les valeurs de GFONCTION respectivement FUNDBENCH/FUNMLINK
FILTER_TRS: Filtre supplémentaire sur transactions
Ce point d’entrée permet de prendre la main sur la liste des transactions proposées.
Contexte et mode de fonctionnement
Utilisation
La variable CRITERE contient des filtres standard. Il est possible d'ajouter un filtre complémentaire de la façon suivante:
CRITERE += "&find(BTSNUM,'AAA','BBB')
ADD_LIN: Alimentation du tableau des affectations
Ce point d’entrée permet d'intervenir lors de l'affectation manuelle pour compléter les informations affichées dans le tableau des affectations.
Contexte et mode de fonctionnement
Utilisation
La ligne courante est connue par l'indice L.
Le point d'entrée est appelé après le chargement standard de la ligne de tableau, avant incrémentation de la variable de bas de tableau NBLIG1.
Exemple d'alimentation d'une information complémentaire:
[M:MLB]XXXX1(L) = "xxxxxxxx"
LOAD_LINK: Chargement des affectations
Ce point d’entrée permet d'intervenir suite à la sélection d'une ligne du tableau des encours.
Après sélection d'une ligne, le système recherche les allocations et affectations existantes pour constituer puis afficher le tableau des affectations.
Ce point d'entrée permet d'intervenir sur ces éléments.
Contexte et mode de fonctionnement
Utilisation
Le point d'entrée est appelé à l'issue du chargement du tableau des affectations.
La variable de bas de tableau NBLIG1 est à jour.
La variable K pointe sur la ligne d'encours sélectionnée.
CUS_ASSIGN_PRP: Proposition dynamique d'affectation
Ce point d’entrée permet d'intervenir suite à la sélection d'une ligne du tableau des encours.
Si l'ordre sélectionné dispose d'un reste à affecter, le système recherche et propose automatiquement les ordres pouvant lui être affecté.
Cette proposition se matérialise par l'affichage d'un icône représentant un cadenas fermé.
Ce point d'entrée permet d'intervenir sur le choix des ordres affectables à la ligne sélectionnée.
Contexte et mode de fonctionnement
Utilisation
Variables disponibles:
Un ordre est sélectionné si [M:MLB]ISSEL > 0 ou [M:MLB]PECFLG(indice) ="210"
Le type de l'ordre sélectionné est connu par:
- [M:MLB]ISDEM (=2) si type "demande"
- [M:MLB]ISRESS (=2) si type "ressource"
Si un ordre peut être affecté à l'ordre sélectionné: [M:MLB]ICOLINK(indice) = "167"
Si un ordre est déjà affecté à l'ordre sélectionné en mode 1 pour 1: [M:MLB]ICOLINK(indice) = "211"
Exemple de code:
#----------------------------------------------------------------------------------
$ACTION
Case ACTION
When "CUS_ASSIGN_PRP" : Gosub CUS_ASSIGN_PRP
Endcase
Return
#----------------------------------------------------------------------------------
$CUS_ASSIGN_PRP
# go through all lines
For I =0 To [M:MLB]NBLIG - 1
# if no order selected, exit
If [M:MLB]ISSEL > 0
# if line marked "assignable" by standard process
If [M:MLB]ICOLINK(I) = "167"
# just testing exclusion
If pat([M:MLB]XUSRFLD(I), "*noassignment*") : [M:MLB]ICOLINK(I) = "" : Endif
Endif
Endif
Next I
Return
ADDLIN1: Chargement du tableau des affectations
Ce point d’entrée permet d'intervenir en ajout d'une ligne dans le tableau des affectations pour compléter les informations affichées (champs spécifiques).
Contexte et mode de fonctionnement
Utilisation
La ligne à créer est connue par l'indice L.
La ligne courante dont les données sont recopiées correspond à (nolign-1).
L'indice K désigne la ligne sélectionnée [M:MLB]ISSEL - 1
Exemple d'alimentation d'une information complémentaire:
[M:MLB]XXXX1(L) = "xxxxxxxx"
STYLE : Style des lignes du tableau 'Stock projeté'
Ce point d’entrée permet de prendre la main sur le style d'affichage d'une ligne du tableau.
Contexte et mode de fonctionnement
Utilisation
La variable [M:HLIK]LINNUM contient l'indice de la ligne de tableau.
La variable [M:HLIK]STYLE contient le style standard à appliquer à cette ligne (aucun style si [M:HLIK]STYLE = vide).
En réaffectant [M:HLIK]STYLE, il est possible de remplacer le style standard par un autre, ou de l'inhiber
STYLE2 : Style des lignes du tableau 'Affectation(s)'
Ce point d’entrée permet de prendre la main sur le style d'affichage d'une ligne du tableau.
Contexte et mode de fonctionnement
Utilisation
La variable [M:HLIK]LINNUM contient l'indice de la ligne de tableau.
La variable [M:HLIK]STYLE contient le style standard à appliquer à cette ligne (aucun style si [M:HLIK]STYLE = vide).
En réaffectant [M:HLIK]STYLE, il est possible de remplacer le style standard par un autre, ou de l'inhiber