CalculateActivationDate

Employee Setup Functions

Minor Business Rule

Object Name: N0800129

Parent DLL: CHRM

Location: Client/Server

Language: NER

1.Functional Description
Calculate Activation Date

1.1Purpose

1.2Setup Notes and Prerequisites

1.3Special Logic

2.Technical Specifications

2.1Parameters: D0800129A
Data Item Data Structure DescriptionI/ORequiredNotes
ESIDmnEmployeeSetupIDI
TSKCDmnTaskCodeI
DATE01jdActivationDateO
DATE02jdCurrentDateO
EV01cActivateNowO
DATE01jdCompletionDateO
MATH01mnErrorCodeO
AN8mnAddressNumberI
CRTNjdDateCreatedI
EFTOjdDateStartI
ARVDTjdArrivalDateI
COSmnCompletionOffsetDaysI
DURmnDurationI
BODcBasedOnDateowI

2.22.2Related Tables
Table Table Description

2.3Related Business Functions
Source NameFunction Name

Processing :

If BF mnAddressNumber Or BF cBaseOnDateow is not supplied

Read F08710 to get Address Number and the location fields necessary to call Get F087103 Record
Call N0800129 - Get F087103 Record to get the Based On Date field.
If error occurs set mnErrorCode

End If

If No errors occured

If the Base On Date from F087103 = "S"

// *** Get Start Date From F060116 ***
// ** returns 1 if a record is not found **

If DateStart was not passed in Call Get Employee Setup Info (F060116Z) - N0800129

If mnErrorCode =  And the date pointed to by Base On Date >
//*** Calculate Completion Date ***
       Set jdCompletionDate = data pointed to by Base On Date
If F087103.CompletionOffsetDays is greater than
Add CompletionOffsetDays to  jdCompletionDate
       End If

//*** Calculate Activation Date ***
       If F087103.mnDuration is greater than
Set jdActivationDate =  jdCompletionDate +
       Else
         Set jdActivationDate = BF jdCompletionDate + (F087103.mnDuration * -1)
       End If

//*** Determine if the Activation Date has arrived ***

     Set jdCurrentDate = date_today( )  /* Return Value */
       If  jdCurrentDate is greater than or equal to  jdActivationDate
         cActivateNow = "1"
       Else
        cActivateNow = "0"
      End If
End If

^

Data Structure

D0800129A - Calculate Activation Date

Parameter Name	Data Item	Data Type	Req/Opt	I/O/Both
mnEmployeeSetupID	ESID	MATH_NUMERIC	REQ	INPUT
A code that represents the unique identifier for an employee setup record.
mnTaskCode	TSKCD	MATH_NUMERIC	REQ	INPUT
A number that uniquely identifies the task. The system generates this number using next numbers.
jdActivationDate	DATE01	JDEDATE	OPT	OUTPUT
Event point for JDE Date.
jdCurrentDate	DATE02	JDEDATE	OPT	OUTPUT
Event point for JDE Date.
cActivateNow	EV01	char	OPT	OUTPUT
An option that specifies the type of processing for an event.
jdCompletionDate	DATE01	JDEDATE	OPT	NONE
Event point for JDE Date.
mnErrorCode	MATH01	MATH_NUMERIC	OPT	NONE
- - - Good Performance Low Value.
jdDateCreated9	CRTN	JDEDATE	OPT	NONE
The date that the Employee Setup record was created. If the Activation Date field contains a C, the system uses this date to calculate the start and completion dates for the setup task.
jdDateStart	EFTO	JDEDATE	OPT	NONE
A future date when all changes will take effect or the date when the changes went into effect. If you do not enter a date in this field, the system uses the current date as the effective date.
jdArrivalDate	ARVDT	JDEDATE	OPT	NONE
The date the employee arrives at the employee's desk. Setup tasks for the employee setup can be based on this date or based on the start date contained in the Employee Master table.
mnDuration	DUR	MATH_NUMERIC	OPT	NONE
A value that specifies how long the setup task will take. The system also uses this value to calculate the task start date.
mnCompletionOffsetDays	COS	MATH_NUMERIC	OPT	NONE
The date that the setup task must be completed. The system uses this date as an offset to the date referenced by the task control date. This date might be the date that the setup task was processed, the date that the setup task was created, the employee start date, or the date that the employee arrives.
cBaseOnDateow	BOD	char	OPT	NONE
A user defined code (08/BO) that will specify which date you use to calculate the completion date of the setup task.
mnAddressNumber	AN8	MATH_NUMERIC	OPT	NONE
A number that identifies an entry in the Address Book system, such as employee, applicant, participant, customer, supplier, tenant, or location.

