Figure 3   Request.asp Snippet


 •••
 mscsOrderform.JobID= JobID
 mscsOrderform.JobRequisitionNumber= JobRequisitionNumber
 mscsOrderform.JobDepartment= JobDepartment
 mscsOrderform.JobTitle= JobTitle
 mscsOrderform.JobHiringManager= JobHiringManager
 mscsOrderform.JobManagerEmail= JobManagerEmail
 mscsOrderform.JobGrade= JobGrade
 mscsOrderform.JobType= JobType
 mscsOrderform.JobStatus= JobStatus
 mscsOrderform.JobSplashImage= JobSplashImage
 mscsOrderform.JobNeededDateMonth= JobNeededDateMonth
 mscsOrderform.JobNeededDateDay= JobNeededDateDay
 mscsOrderform.JobNeededDateYear= JobNeededDateYear
 mscsOrderform.JobNeededDate=JobNeededDateMonth & "/" & JobNeededDateDay & "/" & _ 
 JobNeededDateYear
 mscsOrderform.JobNumberOpen= JobNumberOpen
 •••

Figure 5   MSCSExecute


 Option Explicit
 function MSCSExecute(config, orderform, context, flags)
 Dim iRet
 Dim mm
     Select case orderform.Action
 '        "Send FORWARD To HR Manager"
         case mm.GetMessage("BUT_STAGE1_TO_2")
             Call CheckError (orderform, context)
             Call CheckHiringInfo(orderform, context)
             Call CheckManagerInfo(orderform, context)
 '        "Re-send FORWARD To HR Manager"
         case mm.GetMessage("BUT_STAGE1_TO_2B")
             Call CheckError (orderform, context)
             Call CheckHiringInfo(orderform, context)
             Call CheckManagerInfo(orderform, context)
 '        "Send BACK to Hiring Manger with note"
         case mm.GetMessage("BUT_STAGE2_TO_1")
             Call CheckError (orderform, context)
             Call CheckForWorkFlowNote2(orderform, context)
 '        "Send FORWARD to HR Recruiter (Approved)"
         case mm.GetMessage("BUT_STAGE2_TO_3")
             Call CheckError (orderform, context)
             Call CheckForHRRecruiterInfo(orderform, context)
 '        "Send FORWARD to Webmaster (Approved)"
         case mm.GetMessage("BUT_STAGE3_TO_4")
             Call CheckError (orderform, context)
             Call CheckForWebMaster(orderform, context)
 '        "Send BACK To HR Manager with note"
         case mm.GetMessage("BUT_STAGE3_TO_2")
             Call CheckError (orderform, context)
             Call CheckForWorkFlowNote3(orderform, context)
 '        "Send BACK To HR Recruiter with note"
         case mm.GetMessage("BUT_STAGE4_TO_3")
             Call CheckError (orderform, context)
             Call CheckForWorkFlowNote4(orderform, context)
 '        "Send FORWARD to Website (Approved)"  
         case mm.GetMessage("BUT_STAGE4_TO_4")
             Call CheckError (orderform, context)
             Call CheckForWebMaster1(orderform, context)
 '        "Update Application Status"        
         case mm.GetMessage("BUT_STAGE4_TO_4B")
             Call CheckError (orderform, context)
             Call CheckForWebMaster1(orderform, context)
     End select
     If context.FormErrors.count > 0 then
         mscsexecute=3
     else
         mscsexecute=1
     end if
 end function