| Code Perl |
local($wwAppel,$wwFct,$wwFrom,$wwFromId,$wwEmail,@wwIn);
local($wwIdent,$wwAuth,$wwMsg);
sub Execer {
local($i,$Out);
$Out = '';
local($x);
$x = "(#T(Devis)new:/#T(gloOwner):1000/#T(gloError):1/#T(gloEtat):1/#T(gloMode):manuel/#T(gloVData):(#L:/#L:/#L:/#L:1/#L:semaine/#L:/#L)/#T(gloTLieux):(#L:A/#L:B/#L)/#T(gloTLieu):(#L(gloTLieux):(#L:A/#L:true/#L:false/#L:false/#L:false/#L:false/#L:/#L:/#L:/#L:0/#L:-1/#L:-1/#L:/#L:/#L:/#L:/#L:/#L:0/#L:/#L:true,true,true,true,true,true,true,true/#L:/#L:/#L:/#L)/#L:(#L:B/#L:false/#L:true/#L:false/#L:false/#L:false/#L:/#L:/#L:/#L:0/#L:-1/#L:-1/#L:/#L:/#L:/#L:/#L:/#L:0/#L:/#L:true,true,true,true,true,true,true,true/#L:/#L:/#L:/#L)/#L)/#T(gloTPces):(#L)/#T(gloTPce):(#L(gloTPces))/#T)\n";
$x =~ s/Owner\):1000\/#T/Owner\):$wwIdent\/#T/;
$x =~ s/\/#T\(gloVData\):\(#L:\/#L:\/#L:/\/#T\(gloVData\):\(#L:\/#L:$wwEmail\/#L:/;
local $Out = $x; &setDate(\$Out); if (&wsFile("write",$wwFrom,$wwFromId,"",\$Out)!=0) {return 'Erreur gel: 100'};
if (($i=&toClient(\$Out))!=0) {return 'Erreur export: '.$i.''};
return '';
}
|
| Code JavaScript |
var wwAppel,wwFct,wwFrom,wwFromId,wwEmail,wwIn;
var wwIdent,wwAuth,wwMsg;
function Execer() {
var i,Out;
Out = Array('');
var x;
x = "(#T(Devis)new:/#T(gloOwner):1000/#T(gloError):1/#T(gloEtat):1/#T(gloMode):manuel/#T(gloVData):(#L:/#L:/#L:/#L:1/#L:semaine/#L:/#L)/#T(gloTLieux):(#L:A/#L:B/#L)/#T(gloTLieu):(#L(gloTLieux):(#L:A/#L:true/#L:false/#L:false/#L:false/#L:false/#L:/#L:/#L:/#L:0/#L:-1/#L:-1/#L:/#L:/#L:/#L:/#L:/#L:0/#L:/#L:true,true,true,true,true,true,true,true/#L:/#L:/#L:/#L)/#L:(#L:B/#L:false/#L:true/#L:false/#L:false/#L:false/#L:/#L:/#L:/#L:0/#L:-1/#L:-1/#L:/#L:/#L:/#L:/#L:/#L:0/#L:/#L:true,true,true,true,true,true,true,true/#L:/#L:/#L:/#L)/#L)/#T(gloTPces):(#L)/#T(gloTPce):(#L(gloTPces))/#T)\n";
x = x.replace(/Owner\):1000\/#T/,"Owner\):"+wwIdent[0]+"\/#T");
x = x.replace(/\/#T\(gloVData\):\(#L:\/#L:\/#L:/,"\/#T\(gloVData\):\(#L:\/#L:"+wwEmail+"\/#L:");
var Out = Array(x); setDate(Out); if (wsFile("write",wwFrom,wwFromId,"",Out)!=0) {return 'Erreur gel: 100'};
if ((i=toClient(Out))!=0) {return 'Erreur export: '+i.toString()};
return '';
}
|