IScript for testing PeopleCode

When your Application Package PeopleCode doesn't have any Component Buffer references, then creating an IScript (and registering it to a portal CREF) allows you to test your Application Package PeopleCode.

Function Disable_Tracing();
   SetTraceSQL(0);
   SetTracePC(0);
   
End-Function;

Function Enable_Tracing();
   SetTraceSQL(31);
   SetTracePC(2060);
   
End-Function;

Function Test_ConfigureClassicPlusComponent();
   Enable_Tracing();
   %Response.SetContentType("text/plain");
   %Response.WriteLine("Turn Off");
   %Response.WriteLine("COMPONENT: " | String(ConfigureClassicPlusComponent(Component.COMPONENT, "GBL", 0)));
   Disable_Tracing();
End-Function;

rem Register this to the CREF and to a Permission List;
Function IScript_Test();
   rem Test_Environment_Variables();
   rem Test_ConfigureClassicPlusComponent();
End-Function;

I find it especially useful when testing for Web Services PeopleCode, as it allows you to build out the logic before testing the Service Operation itself.

The URL Type will be 'PeopleSoft Script', which will give you the fields to enter the Record Name (e.g. WEBLIB_ACC_TEST), Field Name (e.g. ISCRIPT1), PeopleCode Event Name (e.g. FieldFormua), and the PeopleCode Function Name (e.g. IScript_Test).