Administration des Import/Export, (Web, Web Services, PDA, WidGet, Fat Client)
XAS.Services
  XML Kiosk  
Technologie XAS.Technology Version V 6.0.1
Dernière modification Vendredi 8 Janvier 2010 Par Zaïr BEZGHICHE
Dernière vérification Samedi 23 Janvier 2010 Par Support France
ThèmeAdministration des Import/Export, (Web, Web Services, PDA, WidGet, Fat Client) Fonction MODIMP.XMLInsertCategorie

Prototype
Function XMLInsertCategorie (sCodeClient As String, sCodeSite As String) As Integer
Usage
Administration-des-Import-Export.XMLInsertCategorie(...)
HTTP (GET,POST)SOAP WSDLSOAP RESTXML-RPC
Format de sortie
XML HTML TEXT EXCEL(CSV)

Code Source - développement open source
Function XMLInsertCategorie (sCodeClient As String, sCodeSite As String) As Integer
Function XMLInsertCategorie (sCodeClient As String, sCodeSite As String) As Integer
Dim Ret%
Dim sData$

XMLInsertCategorie = False
If sCodeSite = "" Then
    Exit Function
End If

sData = "Select CodeSite From client where  CodeClient.xxKey=" + CStr(sCodeClient)
Ret = pExecute(sData)
If Ret = True And OnSQLGetItem(0) <> "" Then
    sData = "DELETE From linkSite  "
    sData = sData + " WHERE CodeClient.xxKey = " + CStr(sCodeClient)
    sData = sData + " AND CodeSite.xxKey = " + CStr(sCodeSite)
    Ret = pExecute(sData)
    sData = "Select CodeClient,CodeSite From client where CodeClient.xxKey=" + CStr(sCodeClient)
    Ret = pExecute(sData)
    If Ret = True And OnSQLGetItem(0) <> "" Then
	sData = "INSERT INTO Client.LinkSite(CodeClient,CodeSite) VALUES ('" + CStr(sCodeClient) + "','" + sCodeSite + "' )"
	Ret = pExecute(sData)
	XMLInsertCategorie = Ret
    End If
End If
End Function

Références XAS.Technology
Cstr ,

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.


XAS Services - Zaïr BEZGHICHE - Copyright 1991-2011 tous droits réservés- Powered by XAS.Technology