Related Functions

None

Related Tables

None

CancelEmployeeSetupProcess

Employee Setup Functions

Minor Business Rule

Object Name: N0800129

Parent DLL: CHRM

Location: Client/Server

Language: NER

Functional Description
Cancel Employee Setup Process

1.1Purpose

1.2Setup Notes and Prerequisites

1.3Special Logic

2.Technical Specifications

2.1Parameters:  D0800129G
Data Item Data Structure DescriptionI/ORequiredNotes
ESIDmnEmployeeSetupIDI
TSKCDmnTaskCodeI
MATH01mnErrorCodeO
SUSTSszEESetupStatusI
VERSszEESetupVersionI

2.2Related Tables
Table Table Description

2.3Related Business Functions
Source NameFunction Name

Processing:

Read the F08710 record matching the EmployeeSetupID input parameter
If the record was read successfully
   If the F08710 record is in Pending status  Or a numeric status /* Completed/Cancelled etc. */
      // *** Setup process has not been initiated or has completed ***//
       Return an error
   Else
      // ********************************************************************
      // ** Individual Tasks will be cancelled when the workflow process for the task
      // ** resumes and checks the status of the F08710 record.
      // ********************************************************************
       Update the F08710 record to the status passed in in the szEESetupStatus Parameter
//** the value of szEESetupStatus will be the value in the Ending Status processing options.**//
End If
Else
Return an error
End If

^

Data Structure

D0800129G - Start Employee Setup Tasks

Parameter Name	Data Item	Data Type	Req/Opt	I/O/Both
mnEmployeeSetupID	ESID	MATH_NUMERIC	OPT	NONE
A code that represents the unique identifier for an employee setup record.
mnErrorCode	MATH01	MATH_NUMERIC	OPT	NONE
- - - Good Performance Low Value.
mnTaskCode	TSKCD	MATH_NUMERIC	OPT	NONE
A number that uniquely identifies the task. The system generates this number using next numbers.
szEESetupStatus	SUSTS	char	OPT	NONE
A code that represents the status of the entire setup process. Changing the setup status triggers the specific event associated with the status.
szEESetupVersion	VERS	char	OPT	NONE
A user-defined set of specifications that control how applications and reports run. You use versions to group and save a set of user-defined processing option values and data selection and sequencing options. Interactive versions are associated with applications (usually as a menu selection). Batch versions are associated with batch jobs or reports. To run a batch process, you must choose a version.
nTasksRead	INT01	integer	OPT	NONE
Number of Days in Future to Query for Responses Due.
TasksStarted	INT01	integer	OPT	NONE
Number of Days in Future to Query for Responses Due.

Related Functions

None

Related Tables

None

CheckForLocationFields

Employee Setup Functions

Minor Business Rule

Object Name: N0800129

Parent DLL: CHRM

Location: Client/Server

Language: NER

Functional Description
Check for Location Fields

1.1Purpose

1.2Setup Notes and Prerequisites

1.3Special Logic

2.Technical Specifications

2.1Parameters: D0800129D
Data Item Data Structure DescriptionI/ORequiredNotes
ESIDmnEmployeeSetupIDI
TSKCDmnTaskCodeI
EV01cReturnCodeO
EV01cReadTableI
L001szLocationCode1I
L002szLocationCode2I
L003szLocationCode3I
L004szLocationCode4I
L005szLocationCode5I
L006szLocationCode6I
L007szLocationCode7I
L008szLocationCode8I
L009szLocationCode9I
L010szLocationCode10I
OFCszOfficeNumberI
CRTNjdDateCreatedI
ARVDTjdArrivalDateI
EFTOjdDateEffectiveOnI
MATH01 mnErrorCodeO

2.2Related Tables
Table Table Description

2.3Related Business Functions
Source NameFunction Name

Processing:

If the input parameter cReadTable is equal to "1"
Read F08710 to retrieve the location fields L001 - L010 and Office Number
also return ArrivalDate & Date Created.

If the read failed return and error.

