XAS, Xml Server, Xml Services, XML Kiosk, Administration des articles, (Web, Web Services, PDA, WidGet, Fat Client)

Administration des articles, (Web, Web Services, PDA, WidGet, Fat Client)

Technologie	XAS.Technology	Version	V 6.0.1
Dernière modification	Lundi 29 Mars 2010	Par	Zaïr BEZGHICHE
Dernière vérification	Mercredi 7 Avril 2010	Par	Support France
Thème	Administration des articles, (Web, Web Services, PDA, WidGet, Fat Client)	Fonction	FrmTarif.SetPaysToForm

Prototype

Function SetPaysToForm (Id As Integer) As Integer

Usage
Administration-des-articles.SetPaysToForm(...)
HTTP (GET,POST)	SOAP WSDL	SOAP REST	XML-RPC

Format de sortie
XML	HTML	TEXT	EXCEL(CSV)

Code Source - développement open source

Function SetPaysToForm (Id As Integer) As Integer

Function SetPaysToForm (Id As Integer) As Integer
Dim Ret%
Dim s$
Dim i%

Ret = XasXMLDom(GlobCurFileDom, "", 0)
For i = 0 To 5
    Ret = XasUserSQLtoCtrl(1, RowSet, GlobCurService + ".FrmTarif.cb(" + CStr(i) + ")", "", "")
Next i
Ret = XasXMLDom(GlobCurFileDom, GlobCurService + ".FrmTarif.GridTarif", 0)
Ret = XasUserSetProperties(Bts, 154, "Id" + XasGetIdCtrl(CelSearch, "", 0))
Ret = XasUserSetProperties(BtnTar(0), 154, "Id" + XasGetIdCtrl(CelVersTar, "", 0))
Ret = XasUserSetProperties(BtnTar(1), 154, "Id" + XasGetIdCtrl(CelVersTar, "", 0))
Ret = XasUserSetProperties(BtnTar(2), 154, "Id" + XasGetIdCtrl(CelVersTar, "", 0))
CelSearch.Top = 420
CelSearch.Left = 4905

End Function

Références XAS.Technology

XasXMLDom , XasUserSQLtoCtrl , Cstr , XasUserSetProperties , XasGetIdCtrl ,

Audience

Cette documentation est destinée aux personnes s'intéressant aux systèmes d'information collaboratifs.
Les Webservices, les architectures collabortives et distribuées, les moteurs transactionnelles et les concepts de programmation orientés objet.