Produit : 4D Pack 2004 · Plateforme : Mac & Win ♪
Vous pouvez créer une méthode par programmation avec la commande 4D Pack « AP Create Method » en mode interprété.
Syntaxe :
Sélectionnez
Code_erreur :=
AP Create Method(
nom_methode ;
tableau_attributs ;
code_blob ;
nom_dossier)
Code exemple :
Sélectionnez
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
C_ENTIER LONG
(
$Err
)
C_TEXTE
(
$NomMethode
;
$NomDossier
)
TABLEAU ENTIER LONG
(
$Attributs
;
4
)
C_BLOB
(
$Code
)
$NomMethode
:=
"Ma nouvelle méthode"
TEXTE VERS BLOB
(
"ALERT(
\"
Hello
\"
)"
;
$Code
;
Texte sans longueur ;*)
$Attributs
{1
}:=
1
` 4D action ?
$Attributs
{2
}:=
1
` invisible ?
$Attributs
{3
}:=
1
` soap ?
$Attributs
{4
}:=
1
` publiée en wsdl ?
$NomDossier
:=
"Dossier par defaut"
$Err
:=
AP Create method(
$NomMethode
;
$Attributs
;
$Code
;
$NomDossier
)