End If
//
//** V08711A.Fetch Next. V08711A is a joined BSVW of F08711 and F087102. **
If the input parameter mnTaskCode is greater than
Select the F08710 record that matches the mnTaskCode using V08711A.
Else
Select the F08710 record that matches the mnTaskCode using V08711A.
End If

Fetch F08711.TaskCode and F087102.RequiredFields from V08711A.
//
While the Fetch was success full

If F087102.RequiredFields is equal to "1" And F08710.szLocationCode1 is less than or equal to

Set cReturnCode = "1" and quit.
Endif

If F087102.RequiredFields is equal to "2" And F08710.szLocationCode2 is less than or equal to

Set cReturnCode = "2" and quit.
Endif
.
.
.

If F087102.RequiredFields is equal to "9" And F08710.szLocationCode9 is less than or equal to

            Set cReturnCode = "9" and quit.
Endif

Fetch the next V08711A record.
End While
   //
//
If no errors have occurred and cReturnCode is equal to   /*the required location fields have been enterd*/
Call N0800128 - Get F087103 Record  to get the Base On Date field.
If F087103.BaseOnDate is equal to "S"
If jdDateEffectiveOn is less than or equal to
          Call N0800129 - Get Employee Setup Info (F060116Z) to get the Date Started.

End If

If F060116.jdDateEffectiveOn is less than or equal to
Set cReturnCode = "S" and return
End If

Endif

If F087103.BaseOnDate is equal to "A" And F08710.jdArrivalDate is less than or equal to
Set cReturnCode = "A" and return
End If

If F087103.BaseOnDate is equal to "C" And f08710.jdDateCreated9 is less than or equal to
Set cReturnCode = "C" and return
End If

//

If F08710.szOfficeNumber is less than or equal to
Set cReturnCode = "O" and return
Endif

End If
^

Data Structure

D0800129D - Check For Location Information

Parameter Name	Data Item	Data Type	Req/Opt	I/O/Both
mnEmployeeSetupID	ESID	MATH_NUMERIC	REQ	INPUT
A code that represents the unique identifier for an employee setup record.
mnTaskCode	TSKCD	MATH_NUMERIC	OPT	INPUT
A number that uniquely identifies the task. The system generates this number using next numbers.
cReturnCode	EV01	char	OPT	OUTPUT
An option that specifies the type of processing for an event.
cReadTable	EV01	char	REQ	NONE
An option that specifies the type of processing for an event.
szLocationCode1	L001	char	OPT	NONE
A user defined category code that defines the location of an employee. You set up this code to meet the needs of your organization. For example, you can set up a category code to represent country, city, state, campus, building,office, or other location. The Human Resources system provides this code to allow you to define a custom setup process for new employees based on the location where the employee will work.
szLocationCode2	L002	char	OPT	NONE
A user defined category code that defines the location of an employee. You set up this code to meet the needs of your organization. For example, you can set up a category code to represent country, city, state, campus, building,office, or other location. The Human Resources system provides this code to allow you to define a custom setup process for new employees based on the location where the employee will work.
szLocationCode3	L003	char	OPT	NONE
A user defined category code that defines the location of an employee. You set up this code to meet the needs of your organization. For example, you can set up a category code to represent country, city, state, campus, building,office, or other location. The Human Resources system provides this code to allow you to define a custom setup process for new employees based on the location where the employee will work.
szLocationCode4	L004	char	OPT	NONE
A user defined category code that defines the location of an employee. You set up this code to meet the needs of your organization. For example, you can set up a category code to represent country, city, state, campus, building,office, or other location. The Human Resources system provides this code to allow you to define a custom setup process for new employees based on the location where the employee will work.
szLocationCode5	L005	char	OPT	NONE
A user defined category code that defines the location of an employee. You set up this code to meet the needs of your organization. For example, you can set up a category code to represent country, city, state, campus, building,office, or other location. The Human Resources system provides this code to allow you to define a custom setup process for new employees based on the location where the employee will work.
szLocationCode6	L006	char	OPT	NONE
A user defined category code (08/L6) that defines the location of an employee. You set up this code to meet the needs of your organization. For example, you can set up a category code to represent country, city, state, campus,building, office, or other location. The Human Resources system provides this code to allow you to define a custom setup process for new employees based on the location where the employee will work.
szLocationCode7	L007	char	OPT	NONE
A user defined category code that defines the location of an employee. You set up this code to meet the needs of your organization. For example, you can set up a category code to represent country, city, state, campus, building,office, or other location. The Human Resources system provides this code to allow you to define a custom setup process for new employees based on the location where the employee will work.
szLocationCode8	L008	char	OPT	NONE
A user defined category code that defines the location of an employee. You set up this code to meet the needs of your organization. For example, you can set up a category code to represent country, city, state, campus, building,office, or other location. The Human Resources system provides this code to allow you to define a custom setup process for new employees based on the location where the employee will work.
szLocationCode99	L009	char	OPT	NONE
A user defined category code that defines the location of an employee. You set up this code to meet the needs of your organization. For example, you can set up a category code to represent country, city, state, campus, building,office, or other location. The Human Resources system provides this code to allow you to define a custom setup process for new employees based on the location where the employee will work.
szLocationCode10	L010	char	OPT	NONE
A user defined category code that defines the location of an employee. You set up this code to meet the needs of your organization. For example, you can set up a category code to represent country, city, state, campus, building,office, or other location. The Human Resources system provides this code to allow you to define a custom setup process for new employees based on the location where the employee will work.
szOfficeNumber	OFC	char	OPT	NONE
A field that uniquely identifies the physical location where an employee works. The system does not verify this information. You can enter any alphanumeric string.
jdDateCreated9	CRTN	JDEDATE	OPT	NONE
The date that the Employee Setup record was created. If the Activation Date field contains a C, the system uses this date to calculate the start and completion dates for the setup task.
jdArrivalDate	ARVDT	JDEDATE	OPT	NONE
The date the employee arrives at the employee's desk. Setup tasks for the employee setup can be based on this date or based on the start date contained in the Employee Master table.
jdDateEffectiveOn	EFTO	JDEDATE	OPT	NONE
A future date when all changes will take effect or the date when the changes went into effect. If you do not enter a date in this field, the system uses the current date as the effective date.
mnErrorCode	MATH01	MATH_NUMERIC	OPT	NONE
- - - Good Performance Low Value.
mnRequiredLocationFields	RQL	MATH_NUMERIC	OPT	NONE
A value that represents the number of location category codes you need to know to accomplish the current setup task. For example, to install a telephone you might need to know the first four location codes (state, city, building, and office number). To set up a computer account, you might need to know only the first two location codes (state and city).

