/* Copyright (c) Oracle Corporation 1996.  All Rights Reserved */

/*****************************************************************************
  NAME
    user.pin - user-defined .pin script

  DESCRIPTION
    This script allows users access to their own customizable .pin script.

  MODIFIED    MM/DD/YY  Reason
   rbansal    08/29/96  Created
*****************************************************************************/
{

    {execute("%installer_home%%dir_separator%%operating_system%.pin");}

     if(exists("%installer_home%%dir_separator%d2bb_10.bmp"))
     {
	  if(DEVELOPER2000_RELEASE)                                             /* display 'Thank You for Purchasing Developer' billboard, if this is the Developer release */
	  {
	       if(not(DEV2K_BB10))
	       {
		    DEV2K_BB10 = TRUE;
		    ui_graphics("%installer_home%%dir_separator%d2bb_10.bmp");
	       }
	  }
     } /* End - Dev2K Billboard */

     /*********************
     Remove billboard files
     **********************/
     bboard_files_list = files("%installer_home%%dir_separator%d*.bmp");
     while(not(empty(bboard_files_list)))
     {
	  remove_file(first(bboard_files_list));
	  bboard_files_list = rest(bboard_files_list);
     }
  if (operating_system == "nt")
  {
    formsweb_cfg_file = "%ORACLE_HOME%\forms60\server\formsweb.cfg";
    if (member(selected_products,d2ls))
    {
	if(exists(formsweb_cfg_file))
	{
	  modify("MetricsServerPort",request_port,formsweb_cfg_file);
	  modify("serverHost","%LeastLoadedHost%",formsweb_cfg_file);
	} 
    }
    if (member(selected_products,w32frunw60))
    {
	if(exists(formsweb_cfg_file))
	{
	  modify("serverPort",f__server_port,formsweb_cfg_file);
	  modify("connectMode",f__server_protocol,formsweb_cfg_file);
	}
    }
    execute("user1.pin");
    permit_retry_operations = TRUE;      

    /***** Stop Service *****/
    {
    servstop=winnt_stop_service("Oracle WebDb Listener");
    } 
    ['PERMISSION_DENIED: information_dialog(instantiate(nls("inval_perms","You do not have valid permissions to install the Listener")));
     'cancel: signal('cancel,instantiate(nls("operation_cancelled","Operation cancelled at user's request")));  
     'default: continue();]
    {
    winnt_start_service("Oracle WebDb Listener");
    }
    ['cancel: signal('cancel,instantiate(nls("operation_cancelled","Operation cancelled at user's request")));
     'default: continue();]

    permit_retry_operations = FALSE;


/******************** This dialog is created as part of Smart Install *********************/
	file1 = "";
	file2 = "";
if (forms_v == "TRUE")
	file1 = forms_config_instruction_file;
if (reports_v == "TRUE")
	file2 = reports_config_instruction_file;
    if(configureProcesses)
    {
	prompt_string=nls("prompt_string","Certain configuration steps are required before the products you have installed can be used.  Where possible these have been done for you.  However, you may still need to do some steps manually.  A file has been generated giving details: 

    %file1%
    %file2% 
  

View instructions now (recommended) ?
");
	prompt_default=TRUE;
	prompt_content=nls("path_modn_content","Configuration instructions for %d2k_icon% Server");
       path_modify = yesno_dialog(prompt_string, prompt_default,
				  prompt_content, 'NOHELP, 'NOCANCEL);

	if (path_modify && forms_v == "TRUE")
	  display_file_dialog(instantiate("%forms_config_instruction_file%"),'NOCANCEL);
	if (path_modify && reports_v == "TRUE")
	  display_file_dialog(instantiate("%reports_config_instruction_file%"),'NOCANCEL);
    }
  
	/*if (member(selected_products,w32www21)){
	   information_dialog(instantiate(nls("completed","WebDB Listener installation completed.%carriage_return%%carriage_return%You can make additional listener modifications at http://%Host_Name%:%port%/%DAD%/admin_/gateway.htm and http://%Host_Name%:%port%/%DAD%/admin_/listener.htm")),"Oracle WebDB Listener",'NOCANCEL);
 }*/
}
/***********************END of Smart Install dialog *****************************************/


/*********** End of WebDB/Reports Security Feature Install **********************************/
	

     /*******************************************************************
     Show that installation was successful.
     Show special prompt if any products with .pdf files were installed
     ********************************************************************/
     if (acro_flag)
	  information_dialog(instantiate(acro_installation_successful), 'NO_CANCEL);
     else   
	information_dialog(install_success, 'NO_CANCEL);  /*special message not required*/
	  
     

/*******************************************************************/

     if (PJ)
	   information_dialog("%pjs_msg%",'NOHELP,'NOHELP,'NOCANCEL);
	
      
	remove_file("%installer_home%%dir_separator%user.pin");

}