1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
|
args = ExtraitChaîne(sCommande,2,"<ARG>")
sp.NumInventaire = ExtraitChaîne(args,1)
sp.list_bidon = ExtraitChaîne(args,2)
sp.DateDebut = ExtraitChaîne(args,3) //ICI j'ai '24/11/2006 17:30:54'
sp.DateFin = ExtraitChaîne(args,4) //ICI j'ai '24/11/2006 17:32:13'
sp.NewEmplacement = ExtraitChaîne(args,5)
sp.societe = "'"+gcLettreSociete+"'"
sp.pda = ExtraitChaîne(args,6)
sp.retour = 0
SI PAS HExécuteRequêteSQL(sp,MaConnexion,hRequêteSansCorrection,"pda_inventory_location @NumInventaire,@list_bidon,@DateDebut,@DateFin,@newEmplacement,@societe,@pda,@retour") ALORS
Erreur(HErreurInfo(hErrMessage))
SocketEnvoi("FAUX",sConnection)
SINON
SI sp.retour = 0 ALORS
SocketEnvoi("VRAI",sConnection)
SINON
SocketEnvoi("FAUX",sConnection)
FIN
FIN |
Partager