Application / Siebel Financial Services

function Application_Close ()

{

var bSession = mSession;

if (bSession != null)

{

mScreen.SendKeys("<Clear>");

//mScreen.SendKeys("<Escape>");

var quietWait = mScreen.WaitHostQuiet(2000);

do {

SElib.dynamicLink("Kernel32","Sleep",STDCALL,0);

} while (quietWait.Value() != true);

//quietWait = null;

//mScreen.SendKeys("cancel<Enter>");

mScreen.SendKeys("cesf logoff<Enter>");

quietWait = mScreen.WaitHostQuiet(1000);

do {

SElib.dynamicLink("Kernel32","Sleep",STDCALL,0);

} while (quietWait.Value() != true);

bSession.Disconnect;

bSession = null;

mSession.Disconnect;

mSessions.CloseAll;

//SElib.dynamicLink("Kernel32","Sleep",STDCALL,2000);

//mSession.Visible = false;

mScreen = null;

mSession = null;

mSessions = null;

mSystem = null;

//return (ContinueOperation);

//TheApplication().MsgBox("3270 Session Logout Complete");

}

return (CancelOperation);

}

Application / Siebel Financial Services

function Application_PreInvokeMethod (MethodName)

{

switch (MethodName) // test the MethodName

{

case 'Login': // if Add then get the input properties and convert to number and add together

mSystem = COMCreateObject("Extra.system");

mSessions = mSystem.Sessions;

mSession = mSessions.Open("Siebel.EDP");

mScreen = mSession.Screen;

mSession.Connect;

mSession.Visible = false;

curScreen = TheApplication().mScreen;

/*mSystem.ResetSystem;

mSystem.UnregisterClient;

mSession.ResetSystem;

mSession.Disconnect;

curScreen = null;

mScreen = null;

mSession = null;

mSessions = null;

mSystem = null; */

var quietWait = curScreen.WaitHostQuiet(1000);

do {

SElib.dynamicLink("Kernel32","Sleep",STDCALL,0);

} while (quietWait.Value() != true);

curScreen.SendKeys("<Clear>");// ^^^^^^^^^^^^^^^^^^^^^^^^^^^

var quietWait = curScreen.WaitHostQuiet(1000);

do {

SElib.dynamicLink("Kernel32","Sleep",STDCALL,0);

} while (quietWait.Value() != true);

//curScreen.SendKeys("bridge");

curScreen.SendKeys("TPCICS");// ^^^^^^^^^^^^^^^^^^^^^^^^^^^

curScreen.SendKeys("<ENTER>");// ^^^^^^^^^^^^^^^^^^^^^^^^^^^

var quietWait = curScreen.WaitHostQuiet(2000);

do {

SElib.dynamicLink("Kernel32","Sleep",STDCALL,0);

} while (quietWait.Value() != true);

curScreen.SendKeys("<CLEAR>"); // ^^^^^^^^^^^^^^^^^^^^^^^^^^^

var quietWait = curScreen.WaitHostQuiet(2000);

do {

SElib.dynamicLink("Kernel32","Sleep",STDCALL,0);

} while (quietWait.Value() != true);

//curScreen.SendKeys("SBS BCMT0866");

//curScreen.SendKeys("SBS BGES0871");

curScreen.SendKeys("CRTE SYSID=TPC2");// ^^^^^^^^^^^^^^^^^^^^^^^^^^^

curScreen.SendKeys("<ENTER>");// ^^^^^^^^^^^^^^^^^^^^^^^^^^^

var quietWait = curScreen.WaitHostQuiet(2000);

do {

SElib.dynamicLink("Kernel32","Sleep",STDCALL,0);

} while (quietWait.Value() != true);

/* curScreen.SendKeys("LLJ1");

curScreen.SendKeys("MINA");

curScreen.SendKeys("<ENTER>");

var quietWait = curScreen.WaitHostQuiet(5000);

do {

SElib.dynamicLink("Kernel32","Sleep",STDCALL,0);

} while (quietWait.Value() != true);

curScreen = TheApplication().mScreen; */

curScreen.SendKeys("<CLEAR>");// ^^^^^^^^^^^^^^^^^^^^^^^^^^^

var quietWait = curScreen.WaitHostQuiet(1000);

do {

SElib.dynamicLink("Kernel32","Sleep",STDCALL,0);

} while (quietWait.Value() != true);

//This following section was added by Waruna 03-20-2001 ------

var oBO = TheApplication().GetBusObject("Employee");

var oBC1 = oBO.GetBusComp("MLIPCG Employee");

var Lid = TheApplication().LoginId();

oBC1.SetViewMode(AllView);

oBC1.ActivateField("PAR ROW ID");

oBC1.ActivateField("Boss Logon Id");

oBC1.ActivateField("Boss Current Password");

oBC1.ClearToQuery();

oBC1.SetSearchSpec("PAR ROW ID", Lid);

oBC1.ExecuteQuery();

if (oBC1.FirstRecord())

{var aId = oBC1.GetFieldValue("Boss Logon Id");

var aPwd = oBC1.GetFieldValue("Boss Current Password");

}

//curScreen.SendKeys("SBS BGES0871");

curScreen.SendKeys("SBS " + aId);//"SBS " + aId

curScreen.SendKeys("<ENTER>");// <ENTER>

var quietWait = curScreen.WaitHostQuiet(1000);

do {

SElib.dynamicLink("Kernel32","Sleep",STDCALL,0);

} while (quietWait.Value() != true);

//curScreen.SendKeys("MINA");

curScreen.SendKeys(aPwd);

curScreen.SendKeys("<ENTER>");

var quietWait = curScreen.WaitHostQuiet(5000);

do {

SElib.dynamicLink("Kernel32","Sleep",STDCALL,0);

} while (quietWait.Value() != true);

// curScreen = TheApplication().mScreen;

curScreen.SendKeys("<CLEAR>");

var quietWait = curScreen.WaitHostQuiet(1000);

do { SElib.dynamicLink("Kernel32","Sleep",STDCALL,0);

} while (quietWait.Value() != true);

//This following section was added by Waruna 03-20-2001 ------

//TheApplication().MsgBox("Session Login Complete ... Please continue ...");

return (CancelOperation);

break;

case 'Logout':

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

//This code contains any needed logoff sequences. Notice the use of WaitHostQuiet

//to verify that the host is ready for input. It may be necessary to adjust the

//settle time parameter to allow for differences in host response time.

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

mScreen.SendKeys("<Clear>");

//mScreen.SendKeys("<Escape>");

var quietWait = mScreen.WaitHostQuiet(2000);

do {

SElib.dynamicLink("Kernel32","Sleep",STDCALL,0);

} while (quietWait.Value() != true);

//quietWait = null;

mScreen.SendKeys("cesf logoff<Enter>");

quietWait = mScreen.WaitHostQuiet(1000);

do {

SElib.dynamicLink("Kernel32","Sleep",STDCALL,0);

} while (quietWait.Value() != true);

//mSessions.CloseAll;

mSession.CloseAll;

//SElib.dynamicLink("Kernel32","Sleep",STDCALL,2000);

/*var bSession = mSession;

var c = bSession.Disconnect;

var d = bSession.ResetSystem;

bSession = null;

mSession = null;

mScreen = null;

mSessions = null;

mSystem = null; */

//return (ContinueOperation);

TheApplication().MsgBox("Session Logout Complete");

return (CancelOperation);

break;

case 'BOSS VALIDATION':

TheApplication().SetSharedGlobal("BOSSLoginOkFlag", "false");

var oBO = TheApplication().GetBusObject("Employee");

var oBC1 = oBO.GetBusComp("MLIPCG Employee");

var Lid = TheApplication().LoginId();

var aId;

var aPwd;

oBC1.SetViewMode(AllView);

oBC1.ActivateField("Boss Logon Id");

oBC1.ActivateField("Boss Current Password");

oBC1.ClearToQuery();

oBC1.SetSearchSpec("PAR ROW ID", Lid);

oBC1.ExecuteQuery();

if (oBC1.FirstRecord()) // <if block #1 >

{

aId = oBC1.GetFieldValue("Boss Logon Id");//Get the BOSS Login Id from Siebel

aPwd = oBC1.GetFieldValue("Boss Current Password"); //Get the Login Password from Siebel

//TheApplication().MsgBox("Current UID =" + aId +" "+ "Current Password =" + aPwd);

}

var Waruna = COMCreateObject("SiebelLogin.Navigation");

var aLoginOK = Waruna.LoginBOSSFromSiebel(aPwd, aId);

var aErrMsg = Waruna.ErrorMsg

Waruna= null;

if ( aLoginOK != true) // <if block #2 > Login was NOT okay

{

if (aErrMsg =="Siebel Blank") // Siebel has blanks

{

var ken = COMCreateObject("CallSiebelDLL.ShowBOSS");

var show = ken.ShowForm = true;

var aLogin = ken.showBoss("", "");

var NewPwd = ken.GetPassword;

var NewUID = ken.GetUID;

//update Siebel and then try again

oBC1.SetFieldValue("Boss Logon Id", NewUID);

oBC1.SetFieldValue("Boss Current Password",NewPwd);

oBC1.WriteRecord();

var Waruna2 = COMCreateObject("SiebelLogin.Navigation");

var aLoginOK = Waruna2.LoginBOSSFromSiebel(NewPwd, NewUID);

TheApplication().SetSharedGlobal("BOSSLoginOkFlag","true");

}

else

{

var ken = COMCreateObject("CallSiebelDLL.ShowBOSS");

var aLogin = ken.showBoss(aId, aPwd);

}

}

else // Login was okay

{

TheApplication().MsgBox("BOSS login was successful");

TheApplication().SetSharedGlobal("BOSSLoginOkFlag","true");

}

if (ken.PWChanged == true) // <if block #3 >

{

TheApplication().SetSharedGlobal("BOSSLoginOkFlag", "true");

var aPW = ken.GetPassword;

var aUId = ken.GetUID ;

//update Seibel

oBC1.SetFieldValue("Boss Logon Id",aUId);

oBC1.SetFieldValue("Boss Current Password",aPW);

oBC1.WriteRecord();

}

else

{

if (ken.SiebelBadLogin == true)

{

var aPW = ken.GetPassword;

var aUId = ken.GetUID ;

//update Seibel

oBC1.SetFieldValue("Boss Logon Id",aUId);

oBC1.SetFieldValue("Boss Current Password",aPW);

oBC1.WriteRecord();

var ken = COMCreateObject("CallSiebelDLL.ShowBOSS");

var aLogin = ken.showBoss(aId, aPwd);

TheApplication().SetSharedGlobal("BOSSLoginOkFlag", "true");

}

}

var msg = TheApplication().GetSharedGlobal("BOSSLoginOkFlag");

//TheApplication().MsgBox(msg);

oBO = null;

oBC1 = null;

var someVar = ken.EndShow;

ken = null;

return (CancelOperation);

break;

case 'EventReleaseCallScript':

/*

/*Application: Siebel Financial Services

/*Description:

/*This Function is triggered on the Event of the Call Getting released.

/*Checks for the Wrap-up been entered by the Call Center Agent.

/*If the Wrap-up is not entered by the Agent the Wrap-up View is Displayed,

/*with the context of the Client maintained.

/*

/*Author: Waruna, Sylvia, Vinod

/*Created:Mar-21-2001

/*

/**/

//**DISPLAY FOR TESTING

//TheApplication().MsgBox("Came Here");

var oBO;

var oBC;

oBO = TheApplication().GetBusObject("Action");

oBC = oBO.GetBusComp("Action");

oBC.ActivateField("Created By Name");

oBC.ActivateField("Created");

oBC.ActivateField("Id");

oBC.ActivateField("Type");

oBC.ActivateField("Contact Id");

oBC.ActivateField("CCStage Indicator");

//*****Query To the BC->Action.

oBC.SetViewMode(AllView);

oBC.ClearToQuery();

var createName = TheApplication().LoginName();

//**DISPLAY FOR TESTING

//TheApplication().MsgBox("Created name : " + createName);

oBC.SetSearchSpec("Created By Name", createName);

oBC.SetSortSpec("Created");

oBC.ExecuteQuery(ForwardBackward);

var found = oBC.LastRecord();

//**DISPLAY FOR TESTING

//if (found == "false")

//{

//TheApplication().MsgBox("No Activities found");

//}

var ccStgInd = oBC.GetFieldValue("CCStage Indicator");

//**DISPLAY FOR TESTING

//TheApplication().MsgBox("Stage indicator : " + ccStgInd);

//*****Getting the 'Contact Id' from Activities (BC->Action)

var gd = oBC.GetFieldValue("Contact Id");

TheApplication().SetSharedGlobal("gcontactid", gd);

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

if(ccStgInd == "1" || ccStgInd == "2")

{

//**DISPLAY FOR TESTING

//TheApplication().MsgBox("Came Here thru the Application Goto View");

var oBOWp = TheApplication().GetBusObject("Contact Center");

var oBCWp = oBOWp.GetBusComp("Contact");

//**DISPLAY FOR TESTING

//TheApplication().MsgBox("About to execute Query");

oBCWp.SetViewMode(AllView);

oBCWp.ClearToQuery();

oBCWp.ActivateField("Id");

//*****Getting the 'Contact Id' form the Global Variable and moving it to

var gcontactider = TheApplication().GetSharedGlobal("gcontactid")

//**DISPLAY FOR TESTING

//TheApplication().MsgBox("Contact ID : " + gcontactider);

//*****Search based on the 'Contact id' in BC->Conatct.

oBCWp.SetSearchSpec("Id", gcontactider);

oBC.ExecuteQuery(ForwardBackward);

//**DISPLAY FOR TESTING

//TheApplication().MsgBox("Going to the Application Goto View");

TheApplication().GotoView("Contact Center Wrap-up View", oBOWp);

oBOWp = null;

oBCWp = null;

}

oBC = null;

oBO = null

return (CancelOperation);

break;

default:

return (ContinueOperation);

break;

}

}

