Administration des critères, (Web, Web Services, PDA, WidGet, Fat Client)
XAS.Services
  XML Kiosk  
Technologie XAS.Technology Version V 6.0.1
Dernière modification Lundi 4 Janvier 2010 Par Zaïr BEZGHICHE
Dernière vérification Samedi 9 Janvier 2010 Par Support France
ThèmeAdministration des critères, (Web, Web Services, PDA, WidGet, Fat Client) Fonction FrmCrit.DoDiezeSearch

Prototype
Function DoDiezeSearch (Id As Integer) As String
Usage
Administration-des-criteres.DoDiezeSearch(...)
HTTP (GET,POST)SOAP WSDLSOAP RESTXML-RPC
Format de sortie
XML HTML TEXT EXCEL(CSV)

Code Source - développement open source
Function DoDiezeSearch (Id As Integer) As String
Function DoDiezeSearch (Id As Integer) As String
Dim l%
Dim i%
Dim j%
Dim s$
Dim s2$
Dim s3$
Dim sOut$
Dim sPhrase$
Dim sI$
Dim sTab$


s3 = "|"
j = 1
DoDiezeSearch = ""
sI = TabIdCaption(Id)
l = Len(sI)
s = ""
sOut = ""
sPhrase = CStr(Labcritere(Id)) + " = "
For i = 2 To l
    s2 = XasGetChar(sI, i)
    
    If s2 = s3 Then
	sOut = sOut + "q.c" + CStr(Id) + "=" + s + " OR "
	sTab = GetInfoCombo(Id, s)
	sPhrase = sPhrase + " " + sTab + " ou "
	s = ""
	j = j + 1
    Else
	s = s + s2
    End If
Next i
If sOut <> "" Then
    s = " (" + Left$(sOut, Len(sOut) - 3) + ") "
    DoDiezeSearch = s
    MaPhrase = MaPhrase + Left$(sPhrase, Len(sPhrase) - 3) + ") "
End If

End Function

Références Composants
Administration-des-criteres-FrmCrit-GetInfoCombo,

Références XAS.Technology
Len , Cstr , XasGetChar , Left ,

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