1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
|
sdMaRequete est une Source de Données
sReqTxt sont des chaînes
nIdentArticle est un entier = PGWS_GET_Article_Stock_CB(sCodeBarre)
SI PGWS_Verifie_Token() = Vrai ALORS
HDéclareExterne("MONFICHIER.FIC", "MONFICHIER",ProcéduresServeur.gcnxConnexion)
sReqTxt = "INSERT INTO MONFICHIER(ID_ARTICLE, ID_DEPOT, ID_DEPOT_ADRESSE, QTE) VALUES('"+ nIdentArticle + "','1','0',10)"
SI HExécuteRequêteSQL(sdMaRequete, sReqTxt) ALORS
RENVOYER "Ajout effectué"
FIN
SINON
RENVOYER "erreur"
FIN |