| Code Perl |
sub wsRun {local($x,$To,$IN,$OUT) = @_;
if($x eq "getTable"){
# if ($To eq "<nom de table>") {*wwTab = *<variable de table>; return 0}
# return 1;
}elsif($x eq "getFields"){
# if ($To eq "<nom de table>") {@wwChp = (<liste des champs de la table>); return 0}
# return 1;
}elsif($x eq "runImport"){
# <traitement d'import> : &wsImport($$IN);
}elsif($x eq "runExport"){
# <traitement d'export> : $$OUT = &wsExport();
}}
|
| Code JavaScript |
function wsRun(x,To,IN,OUT) {
switch(x) {
case "getTable":
// if (To=="<nom de table>") {wwTab = <variable de table>; return 0}
// return 1;
case "getFields":
// if (To=="<nom de table>") {wwChp = [<liste des champs de la table>]; return 0}
// return 1;
case "runImport":
// <traitement d'import> : wsImport(IN[0]);
case "runExport":
// <traitement d'export> : OUT[0] = wsExport();
}}
|