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.
OraForms.bdh
OraFormsHandlePendingOnExit( ): boolean;
true if successful
false otherwise
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;