Application / Siebel Financial Services / general -> declarations

var mSystem;

var mSessions;

var mSession;

var mScreen;

var curScreen;

var TranNumber;

var BOSSLoginOkFlag;

var BOSSValidationDoneFlag;

var ExtraPCLaunchedFlag;

TheApplication().SetSharedGlobal("BOSSValidationDoneFlag", "false");

TheApplication().SetSharedGlobal("BOSSLoginOkFlag", "false");

TheApplication().SetSharedGlobal("ExtraPCLaunchedFlag", "false");

TheApplication().SetSharedGlobal("TranNumber", "0");

var gcontactid;

var gaccountid;

Application / Siebel Financial Services / general ->EventReleaseCallScrip

function EventReleaseCallScript()

{

/*

/*Application: Siebel Financial Services

/*Description:

/*This Function is triggered on the Event of the Call Getting released.

/*Checks for the Wrap-up been entered by the Call Center Agent.

/*If the Wrap-up is not entered by the Agent the Wrap-up View is Displayed,

/*with the context of the Client maintained.

/*

/*Author: Waruna, Sylvia, Vinod

/*Created:Mar-21-2001

/*

/**/

//**DISPLAY FOR TESTING

//TheApplication().MsgBox("Came Here");

var oBO;

var oBC;

oBO = TheApplication().GetBusObject("Action");

oBC = oBO.GetBusComp("Action");

oBC.ActivateField("Created By Name");

oBC.ActivateField("Created");

oBC.ActivateField("Id");

oBC.ActivateField("Type");

oBC.ActivateField("Contact Id");

oBC.ActivateField("CCStage Indicator");

//*****Query To the BC->Action.

oBC.SetViewMode(AllView);

oBC.ClearToQuery();

var createName = TheApplication().LoginName();

//**DISPLAY FOR TESTING

//TheApplication().MsgBox("Created name : " + createName);

oBC.SetSearchSpec("Created By Name", createName);

oBC.SetSortSpec("Created");

oBC.ExecuteQuery(ForwardBackward);

var found = oBC.LastRecord();

//**DISPLAY FOR TESTING

//if (found == "false")

//{

//TheApplication().MsgBox("No Activities found");

//}

var ccStgInd = oBC.GetFieldValue("CCStage Indicator");

//**DISPLAY FOR TESTING

//TheApplication().MsgBox("Stage indicator : " + ccStgInd);

//*****Getting the 'Contact Id' from Activities (BC->Action)

var gd = oBC.GetFieldValue("Contact Id");

TheApplication().SetSharedGlobal("gcontactid", gd);

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

if(ccStgInd == "1" || ccStgInd == "2")

{

//**DISPLAY FOR TESTING

//TheApplication().MsgBox("Came Here thru the Application Goto View");

var oBOWp = TheApplication().GetBusObject("Contact");

var oBCWp = oBOWp.GetBusComp("Contact");

//**DISPLAY FOR TESTING

//TheApplication().MsgBox("About to execute Query");

oBCWp.SetViewMode(AllView);

oBCWp.ClearToQuery();

oBCWp.ActivateField("Id");

//*****Getting the 'Contact Id' form the Global Variable and moving it to

var gcontactider = TheApplication().GetSharedGlobal("gcontactid")

//**DISPLAY FOR TESTING

//TheApplication().MsgBox("Contact ID : " + gcontactider);

//*****Search based on the 'Contact id' in BC->Conatct.

oBCWp.SetSearchSpec("Id", gcontactider);

oBC.ExecuteQuery(ForwardBackward);

//**DISPLAY FOR TESTING

//TheApplication().MsgBox("Going to the Application Goto View");

TheApplication().GotoView("Contact Center Wrap-up View", oBOWp);

TheApplication().MsgBox(" WRAP-UP NEEDS TO BE COMPLETED " );

oBOWp = null;

oBCWp = null;

}

oBC = null;

oBO = null

return(ContinueOperation);

}