Related Functions

None

Related Tables

None

GetEmployeeSetupInfo

Employee Setup Functions

Minor Business Rule

Object Name: N0800129

Parent DLL: CHRM

Location: Client/Server

Language: NER

Functional Description
Get Employee Setup Info

1.1Purpose

1.2Setup Notes and Prerequisites

1.3Special Logic

2.Technical Specifications

2.1Parameters:  D0800129C
Data Item Data Structure DescriptionI/ORequiredNotes
AN8mnAddressNumberI
ANPAmnSupervisorO
JBCDszJobCategoryO
JBSTszJobStepO
DSTjdDateEmployeeStartO
HMCUszCostCenterHomeO
SALmnRtSalaryO
PHRTmnRtHourlyO
MATH01mnErrorCodeO
DTI1szFileNameO
PH1szEmployeePhoneNumberO
ALPHszSupervisorNameO
ALPHszEmployeeNameO
HMCOszCompanyHomeO

2.2Related Tables
Table Table Description

2.3Related Business Functions
Source NameFunction Name

Processing:

Read F060116 using V060116AQ. Return the following fields
Address Number, Name - Alpha, Company - Home, Business Unit - Home, Job Type (Craft) Code,
Job Step, Data Item - Secondary, Supervisor
Set szFileName = "F060116Z"

If the record does not exist
Read F060116Z using V060116ZF Return the following fields
Address Number, Name - Alpha, Company - Home, Business Unit - Home, Job Type (Craft) Code,
Job Step, Data Item - Secondary, Supervisor
Set szFileName = "F060116Z"
Endif
If the record does not exist
Read F0101 returning:
Address Number, Name - Alpha, Business Unit,
Set szFileName = "F0101"
Endif
If the record does not exist
Set the mnErrorCode
Endif
If there were no errors
If the BF szEmployeeName is less than or equal to
Read F0101 to fetch the name from the Address Book table
End If
   If BF mnSupervisor is greater than
       Read F0101 to get the supervisor's name.
End If
   If BF szEmployeePhoneNumber is less than or equal to
       Call F0115 Get Phone Number to get the phone number
