reddot rql finishtranslation

Howto get a page released from translation editor

Function finishtranslation(pageguid,availableLangVariantId)
dim xmlString
dim resXML
xmlString = "" _
& "<IODATA loginguid=""" & Session("LoginGuid") & """ sessionkey=""" & Session("SessionKey") & """>" & Vbcrlf _
& "<WORKFLOW>" & Vbcrlf _
& "<PAGES action=""finishtranslation"" sourcelanguageid="""& Session("LanguageVariantId") & """ targetlanguageid=""" & availableLangVariantId & """>" & Vbcrlf _
& "<PAGE guid=""" & pageguid & """/>" & Vbcrlf _
& "</PAGES>" & Vbcrlf _
& "</WORKFLOW>" & Vbcrlf _
& "</IODATA>" & Vbcrlf

If show_debug = true then
Response.write("<div style=""margin-left:20px; border:1px solid green;""")
xmlString = replace(xmlString,"<","&lt;")
xmlString = replace(xmlString,">","&gt;")
Response.write("[" & xmlString & "]")
response.write("</div>")
End If

resXML = objIO.ServerExecuteXml(XMLString, sError)

If sError <> "" Then
Response.Write "<span style='color:red'>" & sError & "</span><br />"
End If

End Function
Lorem