50: END translateString;
51:
52: --light version of CSM_HTML5_PKG.parse_XML
53: PROCEDURE PARSE_XML(l_xml_clob_payload IN CLOB,
54: X_COL_NAME_LIST OUT NOCOPY CSM_VARCHAR_LIST,
55: X_COL_VALUE_LIST OUT NOCOPY CSM_VARCHAR_LIST,
56: p_fix_esc_chars IN BOOLEAN:=false)
57:
58: AS
51:
52: --light version of CSM_HTML5_PKG.parse_XML
53: PROCEDURE PARSE_XML(l_xml_clob_payload IN CLOB,
54: X_COL_NAME_LIST OUT NOCOPY CSM_VARCHAR_LIST,
55: X_COL_VALUE_LIST OUT NOCOPY CSM_VARCHAR_LIST,
56: p_fix_esc_chars IN BOOLEAN:=false)
57:
58: AS
59: l_xml_doc xmldom.DOMDocument;
61: l_xml_node_list xmldom.DOMNodeList;
62: l_xml_node xmldom.DOMNode;
63: l_xml_node_len NUMBER;
64: len2 number;
65: l_COL_NAME_LIST CSM_VARCHAR_LIST := CSM_VARCHAR_LIST();
66: L_COL_VALUE_LIST CSM_VARCHAR_LIST := CSM_VARCHAR_LIST();
67: BEGIN
68:
69: l_xml_parser := xmlparser.newParser;
62: l_xml_node xmldom.DOMNode;
63: l_xml_node_len NUMBER;
64: len2 number;
65: l_COL_NAME_LIST CSM_VARCHAR_LIST := CSM_VARCHAR_LIST();
66: L_COL_VALUE_LIST CSM_VARCHAR_LIST := CSM_VARCHAR_LIST();
67: BEGIN
68:
69: l_xml_parser := xmlparser.newParser;
70: xmlparser.parseClob(l_xml_parser, l_xml_clob_payload);
1294: l_cust_acct_site_id NUMBER;
1295: l_org_id NUMBER;
1296:
1297: xmlD CLOB:=empty_clob();
1298: l_COL_NAME_LIST CSM_VARCHAR_LIST := CSM_VARCHAR_LIST();
1299: L_COL_VALUE_LIST CSM_VARCHAR_LIST := CSM_VARCHAR_LIST();
1300:
1301: begin
1302:
1295: l_org_id NUMBER;
1296:
1297: xmlD CLOB:=empty_clob();
1298: l_COL_NAME_LIST CSM_VARCHAR_LIST := CSM_VARCHAR_LIST();
1299: L_COL_VALUE_LIST CSM_VARCHAR_LIST := CSM_VARCHAR_LIST();
1300:
1301: begin
1302:
1303: IF NOT CSM_HTML5_PKG.authenticate(p_user_name,p_password) THEN