OraFormsHandlePendingOnExit Function

Action

OraFormsHandlePendingOnExit may be used for Oracle Forms 10g services. Script this function for scripts that run against 10 g Forms services. Insert just before the script logs off from the server.

Include file

OraForms.bdh

Syntax

OraFormsHandlePendingOnExit( ): boolean;

Return value

  • true if successful

  • false otherwise

Example

dcltrans
  transaction TMain
  var
    sValue   : string;
  begin
    OraFormsSetConnectMode(ORA_SOCKET_CONNECTION); 
    // Connect - with connection properties
    OraFormsSetInt("INITIAL_VERSION", 608);
    OraFormsSetPoint("INITIAL_RESOLUTION", 96, 96);
    OraFormsSetPoint("INITIAL_DISP_SIZE", 1024, 768);
    OraFormsSetInt("INITIAL_COLOR_DEPTH", 256);
    OraFormsSetString("FONT_NAME", "Dialog");
    OraFormsSetPoint("INITIAL_SCALE_INFO", 8, 18);
    OraFormsSetBoolean("WINSYS_REQUIREDVA_LIST", false);
    OraFormsConnect("server module=Person3.fmx userid= useSDI=yes record=names");
    OraFormsSetWindow("Logon");
    OraFormsLogon("user", "password", "orcl_server"); 
    // ---
    // New window activated: WINDOW1
    OraFormsSetWindow("WINDOW1");
    OraFormsHandlePendingOnExit();
    OraFormsDisconnect();
  end TMain;