STA-ARTEXT : Articles Externes pour Statistiques ( ENR-ACT-ENT )
L’action interne STA-ARTEXT permet de créer, modifier et supprimer des articles externes à DIAPASON. Ces articles externes sont utilisés lors de la récupération des statistiques. Voir Gestion des Articles Externes.
Initialisation de la liste WfEntAct telle que :
Nom | T | Désignation | O | Commentaire |
Action | C | Action à exécuter | o | INI, CRE, MOD ou SUP |
EntTEn | C | Entité | o | Doit contenir STA-ARTEXT |
ActCle | C | Clé | o | Clé pour lien avec WfEntVar |
EntCl1 | C | Clé 1 Entité | o | Doit contenir la référence de l’article externe |
Initialisation de la liste WFEntVar (pour CRE ou MOD) :
Pour chacun des champs (sauf StaExtArtRef) définissant un article externe, il faut créer un WFEntVar tel que :
Nom | T | Désignation | O | Commentaire |
ActCle | C | Clé | O | Clé pour lien avec WfEntAct |
EntVar | C | StaExtArtDes | Nom du champ « Désignation Article Externe » | |
EntVaC | C | Valeur Alphanumérique | Valeur de la désignation de l’article externe |
Exemple : Maintenance des articles externes
VLO.Ent = CLO."STA-ARTEXT"
VLO.Debut = VCR.Entier1
VLO.Fin = VCR.Entier2
BOUCLE VLO.Boucle DE VLO.Debut A VLO.Fin :
VLO.Cl1 = CLO."ARTEXT-ML-" + CHAINE( VALEUR= VLO.Boucle , FORMAT= E0/2 )
VLO.Cl2 = CLO.""
VLO.Cl3 = CLO.""
CREATION Liste WfEntAct :
PRENDRE WfEntAct Action = VCR.SI_Action
PRENDRE WfEntAct ActCle = VLO.Cl1
PRENDRE WfEntAct ActRes = CLO.""
PRENDRE WfEntAct ActErr = CLO.""
PRENDRE WfEntAct EntTEn = VLO.Ent
PRENDRE WfEntAct EntCl1 = VLO.Cl1
PRENDRE WfEntAct EntCl2 = VLO.Cl2
PRENDRE WfEntAct EntCl3 = VLO.Cl3
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtArtDes"
PRENDRE WfEntVar EntVaC = CLO."Mise à Jour par ENR-ART-ENT :" + " " + VLO.Cl1
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtArtCom"
PRENDRE WfEntVar EntVaC = CLO."DIALOG"
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtArtDis"
PRENDRE WfEntVar EntVaL = VCR.Dispo
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtVteDis"
PRENDRE WfEntVar EntVaL = SCR.GenDesVente
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtVteDeb"
PRENDRE WfEntVar EntVaD = SCR.CriDatDeb
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtVteFin"
PRENDRE WfEntVar EntVaD = SCR.CriDatFin
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtExpDis"
PRENDRE WfEntVar EntVaL = VCR.GesExped
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtExpDeb"
PRENDRE WfEntVar EntVaD = SCR.CriDatDeb
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtExpFin"
PRENDRE WfEntVar EntVaD = SCR.CriDatFin
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtCsoDis"
PRENDRE WfEntVar EntVaL = VCR.DesFab
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtCsoDeb"
PRENDRE WfEntVar EntVaD = SCR.CriDatDeb
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtCsoFin"
PRENDRE WfEntVar EntVaD = SCR.CriDatFin
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtStoDis"
PRENDRE WfEntVar EntVaL = VCR.GesStock
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtStoDeb"
PRENDRE WfEntVar EntVaD = SCR.CriDatDeb
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtStoFin"
PRENDRE WfEntVar EntVaD = SCR.CriDatFin
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtFabDis"
PRENDRE WfEntVar EntVaL = SCR.GenOriFab
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtFabDeb"
PRENDRE WfEntVar EntVaD = SCR.CriDatDeb
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtFabFin"
PRENDRE WfEntVar EntVaD = SCR.CriDatFin
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtAppDis"
PRENDRE WfEntVar EntVaL = SCR.GenOriAppro
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtAppDeb"
PRENDRE WfEntVar EntVaD = SCR.CriDatDeb
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtAppFin"
PRENDRE WfEntVar EntVaD = SCR.CriDatFin
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtSsTDis"
PRENDRE WfEntVar EntVaL = SCR.GenOriSsTraite
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtSstDeb"
PRENDRE WfEntVar EntVaD = SCR.CriDatDeb
FIN_BLOC
CREATION Liste WfEntVar :
PRENDRE WfEntVar ActCle = VLO.Cl1
PRENDRE WfEntVar EntVar = CLO."StaExtSsTFin"
PRENDRE WfEntVar EntVaD = SCR.CriDatFin
FIN_BLOC
FIN_BLOC
VLO.Res = ENR-ACT-ENT( )