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

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

Technologie	XAS.Technology	Version	V 6.0.1
Dernière modification	Mercredi 6 Janvier 2010	Par	Zaïr BEZGHICHE
Dernière vérification	Samedi 16 Janvier 2010	Par	Support France
Thème	Administration des comptes, (Web, Web Services, PDA, WidGet, Fat Client)	Fonction	FrmCompte.PicBtn_Click

Prototype

Sub PicBtn_Click (Index As Integer)

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

Format de sortie
XML	HTML	TEXT	EXCEL(CSV)

Code Source - développement open source

Sub PicBtn_Click (Index As Integer)

Sub PicBtn_Click (Index As Integer)
Dim Ret%
LabMsg(0).Caption = ""
LabMsg(1).Caption = ""
ModeCreation = False
Select Case Index
    Case 0
	Ret = EventObject(0,"", XASEVTOBJECT_NOTIFYPARENT, 10, "")
    Case 1
	 Ret = InitCreation(Index)
    Case 2
    Case 3
	Cel(2).Visible = False
	Cel(1).Visible = True
	PicBtn(3).Visible = False
	PicBtn(5).Visible = False
	PicBtn(6).Visible = False
	PicBtn(7).Visible = False
	If Maj = 1 Then
	   Ret = DoSearchCompte(TypeEnseigne)
	   Maj = 0
	End If
    Case 4
    Case 5
	Ret = 0
	PicBtn(6).Visible = True
	curRow = curRow - 1
	If curRow >= 1 Then
	    Ret = ListeToPage(0)
	    If curRow = 1 Then
		PicBtn(5).Visible = False
	    End If
	Else
	    PicBtn(5).Visible = False
	End If
    Case 6
	PicBtn(5).Visible = True
	curRow = curRow + 1
	If curRow < MaxRow Then
	    Ret = ListeToPage(0)
	    If curRow = MaxRow - 1 Then
		 PicBtn(6).Visible = False
		 PicBtn(5).Visible = True
	    End If
	Else
	    PicBtn(6).Visible = False
	End If
End Select
End Sub

Références Composants

Administration-des-comptes-FrmCompte-InitCreation, Administration-des-comptes-FrmCompte-DoSearchCompte, Administration-des-comptes-FrmCompte-ListeToPage,

Références XAS.Technology

EventObject ,

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.