Par tunnel
A partir des manifestations :
| Bloc de code |
|---|
GRXZ.MOTCLE= 'TIERS' |
...
GRXZ.FICHIER=GRFTIERS.NAME |
...
GRXZ.ProSt=MANIF.ProSt |
...
GRXZ.CliSt=MANIF.CliSt |
...
GRXZ.FouSt=MANIF.FouSt |
...
GRXZ.VrpSt=MANIF.VrpSt |
...
GRXZ.TiaSt=MANIF.TiaSt |
...
Ping("Status",1) |
...
Ping("grxz" , grxz) |
...
Ping("zechange", MZ) |
...
ProgramCall ("GRPP001.hop") |
Les types de tiers sont initialisés avec ceux de la manifestation et ne sont pas modifiables.
A partir de la montée de fiche
GRXZ.MOTCLE= 'TIERS'
GRXZ.FICHIER=GRFTIERS.NAME
GRXZ.ProSt=MUSER.TiersTyp(1)
GRXZ.CliSt=MUSER.TiersTyp(2)
GRXZ.FouSt=MUSER.TiersTyp(3)
GRXZ.VrpSt=MUSER.TiersTyp(4)
GRXZ.TiaSt=MUSER.TiersTyp(5)
Ping("Status",3)
Ping("grxz" , grxz)
Ping("zechange", MZ)
ProgramCall ("GRPP001.hop")
Les types de tiers sont initialisés avec ceux de l'utilisateur courant.
Appel du mode fiche d'un tiers (avec positionnement éventuel du contact)
GRXZ.TIERS=Tiers
GRXZ.CONTACT=Contact
GRXZ.MOTCLE= 'TIERS'
GRXZ.ProSt=1
GRXZ.CliSt=1
GRXZ.FouSt=1
GRXZ.VrpSt=1
GRXZ.TiaSt=1
Switch CE2
Case '2'
GRXZ.ProSt=2
Case '3'
GRXZ.CliSt=2
Case '4'
GRXZ.FouSt=2
Case '5'
GRXZ.VrpSt=2
Case '6'
GRXZ.TiaSt=2
EndSwitch
Ping("Status",2)
Ping("grxz" , grxz)
Ping("zechange", MZ)
ProgramCall ("GRPP001.hop")
On n'accède ni aux critères ni à la fonction aller à ni au mode liste.
Chargement d'une liste de tiers par déroulement complet d'un scénario.
GRXZ=' '
GRXZ.ScenarioCod = scenario
GRXZ.MotCle = 'TIERS'
Ping("Status",5)
Ping("grxz" , grxz)
Ping("zechange", MZ)
ProgramCall ("GRPP001.dhop")