End If
   If BF szCompanyHome is less than or equal to  And BF szCostCenterHome is greater than
       Read F0006 to retrieve home company
End If
End If

^

Data Structure

D0800129C - Get Employee Setup Info

Parameter Name	Data Item	Data Type	Req/Opt	I/O/Both
mnAddressNumber	AN8	MATH_NUMERIC	REQ	INPUT
A number that identifies an entry in the Address Book system, such as employee, applicant, participant, customer, supplier, tenant, or location.
mnSupervisor	ANPA	MATH_NUMERIC	OPT	OUTPUT
The address book number of the supervisor.
szJobCategory	JBCD	char	OPT	OUTPUT
A user defined code (07/G) that defines the jobs within your organization. You can associate pay and benefit information with a job type and apply that information to the employees who are linked to that job type.
szJobStep	JBST	char	OPT	OUTPUT
A user defined code (07/GS) that designates a specific level within a particular job type. The system uses this code in conjunction with job type to determine pay rates by job in the Pay Rates table.
jdDateEmploymentStart	DST	JDEDATE	OPT	OUTPUT
The date on which the employee actually reported to work for the most recent period of hire. When an employee initially begins working, the default is the original hire date. If no original hire date exists, the system uses the current date. This field can be updated multiple times if, for example, an employee is a seasonal worker. For the calculation tables in the Payroll system and the eligibility tables and date codes in the Human Resources system, the system also uses this date as a start date when it calculates deductions, benefits, and accruals.
mnRtSalary	SAL	MATH_NUMERIC	OPT	OUTPUT
The amount that an employee is paid in one year, assuming that the employee is paid every pay period of the year. For WorldSoftware: For the employee's primary job, the system stores the annual salary in the Employee Master Information table (F060116) and the Employee Jobs table (F060118). For secondary jobs, the system stores the annual salary only in the Employee Jobs table (F060118). Depending on how the value that is entered in the Display Salary (Annual/Effective) field in the HR History Constants table (F08040), this field displays one of the following: o Annual salary. For salaried employees who are not linked with a contract calendar, the user enters the amount or the system retrieves the amount from the Pay Grade/Salary Range Table (F082001). For employees who are linked with a contract calendar, the system calculates this amount using the following formula: (((current salary minus salary paid before change) divided by number of periods to pay) multiplied by pay frequency). o Effective salary. For employees whose jobs are linked with a contract calendar, the system recalculates the effective salary when you enter a mid-calendar salary adjustment. After you enter a mid-calendar adjustment, the effective salary equals the salary that is paid to the employee from the time of the adjustment through the end of the contract. The system calculates this amount using the following formula: ((annual salary divided by pay frequency) times periods to pay).
mnRtHourly	PHRT	MATH_NUMERIC	OPT	OUTPUT
The employee's hourly rate, which is retrieved during time entry. If you enter a rate in this field on any other form, that rate can override the value in the Employee Master table. In the Employee Master table, this number is the employee's base hourly rate. In the Union Rates table, it is the straight time rate. NOTE: If you change the number of the data display decimal digits for this field, you must also change fields Rate - Base Hourly (BHRT) and Rate - Hourly (SHRT) so that they have exactly the same number of data display decimal digits.
mnErrorCode	MATH01	MATH_NUMERIC	OPT	OUTPUT
- - - Good Performance Low Value.
szFileName	DTI1	char	OPT	NONE
The generic data item name. In driver calculations, the Data Item 1 field refers to the values that the system loads into the cost object fields.
szCompanyHome	HMCO	char	OPT	NONE
The company number where the employee records generally reside.
szCostCenterHome	HMCU	char	OPT	NONE
The number of the business unit in which the employee generally resides.
szEmployeeName	ALPH	char	OPT	NONE
The text that names or describes an address. This 40-character alphabetic field appears on a number of forms and reports. You can enter dashes, commas, and other special characters, but the system cannot search on them when you use this field to search for a name.
szSupervisorName	ALPH	char	OPT	NONE
The text that names or describes an address. This 40-character alphabetic field appears on a number of forms and reports. You can enter dashes, commas, and other special characters, but the system cannot search on them when you use this field to search for a name.
szEmployeePhoneNumber	PH1	char	OPT	NONE
A number without the prefix or special characters, such as hyphens or periods, that makes up the telephone number for an entity. You can use any applicable telephone number format for a country. This field is used in conjunction with the Prefix field (AR1), where you enter the first segment of the telephone number, which is called the area code in the United States. When you search for an address using a phone number, you must enter the number exactly as it is set up in the Address Book system, including any special characters.

