Fonction Scilab
eng - fr


return_xml_call_seq - retourne la séquence d'appel d'un fichier xml

Librairie

Séquence d'appel

txt = return_xml_call_seq(fname)

Paramètres

Description

Add here a paragraph of the function description. Other paragraph can be added

Add here a paragraph of the function description

Exemple

Add here scilab instructions and comments

Contenu du fichier


//return_xml_call_seq
//fonction qui retourne le texte placé entre
//les deux premiers drapeaux <CALLING_SEQUENCE>
//et </CALLING_SEQUENCE> trouvés dans le fichier fname
//compatilble avec help_skeleton
//ex : txt=return_xml_call_seq(SCI+'/man/eng/nonlinear/intc.xml')
//Entrée fname : chemin+nom du fichier xml
function txt=return_xml_call_seq(fname)
 txt_temp=mgetl(fname)
 txt=[]
 j=1;
 a=[];
 if txt_temp<>[] then
  for i=1:size(txt_temp,'*')
   if strindex(txt_temp(i),'<CALLING_SEQUENCE_ITEM>')<>[] then
    a(j,1)=i;
   end;
   if strindex(txt_temp(i),'</CALLING_SEQUENCE_ITEM>')<>[] then
    a(j,2)=i;
    j=j+1;
   end
  end
  if a<>[] then
   for i=1:size(a,'r')
      txt(i)="";
      //pour chaque bloc
      for j=a(i,1):a(i,2)
       txt(i)=txt(i)+txt_temp(j)
      end
   end
   
   txt=strsubst(txt,'<CALLING_SEQUENCE_ITEM>',"");
   txt=strsubst(txt,'</CALLING_SEQUENCE_ITEM>',"");
   txt=retrieve_char(txt);
   txt=stripblanks_begin(txt);
   txt=stripblanks_end(txt);
   if txt=="" then txt=[], end;
  end
 else
  txt=[];
 end
endfunction

Fonction(s) utilisée(s)

Add here the used function name and references

Auteurs

enter here the author name Add here the author references