Caravan Business Server>Examples>XML


Creating and Accessing XML objects

This example parses an xml file named companyinfo.xml stored in template directory and displays its contents.

include system.html var sql var str str(path)=system(Localpath) str(path)+="\\template\\companyinfo.xml" object cmp=str(path) cmp(.node)=".next" "
" loop a (cmp(company(00))) if a(counter)=1 cmp(.node)="company" "Company Name: ";cmp(name);"
" sql(comp)=cmp(.name) loop b (cmp(employee(00))) if b(counter)=1 cmp(.node)="employee" "   Employee Name: ";cmp(name);"
" "     Designation: ";cmp(designation);"
" "     Email: ";cmp(email);"
" "     Phone: ";cmp(phone);"
" else cmp(.node)=".next" "   Employee Name: ";cmp(name);"
" "     Designation: ";cmp(designation);"
" "     Email: ";cmp(email);"
" "     Phone: ";cmp(phone);"
" endif repeat b 100 cmp(.node)=".root" cmp(.node)=sql(comp) loop b (cmp(phone(00))) if b(counter)=1 cmp(.node)="phone" cmp(name);"
" else cmp(.node)=".next" cmp(name);"
" endif repeat b 100 cmp(.node)=".root" cmp(.node)=sql(comp) else cmp(.node)=".next" "Company Name: ";cmp(name);"
" loop b (cmp(employee(00))) if b(counter)=1 cmp(.node)="employee" "   Employee Name: ";cmp(name);"
" "     Designation: ";cmp(designation);"
" "     Email: ";cmp(email);"
" "     Phone: ";cmp(phone);"
" else cmp(.node)=".next" "   Employee Name: ";cmp(name);"
" "     Designation: ";cmp(designation);"
" "     Email: ";cmp(email);"
" "     Phone: ";cmp(phone);"
" endif repeat b 100 cmp(.node)=".root" cmp(.node)=sql(comp) loop b (cmp(phone(00))) if b(counter)=1 cmp(.node)="phone" cmp(name);"
" else cmp(.node)=".next" cmp(name);"
" endif repeat b 100 cmp(.node)=".root" cmp(.node)=sql(comp) cmp(.node)=".next" endif "
" repeat a 100
View Code          Back
 
 
© Copyright 2002 Niti Telecom Consultancy. All rights reserved