Related Functions

None

Related Tables

None

IncrementNumber

Employee Setup Functions

Minor Business Rule

Object Name: N0800129

Parent DLL: CHRM

Location: Client/Server

Language: NER

Data Structure

D0800129B - Increment Number

Parameter Name	Data Item	Data Type	Req/Opt	I/O/Both
mnMathNumeric01	MATH01	MATH_NUMERIC	OPT	BOTH
- - - Good Performance Low Value.
nInteger01	INT01	integer	OPT	BOTH
Number of Days in Future to Query for Responses Due.
szString	DL01	char	OPT	BOTH
A user defined name or remark.
cDateType_NIS	EV01	char	OPT	INPUT
An option that specifies the type of processing for an event.
mnIncrementAmount	MATH01	MATH_NUMERIC	OPT	INPUT
- - - Good Performance Low Value.
mnErrorCode	MATH01	MATH_NUMERIC	OPT	OUTPUT
- - - Good Performance Low Value.

Related Functions

None

Related Tables

None

StartSetupTasks

Employee Setup Functions

Minor Business Rule

Object Name: N0800129

Parent DLL: CHRM

Location: Client/Server

Language: NER

Functional Description
Start Setup Tasks

1.1Purpose

1.2Setup Notes and Prerequisites

/* The value of szEESetupStatus will be Active or Waiting if the process requires an appoval. */

End If

//*Save the following in temp variables to be passed to workflow *//

VA evt_TaskStatusW_TSKSTS = "W"
VA evt_TaskStatusWI_TSKSTS = "WI"
VA evt_TaskStatusWA_TSKSTS = "WA"
VA evt_TaskStatus_A = "A"
VA evt_TaskStatus_P = "P"

If the BF mnTaskCode is greater than
         Select the F08711 record matching the mnTaskCode And in Pending Status.
Use V08711A (F08711/F087102 join)
              Else
Select the F08711 records in Pending Status.
Use V08711A (F08711/F087102 join)
       End If
       Fetch the first V08711A record. Retrieve the following fields:

Employee Setup Task Code,, Task Status, Task Type

While SV File_IO_Status is equal to CO SUCCESS

If VA evt_TaskStatus_TSKSTS is equal to VA evt_TaskStatus_P
Call Start Process(EESUTSK01, , )
End If

Read the next V08711A record

End While
//
Else
// ** Process has been cancelled or is already complete **
Return BF mnErrorCode = "2"
End If
Else
// ** Setup Process not found **
BF mnErrorCode = "1"
End If

Data Structure

D0800129G - Start Employee Setup Tasks

Parameter Name	Data Item	Data Type	Req/Opt	I/O/Both
mnEmployeeSetupID	ESID	MATH_NUMERIC	OPT	NONE
A code that represents the unique identifier for an employee setup record.
mnErrorCode	MATH01	MATH_NUMERIC	OPT	NONE
- - - Good Performance Low Value.
mnTaskCode	TSKCD	MATH_NUMERIC	OPT	NONE
A number that uniquely identifies the task. The system generates this number using next numbers.
szEESetupStatus	SUSTS	char	OPT	NONE
A code that represents the status of the entire setup process. Changing the setup status triggers the specific event associated with the status.
szEESetupVersion	VERS	char	OPT	NONE
A user-defined set of specifications that control how applications and reports run. You use versions to group and save a set of user-defined processing option values and data selection and sequencing options. Interactive versions are associated with applications (usually as a menu selection). Batch versions are associated with batch jobs or reports. To run a batch process, you must choose a version.
nTasksRead	INT01	integer	OPT	NONE
Number of Days in Future to Query for Responses Due.
TasksStarted	INT01	integer	OPT	NONE
Number of Days in Future to Query for Responses Due.

Related Functions

None

Related Tables

None

an;font-size:10pt">If jdDateEffectiveOn is less than or equal to
Call N0800129 - Get Employee Setup Info (F060116Z) to get the Date Started.

End If

If F060116.jdDateEffectiveOn is less than or equal to
Set cReturnCode = "S" and return
End If

Endif

If F087103.BaseOnDate is equal to "A" And F08710.jdArrivalDate is less than or equal to
Set cReturnC