Subversion Repositories wimsdev

Rev

Rev 3261 | Rev 3996 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3261 Rev 3666
Line 31... Line 31...
31 
 
 31 
 
32 
#Lorsque l'on sort de la procedure "job", il ne doit tjs pas y avoir d'erreur.
 32 
#Lorsque l'on sort de la procedure "job", il ne doit tjs pas y avoir d'erreur.
33 
!if $error!=$empty
 33 
!if $error!=$empty
34 
 !changeto error.proc $error
 34 
 !changeto error.proc $error
35 
!endif
 35 
!endif
- 
 
 36 
 
- 
 
 37 
 
- 
 
 38 
notplaintext = xmlformat json
36 
 
 39 
 
37 
!if $code=$empty
 40 
!if $code=$empty
38 
  !if $ident_type != xmlformat
 41 
  !if $ident_type notwordof $notplaintext
39 
	ok=OK
 42 
	ok=OK
40 
  !else
 43 
  !else
41 
  	ok=<?xml version="1.0" encoding="$encoding"?>\
 44 
  	!if $ident_type=xmlformat
42 
<!DOCTYPE methodResponse PUBLIC "XML9-RPC" "http://ticewims.unice.fr/xml-rpc/xml-rpc.dtd">\
 - 
 
43 
<methodResponse xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:noNamespaceSchemaLocation="http://ticewims.unice.fr/xml-rpc/xml-rpc.xsd">\
 - 
 
44 
<params><param><value><string>OK</string></value></param>
 45 
  	  	ok=<params><param><value><string>OK</string></value></param>
- 
 
 46 
  	!endif
- 
 
 47 
  	!if $ident_type=json
- 
 
 48 
  	  	ok=[{"status" : "OK"
- 
 
 49 
  	!endif
45 
  !endif
 50 
  !endif
46 
!else
 51 
!else
47 
  !if $ident_type != xmlformat
 52 
  !if $ident_type notwordof $notplaintext
48 
	ok=OK $code$ident_type
 53 
	ok=OK $code$ident_type
49 
  !else
 54 
  !else
50 
  	ok=<?xml version="1.0" encoding="$encoding"?>\
 55 
  	!if $ident_type=xmlformat
51 
<!DOCTYPE methodResponse PUBLIC "XML9-RPC" "http://ticewims.unice.fr/xml-rpc/xml-rpc.dtd">\
 - 
 
52 
<methodResponse xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:noNamespaceSchemaLocation="http://ticewims.unice.fr/xml-rpc/xml-rpc.xsd">\
 - 
 
53 
	<params><param><value><struct><member>\
 56 
  	 ok=<params><param><value><struct>\
- 
 
 57 
  	 <member>\
54 
		<name>code</name>\
 58 
	 	<name>code</name>\
55 
		<value><string>$code</string></value>\
 59 
	 	<value><string>$code</string></value>\
56 
	</member>\
 60 
	 </member>\
57 
 
 61 
 
- 
 
 62 
	!endif
- 
 
 63 
	!if $ident_type=json
- 
 
 64 
  	  	ok=[{"status" : "OK","code":"$code",
- 
 
 65 
  	!endif
58 
  !endif
 66 
  !endif
59 
!endif
 67 
!endif
- 
 
 68 
 
- 
 
 69 
 
60 
 
 70 
 
61 
!if $ident_type != xmlformat
 71 
!if $ident_type notwordof $notplaintext
62 
	!shortout $header\
 72 
	!shortout $header\
63 
 
 73 
 
64 
!else
 74 
!else
- 
 
 75 
 !if $ident_type iswordof xmlformat
65 
	!shortout $header_xml\
 76 
	!shortout $header_xml\
- 
 
 77 
<?xml version="1.0" encoding="$encoding"?>\
- 
 
 78 
<!DOCTYPE methodResponse PUBLIC "XML9-RPC" "http://ticewims.unice.fr/xml-rpc/xml-rpc.dtd">\
- 
 
 79 
<methodResponse xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:noNamespaceSchemaLocation="http://ticewims.unice.fr/xml-rpc/xml-rpc.xsd">\
- 
 
 80 
 
- 
 
 81 
 !endif
- 
 
 82 
 !if $ident_type=json
- 
 
 83 
 	!shortout $header_json\
- 
 
 84
- 
 
 85 
 !endif
66 
 
 86 
 
67 
!endif
 87 
!endif
68 
 
 88 
 
69 
 
 89 
 
70 
 
 90