DW
XML Document question June 16, 2009 01:23AM |
Milton
Re: XML Document question June 16, 2009 04:05AM |
DerekT
Re: XML Document question June 16, 2009 09:31AM |
DW
Re: XML Document question June 17, 2009 06:07PM |
DerekT
Re: XML Document question June 18, 2009 06:32PM |
XMLAddChild("ConfTrans","Payload","",True)
XMLAddChild("ConfTrans","Action","",True)
XMLAddChild("ConfTrans","TaskID",gsTaskID)
XMLAddChild("ConfTrans","ActionID",lsActionID)
XMLAddChild("ConfTrans","Reason",lsReason)
XMLAddChild("ConfTrans","ActFields","",True)
XMLAddChild("ConfTrans","ActField",lsTextVal,True)
XMLAddAttribute("ConfTrans","Name",garActionFldConf[lnLoopNdx][1])
XMLAddAttribute("ConfTrans","Prompt",garActionFldConf[lnLoopNdx][2])
XMLAddAttribute("ConfTrans","Entry",garActionFldConf[lnLoopNdx][3])
XMLAddAttribute("ConfTrans","Comp",garActionFldConf[lnLoopNdx][4])
XMLAddAttribute("ConfTrans","Type",garActionFldConf[lnLoopNdx][5])
XMLAddAttribute("ConfTrans","Minvalue",garActionFldConf[lnLoopNdx][6])
XMLAddAttribute("ConfTrans","Maxvalue",garActionFldConf[lnLoopNdx][7])
XMLAddAttribute("ConfTrans","Calc",garActionFldConf[lnLoopNdx][8])
XMLAddAttribute("ConfTrans","Lines",garActionFldConf[lnLoopNdx][9])
XMLAddAttribute("ConfTrans","Format",garActionFldConf[lnLoopNdx][10])
XMLParent("ConfTrans")
lsXMLDoc = XMLBuildString("ConfTrans")
fSaveText(CompleteDir(gsDirTemp) + lsActionID +"Transaction.xml",lsXMLDoc)
XMLClose("ConfTrans")