Administration des missions, (Web, Web Services, PDA, WidGet, Fat Client)
XAS.Services
  XML Kiosk  
Technologie XAS.Technology Version V 6.0.1
Dernière modification Mardi 24 Août 2010 Par Zaïr BEZGHICHE
Dernière vérification Vendredi 10 Septembre 2010 Par Support France
ThèmeAdministration des missions, (Web, Web Services, PDA, WidGet, Fat Client) Fonction FrmMain.GridEntity_Activate

Prototype
Sub GridEntity_Activate (iRow As Integer, iCol As Integer, iValue As Integer)
Usage
Administration-des-missions.GridEntity_Activate(...)
HTTP (GET,POST)SOAP WSDLSOAP RESTXML-RPC
Format de sortie
XML HTML TEXT EXCEL(CSV)

Code Source - développement open source
Sub GridEntity_Activate (iRow As Integer, iCol As Integer, iValue As Integer)
Sub GridEntity_Activate (iRow As Integer, iCol As Integer, iValue As Integer)
Dim Ret%
Dim sId$
Dim iType%
Dim iTypeTicket%


GridEntity.Row = iRow
GridEntity.Col = 7
sId = GridEntity.Text
GridEntity.Col = 8
iType = Val(GridEntity.Text)
GridEntity.Col = 9
iTypeTicket = Val(GetCharByIndice(Trim$(GridEntity.Text), ",", iCol - 2))

Select Case iCol
    Case 0
	Ret = OPEGridSelected(GridEntity)
	Ret = OPESendToCarto(GridEntity, iRow, False)
    Case 2
	Ret = xPopEntity(sId, iType)
    Case 3, 4, 5, 6
	Ret = xCheckForScenar(sId, iTypeTicket)
End Select


End Sub

Références Composants
Administration-des-missions-AMAIN-OPEGridSelected, Administration-des-missions-AMAIN-OPESendToCarto, Administration-des-missions-AMAIN-xPopEntity, Administration-des-missions-AMAIN-xCheckForScenar,

Références XAS.Technology
Val , GetCharByIndice , Trim ,

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