Business Component-> CCAction / BusComp-> BusComp_PreSetFieldValue

/*

/*Business Component: CCAction (Copy of Action , Business Component).

/*Description:

/*Code gets activated in the Applet -> Contact Center Log1 Form Applet.

/*at the Cick of the LOV values in the Field->Type (Activity Type).

/*It populates the fields 'Description' and 'Status'.

/*Author: Vinod

/*Created:Feb-02-2001

/*

/**/

function BusComp_PreSetFieldValue (FieldName, FieldValue)

{

//***Start of Function

switch (FieldName)

{ //**Start of Switch1

case 'Type':

switch (FieldValue)

{//**Start of Switch2

var desfld ;

//for Order0 *Acct Bal/Portfolio Position*

case 'Acct Bal/Portfolio Position':

desfld = GetFieldValue("Description");

if (desfld == "" )

{

this.SetFieldValue('Description', 'Point of Contact Response');

}

this.SetFieldValue('Status', 'Closed');

break;

//for Order1 *VISA Inquiry*

case 'VISA Inquiry':

desfld = GetFieldValue("Description");

if (desfld == "" )

{

this.SetFieldValue('Description', 'Point of Contact Response');

}

this.SetFieldValue('Status', 'Closed');

break;

//for Order2 *Checking Inquiry*

case 'Checking Inquiry':

desfld = GetFieldValue("Description");

if (desfld == "" )

{

this.SetFieldValue('Description', 'Point of Contact Response');

}

this.SetFieldValue('Status', 'Closed');

break;

//for Order3 *Call Client*

case 'Call Client':

this.SetFieldValue('Description', 'Point of Contact Response');

//BELOW status set to blank AS THE FIELD NEEDS TO BE SET TO CLOSED AFTER CALLING THE CLIENT

this.SetFieldValue('Status', '');

break;

//for Order4 *Trade Placed*

case 'Trade Placed':

desfld = GetFieldValue("Description");

if (desfld == "" )

{

this.SetFieldValue('Description', 'Point of Contact Response');

}

this.SetFieldValue('Status', 'Closed');

break;

//for Order5 *General queries*

case 'General queries':

desfld = GetFieldValue("Description");

if (desfld == "" )

{

this.SetFieldValue('Description', 'Point of Contact Response');

}

this.SetFieldValue('Status', 'Closed');

break;

default:

//*********DESCRIPTION HAS BEEN COMMENTED OUT MAR-27-2001->VINOD

//this.SetFieldValue('Description', '');

this.SetFieldValue('Status', '');

break;

//**End of Switch2

}

break;

//**End of Switch1

}

return (ContinueOperation);

//***End of Function

}

