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

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

Technologie	XAS.Technology	Version	V 6.0.1
Dernière modification	Mercredi 20 Janvier 2010	Par	Zaïr BEZGHICHE
Dernière vérification	Mardi 9 Février 2010	Par	Support France
Thème	Administration des achats, (Web, Web Services, PDA, WidGet, Fat Client)	Fonction	FrmProduit.DoCheckMoney

Prototype

Function DoCheckMoney (sTin As String) As String

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

Format de sortie
XML	HTML	TEXT	EXCEL(CSV)

Code Source - développement open source

Function DoCheckMoney (sTin As String) As String

Function DoCheckMoney (sTin As String) As String
Dim Ret%
Dim sData$
Dim s$

sData = "0.00"

s = sLibCharGetLeft(sTin, ".")
If s <> "" Then
    sData = sTin
Else
    s = sLibCharGetLeft(sTin, ",")
    If s <> "" Then
	sData = s + "." + sLibCharGetRight(sTin, ",")
    End If
End If
DoCheckMoney = sData
End Function

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.