File: aws_func_xml.tjs

package info (click to toggle)
libaws 2.2dfsg-1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 7,624 kB
  • ctags: 1,173
  • sloc: ada: 61,829; ansic: 6,483; makefile: 1,282; xml: 196; sh: 119; java: 112; python: 66; sed: 40
file content (59 lines) | stat: -rw-r--r-- 1,597 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59

@@-- $1    the tag node ID to handle in the DOM tree
@@-- $2    a set of parameters to pass to the URL
@@-- $3-$7 are linked fields id to this request, all fields are passed as
@@--       parameters to the request.
@@-- $20   the name of a function to call when this routine terminate
@@--
@@-- The final request is : /$1?$4&$5=value($5)&$6=value($6)
@@-- with value(name) being the value for the field named "name".

@@SET@@ XML_ID = $1
@@SET@@ XML_PARAMETERS = $2
@@SET@@ XML_F1 = $3
@@SET@@ XML_F2 = $4
@@SET@@ XML_F3 = $5
@@SET@@ XML_F4 = $6
@@SET@@ XML_F5 = $7

@@SET@@ XML_ONCOMPLETE = $20

   {
      var rurl="/@_XML_ID_@";
      var rpars = "";
      var roncomplete = "";
@@IF@@ @_XML_PARAMETERS_@ /= ""
      rpars = "@_XML_PARAMETERS_@";
@@END_IF@@
@@IF@@ @_XML_F1_@ /= ""
      if (rpars != "")
         rpars = rpars + "&";
      rpars = rpars + serialize('@_XML_F1_@');
@@END_IF@@
@@IF@@ @_XML_F2_@ /= ""
      if (rpars != "")
         rpars = rpars + "&";
      rpars = rpars + serialize('@_XML_F2_@');
@@END_IF@@
@@IF@@ @_XML_F3_@ /= ""
      if (rpars != "")
         rpars = rpars + "&";
      rpars = rpars + serialize('@_XML_F3_@');
@@END_IF@@
@@IF@@ @_XML_F4_@ /= ""
      if (rpars != "")
         rpars = rpars + "&";
      rpars = rpars + serialize('@_XML_F4_@');
@@END_IF@@
@@IF@@ @_XML_F5_@ /= ""
      if (rpars != "")
         rpars = rpars + "&";
      rpars = rpars + serialize('@_XML_F5_@');
@@END_IF@@

@@IF@@ @_XML_ONCOMPLETE_@ /= ""
      roncomplete = @_XML_ONCOMPLETE_@
@@END_IF@@
      aws_xml_request (rurl, rpars, roncomplete);
      return (false);
   }