Business Component-> CCAction / BusComp-> BusComp_PreWriteRecord

function BusComp_PreWriteRecord ()

{

/*It set the State indicator to "3" of field "CCStage Indicator".

/*BEFORE THE RECORD IS WRITTEN TO THE DATABASE.

/*Author: Vinod

/*Created:Mar-19-2001

/*

/*Modified:Mar-21-2001

/*Commented out:to incorporate into the process followed by the Agent

/*to Set Stage Indicator to '3' by Clicking on to 'Save'.

/*

/*BC->CCAction

/*

/**/

//this.SetFieldValue("CCStage Indicator", "3");

//return (ContinueOperation);

}

Business Component-> CCAction / BusComp-> BusComp_WriteRecord

function BusComp_WriteRecord ()

{

/*It set the State indicator to "3" of field "CCStage Indicator".

/*BEFORE THE RECORD IS WRITTEN TO THE DATABASE.

/*Author: Vinod

/*Created:Mar-19-2001

/*

/*Modified:Mar-21-2001

/*Commented out:to incorporate into the process followed by the Agent

/*to Set Stage Indicator to '3' by Clicking on to 'Save'.

/*

/*BC->CCAction

/*

/**/

this.SetFieldValue("CCStage Indicator", "3");

return (ContinueOperation);

}

