Le portail francophone de la géomatique

gussoner · Fri 07 January 2011 14:29

Bonjour à tous,

Avant tout meilleurs voeux pour 2011. Pour bien commencer cette année, je me suis lancé dans le développement d'un MBX mais je butte sur un problème de syntaxe. Je n'arrive pas à appeler une fonction en y passant un argument. voila mon code

Code:

Sub RecupListe (IdList as SmallInt)
    .....
     blablabla
          ......
End Sub


Call RecupListe (8)

Mapbasic ne veut pas me compiler ca. Le message d'erreur est le suivant :

Found [8] while searching for [An identifier]

je n'arrive pas à comprendre. Par avance merci pour votre aide

jean94 · Fri 07 January 2011 15:08

Je crois qu'il faut passez plutôt comme ceci

Code:

declare function RecupListe(byval IdList as SmallInt) as string ' avant la sub main

dim Slist as string

function RecupListe(byval IdList as SmallInt) 'Declare la fonction
  .....
     blablabla
          ......
end function

Slist = RecupListe(8) ' Active la fonciton

On ne fait pas de Call pour une fonction..seulement pour une procédure. De plus un fonction renvoie toujours une valeur donc il faut l'ajouter dans une variable telle que Slist

Dernière modification par jean94 (Fri 07 January 2011 15:10)

gussoner · Fri 07 January 2011 17:12

Bonjour Jean,

merci pour ta réponse. Effectivement, je ne faisais pas la différence entre fonction et procédure.. C'est d'ailleurs pour ca que je n'arrivais pas à recupérer une valeur en retour !

Il y a juste une chose que je ne comprends pas dans ton code : a quoi correspond byval ?
Ce code la n'est pas correct ?

Code:

declare function RecupListe(IdList as SmallInt) as string ' avant la sub main

jean94 · Fri 07 January 2011 17:38

Bonjour,

Il y a de l'information à ce sujet dans le Map Basic USER guide,

Il y a deux façons de passer une variable soit par référence soit par valeur (byval). Pour passer par référence il faut que ce soit absolument une procédure.

ByVal veut dire passer une variable By Value et peut être une variable. Le datatype de cette variable n'est pas important car elle sera transformer tel que declaré dans la fonction.

Pour le code il n'est pas correcte. Il y a l'alternative de passer par une procédure et passer la variable par référence

Code:

Declare Sub  RecupListe(IdList as SmallInt)

Sub RecupListe(IdList as SmallInt)
  .....
     blablabla
          ......
End Sub

dim Sintid as smallint

Sintid = 8

call RecupListe(Sintid)

Dans ce cas ton IdList sera égale à 8.

J'espère être claire

JF

Dernière modification par jean94 (Fri 07 January 2011 17:43)

gussoner · Fri 07 January 2011 17:48

Oui oui c'est très clair, merci pour ces explications

Communauté	Ressources	L'emploi	Le marché	L'association	Fils RSS
Forum Blogs Wiki Planet Sites amis	Agenda Biblio Fiches AMO-CNIG Paris PCGIS Téléchargements	Offres d'emploi Banque de CV Formations Démarche Métiers	Geo-Entreprises Geo-Communiqué Appels d'offres	L'association Qui sommes-nous ? Nous aider Bienfaiteurs Partenaires Historique Statuts	Tout le site Job Géomatique Services GeoBlogs ...	Faire un don Mentions légales

Le portail francophone de la géomatique

#1 Fri 07 January 2011 14:29

[MapBasic]Appeler une fonction avec un argument

Code:

#2 Fri 07 January 2011 15:08

Re: [MapBasic]Appeler une fonction avec un argument

Code:

#3 Fri 07 January 2011 17:12

Re: [MapBasic]Appeler une fonction avec un argument

Code:

#4 Fri 07 January 2011 17:38

Re: [MapBasic]Appeler une fonction avec un argument

Code:

#5 Fri 07 January 2011 17:48

Re: [MapBasic]Appeler une fonction avec un argument

Pied de page des forums