Sample Code for Invoking Methods of Web Engine HTTP TXN Business Service

This topic contains the sample code for invoking the methods of the Web Engine HTTP TXN Business Service and writing the results to a text file. For more information, see Example of Using Web Engine HTTP TXN Business Service.

Add the following sample code to the WebApplet_InvokeMethod event:

function WebApplet_InvokeMethod (MethodName)
{
var fp = Clib.fopen('testfile.txt','a');
if ( fp == null )
{
TheApplication().RaiseErrorText(" ERROR Opening File ")
}
else
{
var oBS = TheApplication().GetService('Web Engine HTTP TXN');
var Inputs = TheApplication().NewPropertySet();
var Outputs = TheApplication().NewPropertySet();
var Headers = TheApplication().NewPropertySet();
var Cookies = TheApplication().NewPropertySet();
var tmpCookie = TheApplication().NewPropertySet();

Clib.fputs('=====================================\n',fp);
Clib.fputs('WebApplet InvokeMethod event:\n',fp);
Clib.fputs('=====================================\n',fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: GetAllRequestCookies\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();
oBS.InvokeMethod ( 'GetAllRequestCookies', Inputs, Outputs);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: GetAllRequestHeaders\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();
oBS.InvokeMethod ('GetAllRequestHeaders', Inputs, Outputs);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: GetAllRequestParameters\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();
oBS.InvokeMethod ('GetAllRequestParameters', Inputs, Outputs);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: GetAllResponseCookies\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();
oBS.InvokeMethod ('GetAllResponseCookies', Inputs, Outputs)
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: GetAllResponseHeaders\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();
oBS.InvokeMethod ('GetAllResponseHeaders', Inputs, Outputs);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: GetAllServerVariables\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();
oBS.InvokeMethod ('GetAllServerVariables', Inputs, Outputs);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: GetRequestCookies\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();

Inputs.SetProperty ('MY-COOKIE', '');
Inputs.SetProperty ('TestCookie', '');
Inputs.SetProperty ('Test1Cookie', '');

oBS.InvokeMethod ('GetRequestCookies', Inputs, Outputs);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: GetRequestHeaders\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();

Inputs.SetProperty ('MyHEADER', '');
Inputs.SetProperty ('MY_TEST', '');
Inputs.SetProperty ('CONTENT-TYPE', '');
Inputs.SetProperty ('CONTENT-LENGTH', '');

oBS.InvokeMethod ('GetRequestHeaders', Inputs, Outputs);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: GetRequestInfo\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();

oBS.InvokeMethod ('GetRequestInfo', Inputs, Outputs);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: GetRequestParameters\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();

Inputs.SetProperty ('TestQstr', '');
Inputs.SetProperty ('SWEActiveView', '');
Inputs.SetProperty ('SWECmd', '');
Inputs.SetProperty ('SWEMethod', '');
Inputs.SetProperty ('TestParam', '');

oBS.InvokeMethod ('GetRequestParameters', Inputs, Outputs);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: GetResponseCookies\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();

Inputs.SetProperty ('My-Test-COOKIE', '');
Inputs.SetProperty ('_sn', '');
oBS.InvokeMethod ('GetResponseCookies', Inputs, Outputs);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: GetResponseHeaders\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();

Inputs.SetProperty ('Content-Language', '');
Inputs.SetProperty ('MyHeader', '');

oBS.InvokeMethod ('GetResponseHeaders', Inputs, Outputs);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: GetResponseInfo\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();

oBS.InvokeMethod ('GetResponseInfo', Inputs, Outputs);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: GetServerVariables\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();

Inputs.SetProperty ('AUTH-USER-ID', '');
Inputs.SetProperty ('SERVER-NAME', '');

oBS.InvokeMethod ('GetServerVariables', Inputs, Outputs);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: GetWebSessionInfo\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();

oBS.InvokeMethod ('GetWebSessionInfo', Inputs, Outputs);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: SetResponseCookies\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();

tmpCookie = null;
tmpCookie = TheApplication().NewPropertySet();

tmpCookie.SetType ('My_Test_Cookie');
tmpCookie.SetValue ('Cookie Value for My_Test_Cookie');
tmpCookie.SetProperty ('Max-Age', '23434343');
tmpCookie.SetProperty ('Domain', '.example.com');
tmpCookie.SetProperty ( 'Path', 'eapps/test/cookie/path');

Inputs.AddChild (tmpCookie);

tmpCookie = null;
tmpCookie = TheApplication().NewPropertySet();

tmpCookie.SetType ('Another_Cookie');
tmpCookie.SetValue ('Cookie Value for Another_Cookie');
tmpCookie.SetProperty ('Max-Age', '23434343');
tmpCookie.SetProperty ('Domain', 'esales.example.com');
tmpCookie.SetProperty ('Path', 'esales/cookie/path');

Inputs.AddChild (tmpCookie);

oBS.InvokeMethod ('SetResponseCookies', Inputs, Outputs);
Clib.fputs('------------------------------------\n',fp);
Clib.fputs('Input Cookies\n',fp);
Clib.fputs('------------------------------------\n',fp);
WebApplet_OutputPropertySet(Inputs, 0, fp);

oBS.InvokeMethod ('GetAllResponseCookies', Inputs, Outputs);
Clib.fputs('------------------------------------\n',fp);
Clib.fputs('Output Cookies\n',fp);
Clib.fputs('------------------------------------\n',fp);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: SetResponseHeaders\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();

Inputs.SetProperty ('MyHeader', 'THIS is MyHeader');

oBS.InvokeMethod ('SetResponseHeaders', Inputs, Outputs);
Clib.fputs('------------------------------------\n',fp);
Clib.fputs('Input Headers\n',fp);
Clib.fputs('------------------------------------\n',fp);
WebApplet_OutputPropertySet(Inputs, 0, fp)

oBS.InvokeMethod ('GetAllResponseHeaders', Inputs, Outputs);
Clib.fputs('------------------------------------\n',fp);
Clib.fputs('Output Headers\n',fp);
Clib.fputs('------------------------------------\n',fp);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fputs('\n',fp);
Clib.fputs('=====================================\n',fp);
Clib.fputs('Method: SetResponseInfo\n',fp);
Clib.fputs('=====================================\n',fp);

Inputs.Reset();
Outputs.Reset();
Headers.Reset();
Cookies.Reset();

Headers.SetType ('HEADERS');
Headers.SetProperty ('ABC_RESPONSE_HEADER1', 'RESPONSE_HEADER1 Value');
Headers.SetProperty ('ABC_RESPONSE_HEADER2', 'RESPONSE_HEADER2 Value');
Headers.SetProperty ('ABC_RESPONSE_HEADER3', 'RESPONSE_HEADER3 Value');
Headers.SetProperty ('ABC_RESPONSE_HEADER4', 'RESPONSE_HEADER4 Value');
Inputs.AddChild( Headers);

Cookies.SetType('COOKIES');

tmpCookie = null;
tmpCookie = TheApplication().NewPropertySet();

tmpCookie.SetType ('My_Test_Cookie2');
tmpCookie.SetValue ( 'Cookie Value for My_Test_Cookie2');
tmpCookie.SetProperty ( 'Max-Age', '23434343');

Cookies.AddChild (tmpCookie);

tmpCookie = null;
tmpCookie = TheApplication().NewPropertySet();

tmpCookie.SetType ('Another_Cookie2');
tmpCookie.SetValue ('Cookie Value for Another_Cookie2');
tmpCookie.SetProperty ('Max-Age', '23434343');

Cookies.AddChild (tmpCookie);

Inputs.AddChild (Cookies);

oBS.InvokeMethod ('SetResponseInfo', Inputs, Outputs);
Clib.fputs('------------------------------------\n',fp);
Clib.fputs('Input Info\n',fp);
Clib.fputs('------------------------------------\n',fp);
WebApplet_OutputPropertySet(Inputs, 0, fp);

oBS.InvokeMethod ('GetResponseInfo', Inputs, Outputs);
Clib.fputs('------------------------------------\n',fp);
Clib.fputs('Output Info\n',fp);
Clib.fputs('------------------------------------\n',fp);
WebApplet_OutputPropertySet(Outputs, 0, fp);

Clib.fclose(fp);
}
}