Application-> Siebel Financial Services / Applet->Contact Center Authentication Form Applet
Business Component-> Contact / Done-> Done_Click

function Done_Click ()

{

/*this is activated on the click of the button Done after the Client is Authinticated

/*Applet->Contact Center Authentication Form Applet

/*Bo->Contact

/*Bc->Contact

/*

/*Author:Warnua, Sylvia, Vinod.

/*Created:Mar-14-2001

/*Modified :Mar-19-2001

/*

/**/

//var oBOCo = TheApplication().GetBusObject("Contact");

var oBCCo = TheApplication().ActiveBusComp();

//****Getting the Contact id (Client)from the Current Record

oBCCo.ActivateField("Id");

var c = oBCCo.GetFieldValue("Id");

//****Moving the value to the Global variable.

TheApplication().SetSharedGlobal("gcontactid", c);

oBCCo = null;

var oBO;

var oBC;

//*****FROM THE "ACTIVITY" PROJECT.

oBO = TheApplication().GetBusObject("Action");

oBC = oBO.GetBusComp("Action");

oBC.SetViewMode(AllView);

oBC.ActivateField("Created By Name");

oBC.ActivateField("Created");

oBC.ActivateField("Id");

oBC.ActivateField("Type");

oBC.ActivateField("Contact Id");

oBC.ActivateField("CCStage Indicator");

oBC.ClearToQuery();

var b = TheApplication().LoginName();

oBC.SetSearchSpec("Created By Name", b);

oBC.SetSortSpec("Created");

oBC.ExecuteQuery(ForwardBackward);

var found = oBC.LastRecord();

oBC.GetFieldValue("Type");

if (oBC.GetFieldValue("CCStage Indicator") == "1" || oBC.GetFieldValue("CCStage Indicator") == "0")

{

//*****Assigining the latest Activity to the Contact

oBC.SetFieldValue("Contact Id", c);

oBC.SetFieldValue("CCStage Indicator", "2");

oBC.WriteRecord();

}

//*****REFRESH SCREEN

var oBOCCAct = TheApplication().GetBusObject("Contact");

var oBCCCAct = oBOCCAct.GetBusComp("Contact");

oBCCCAct.SetViewMode(AllView);

oBCCCAct.ClearToQuery();

oBCCCAct.ActivateField("Id");

var gcontactider = TheApplication().GetSharedGlobal("gcontactid");

oBCCCAct.SetSearchSpec("Id", gcontactider);

oBCCCAct.ExecuteQuery(ForwardBackward);

TheApplication().GotoView("Contact Center Page One View", oBOCCAct);

oBOCCAct = null;

oBCCCAct = null;

oBC = null;

oBO = null;

}

