Le portail francophone de la géomatique

Bonjour :

Je cherche a remplir une liste avec les valeurs des enregistrements de
la colonne numero 1 d'une table que j'ai prealablement selectionne.

Ainsi j'ecris ceci :
/****************************************************************
sub remplir_liste_dossier
dim MaZone as string
dim mazone2 as smallint
dim nb_dossier as integer
dim i as integer
dim dossier as string

mazone2 = readcontrolvalue(2)
MaZone = tablo_zone2(mazone2)

nb_dossier = tableinfo(mazone, TAB_INFO_NROWS)

redim tablo_dossier(nb_dossier)

fetch first from maZone
for i = 1 to nb_dossier
tablo_dossier(i) = mazone.col(1)
fetch next from mazone
next

alter control 1 Title from variable tablo_dossier
end sub
****************************************************************/

La lignes en bleu est apparemment une source d'erreur mais je ne comprend
pas pourquoi.

unrecognized command : ..

Quelqu'un peut il m'aider ???

Merci encore et encrore....

THOMAS ROBIN
CNASEA GUYANE
Responsable Info / SIG / SGBD
Cellule regularisation fonciere agricole
4 rue Louis Blanc
97300 CAYENNE