Application-> Siebel Financial Services / Applet->Contact Center Log1 Form Applet
Business Component-> CCAction / ButtonNew2-> ButtonNew2_Click

function ButtonNew2_Click ()

{

/*On the Click of the 'Save' Button,

/*the Stage indicator flag is set to "3" of field "CCStage Indicator".

/*this is to be activated after the entries are made in the Wrap-up.

/*Author: Vinod

/*Created:Mar-15-2001

/*

/*Applet->Contact Center Log1 Form Applet

/*BO->Contact Center

/*BC->CCAction

/*

/*

/**/

var a = TheApplication().ActiveBusComp();

a.ActivateField("CCStage Indicator");

a.ActivateField("Description");

a.ActivateField("Status");

a.ActivateField("Type");

var desfld = a.GetFieldValue("Description");

var stsfld = a.GetFieldValue("Status");

var typfld = a.GetFieldValue("Type");

//*****DISPLAY VALUES FOR TESTING

//TheApplication().MsgBox(" des : " + desfld + "sts :" + stsfld + "Typ: " + typfld);

if (desfld == "" || stsfld == "" || typfld == "")

{

TheApplication().MsgBox("The following Fields are Required : Activity Type, Status, Description ");

}

else

{

//*****DISPLAY VALUES FOR TESTING

//TheApplication().MsgBox(" Else ");

//if (a.GetFieldValue("CCStage Indicator") = "2")

a.SetFieldValue("CCStage Indicator", "3");

a.WriteRecord();

}

a = null;

}

Application-> Siebel Financial Services / Applet->MLIPCG FINS All Service Request For Contact Center
Business Component-> Service Request / New Checks -> NewChecks_Click

function NewChecks_Click ()

{

var SRBusComp = TheApplication().ActiveBusComp();

SRBusComp.NewRecord(NewAfter);

SRBusComp.SetFieldValue("SR Type", "Checks");

SRBusComp.WriteRecord();

SRBusComp = null;

this.Drilldown("SR #");

}

Business Component-> Service Request / New JE -> NewJE_Click

function NewJE_Click ()

{

var SRBusComp = TheApplication().ActiveBusComp();

SRBusComp.NewRecord(NewAfter);

SRBusComp.SetFieldValue("SR Type", "JE");

SRBusComp.WriteRecord();

SRBusComp = null;

this.Drilldown("SR #");

}

Business Component-> Service Request / New Other -> NewOther_Click

function NewOther_Click ()

{

var isRecord;

var SRBusComp = TheApplication().ActiveBusComp();

SRBusComp.ClearToQuery();

SRBusComp.SetSearchSpec("SR Type", "3270");

SRBusComp.ExecuteQuery();

isRecord = SRBusComp.FirstRecord();

if (isRecord)

{

do

{

SRBusComp.DeleteRecord();

isRecord = SRBusComp.FirstRecord();

}

while (isRecord)

}

SRBusComp.FirstRecord()

SRBusComp.NewRecord(NewAfter);

SRBusComp.SetFieldValue("SR Type","3270");

SRBusComp.WriteRecord();

SRBusComp = null;

this.Drilldown("SR #");

}

Business Component-> Contact / General->declartaions

var gsoldvalue;

//------

// Following Variables and Function are defined to enable Audit Trails on this BC

// as well as enabling proper synchronization to Outlook

//

// Don White

//

// Original Code: 3/13/01

//

//------

var mstrAuditTrail;//String that holds the audit trail message

var gstrCreateAction;//Flag to signal creation of Audit Trail Record in Action BC

var gstrCONChangesPending; //Flag signifying if there are any changes

//pending for the current record

var gstrPHONEChangesPending;//Flag signifying Changes to Phone MVG

var gstrFAXChangesPending;//Flag signifying Changes to FAX MVG

var gstrProfileComplete;

var gstrProfileChangeFlag;

Business Component-> Contact / General->CheckProfile

function CheckProfile()

{

//This Functionality could possibly be better completed using WorkFlow

// Babu Mauze and Don White 3/29/01

// Code Currently In Progress!!