Scribd
Upload
8 views

Organization Validation

Uploaded by

niyaz99
Copyright
© © All Rights Reserved
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
8 views

Organization Validation

Uploaded by

niyaz99
Copyright
© © All Rights Reserved
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
You are on page 1/ 4

/*

* Formula Name : GNB_GL_ORGANIZATION_VALIDATION


* Formula Type : Time Entry Rules
* Description : The formula validates whether the GNB_GL_ORGANIZATION is
00001 or blank. If GNB_GL_ORGANIZATION is 00001 or blank, then the error message is
appeared.
*
* Change History
* --------------
* Who Version Date Description
* ----------- ------ ---------- ---------------
* Kalyan Mallick 1.0 07-NOV-24 Created
***************************************************************************/

DEFAULT FOR HWM_CTXARY_RECORD_POSITIONS is EMPTY_TEXT_NUMBER


DEFAULT FOR HWM_CTXARY_HWM_MEASURE_DAY is EMPTY_NUMBER_NUMBER
DEFAULT FOR PayrollTimeType is EMPTY_TEXT_NUMBER
DEFAULT FOR AbsenceType is EMPTY_NUMBER_NUMBER
DEFAULT FOR measure is EMPTY_NUMBER_NUMBER
DEFAULT FOR StartTime is EMPTY_DATE_NUMBER
DEFAULT FOR SubresourceId is EMPTY_NUMBER_NUMBER
DEFAULT FOR HWM_PER_ASG_PERSON_ID is 0
DEFAULT FOR GD_GNB_GL_ORGANIZATION_CHAR is EMPTY_TEXT_NUMBER
DEFAULT FOR PYR_GNB_GL_ORGANIZATION is EMPTY_TEXT_NUMBER

INPUTS ARE
HWM_CTXARY_RECORD_POSITIONS,
HWM_CTXARY_HWM_MEASURE_DAY,
PayrollTimeType,
AbsenceType,
measure,
StartTime,
SubresourceId,
GD_GNB_GL_ORGANIZATION_CHAR,
PYR_GNB_GL_ORGANIZATION

/* Following 2 lines are required right after inputs for all OTL and HWM formulas
*/
ffs_id = GET_CONTEXT(HWM_FFS_ID, 0)
rule_id = GET_CONTEXT(HWM_RULE_ID, 0)
ffName = 'GNB_SHORT_TERM_ACTING_PAY' || ' - v115.1125 '
rLog = add_rlog (ffs_id, rule_id, '>>> Enter - ' || ffName )

/* ----------- constant values -------- */


/* ------------------------------------- */
NullDate = '01-JAN-1900'(DATE)
NullDateTime = '1900/01/01 00:00:00' (date)
NullText = '**FF_NULL**'

RecPositoinEoPeriod = 'END_PERIOD'
RecPositoinEoDay = 'END_DAY'
RecPositoinDetail = 'DETAIL'

sumLvlTimeCard = 'TIMECARD'
sumLvlDay = 'DAY'
sumLvlDetail = 'DETAIL'

TimeRecordType_MEASURE = 'MEASURE'
TimeRecordType_RANGE = 'RANGE'
/* ----------- Context value -------- */
/* ------------------------------------ */
measure_period = GET_CONTEXT(HWM_MEASURE_PERIOD, 0)

/* ----------- Rule Header parameters -------- */


/* -------------------------------------------- */
hSumLvl= Get_Hdr_Text(rule_id, 'RUN_SUMMATION_LEVEL', 'TIMECARD')
hExecType = Get_Hdr_Text(rule_id,'RULE_EXEC_TYPE', 'CREATE')

hCreateYn = 'N'
if (upper(hExecType) = 'CREATE' ) then (
hCreateYn = 'Y'
)

l_status = add_rlog (ffs_id , rule_id ,'Rule Header and Context:' ||


' , ffs_id =' || TO_CHAR( ffs_id ) ||
' , rule_id =' || TO_CHAR( rule_id ) ||
' , measure_period=' || TO_CHAR( measure_period )
||
' , hSumLvl=' || hSumLvl ||
' , hExecType=' || hExecType ||
' , hCreateYn=' || hCreateYn )

/* ----------- Rule input parameters -------- */


/* ------------------------------------------- */
pCategoryId = get_rvalue_number (rule_id ,'WORKED_TIME_CONDITION', 0)
pMaxHrs = get_rvalue_number (rule_id ,'DAILY_LIMIT', 0)

l_status = add_rlog (ffs_id , rule_id , 'Rule Parameters: ' ||


' , pMaxHrs=' || TO_CHAR( pMaxHrs ) ||
' , pCategoryId =' || TO_CHAR( pCategoryId ) )

/* ----------- initialize output variables -------- */


/* ------------------------------------------------- */

MEASURE_ACT = EMPTY_NUMBER_NUMBER
MEASURE_REG_OFF = EMPTY_NUMBER_NUMBER
OUT_ASSIGNMENT_ID_ACT = EMPTY_TEXT_NUMBER
OUT_ASSIGNMENT_ID_REG = EMPTY_TEXT_NUMBER

/* ----------- Temp Workarea variables -------- */


/* --------------------------------------------- */
wMaAry = HWM_CTXARY_RECORD_POSITIONS.count
rLog = add_rlog (ffs_id, rule_id, 'Start bulk process - wMaAry=' ||
TO_CHAR( wMaAry ) )
wkTotalHrsDay = 0
wkTotalHrsTc = 0
nidx = 0

/* ----------- Loop through current Time Card(POJO) Main Logic -------- */


/* -------------------------------------------------------------------- */
WHILE (nidx < wMaAry ) LOOP
(
nidx = nidx + 1
tcMeasure = 0
tcMeasureDay = 0
tcRecPosition = NullText
tcPayrolltimetype = NullText
tcAbsenceType = -1
tcStartTime = nullDate
tcSubresourceId = 0
tcSubresourceId_Reg = 0
tcGD_GNB_GL_ORGANIZATION_CHAR = NullText

l_person_id = HWM_PER_ASG_PERSON_ID
tcRecPosition = HWM_CTXARY_RECORD_POSITIONS[nidx]
l_timecard_start_date = GET_CONTEXT(HWM_CTX_SEARCH_START_DATE, NullDate)
l_timecard_end_date = GET_CONTEXT(HWM_CTX_SEARCH_END_DATE, NullDate)

if (MEASURE.exists(nidx) ) then ( tcMeasure = MEASURE[nidx] )


if (HWM_CTXARY_HWM_MEASURE_DAY.exists(nidx) ) then ( tcMeasureDay =
HWM_CTXARY_HWM_MEASURE_DAY[nidx] )
if (PAYROLLTIMETYPE.exists(nidx)) then (tcPayrolltimetype =
PAYROLLTIMETYPE[nidx])
if (ABSENCETYPE.exists(nidx)) then (tcAbsenceType = ABSENCETYPE[nidx])
if (StartTime.exists(nidx)) then (tcStartTime = StartTime[nidx])
if (SubresourceId.exists(nidx)) then (tcSubresourceId = SubresourceId[nidx])
if (1 = 1) then (tcGD_GNB_GL_ORGANIZATION_CHAR =
GD_GNB_GL_ORGANIZATION_CHAR[nidx])

/*tcGD_GNB_GL_ORGANIZATION_CHAR = GD_GNB_GL_ORGANIZATION_CHAR*/
VALID = 'Y'
IF length(tcGD_GNB_GL_ORGANIZATION_CHAR) >=1 THEN
tcGD_GNB_GL_ORGANIZATION_CHAR = tcGD_GNB_GL_ORGANIZATION_CHAR
ELSE tcGD_GNB_GL_ORGANIZATION_CHAR = '00000'
VALID = 'Y'
rLog = add_rlog (ffs_id, rule_id, 'Tc_Inputs #: ' || TO_CHAR( nidx ) ||
'; measure=' ||
TO_CHAR( tcMeasure ) ||
'; measureDay=' ||
TO_CHAR( tcMeasureDay ) ||
'; payrolltimetype=' ||
tcPayrolltimetype ||
'; AbsenceType=' ||
TO_CHAR(tcAbsenceType) ||
'; StartTime=' ||
TO_CHAR(tcStartTime) ||
'; tcSubresourceId=' ||
TO_CHAR(tcSubresourceId) ||
'; l_person_id=' ||
TO_CHAR(l_person_id)||
'; tcSubresourceId_Reg=' ||
TO_CHAR(tcSubresourceId_Reg) ||
'; tcGD_GNB_GL_ORGANIZATION_CHAR='
|| tcGD_GNB_GL_ORGANIZATION_CHAR)

If (tcGD_GNB_GL_ORGANIZATION_CHAR = '00001' or tcGD_GNB_GL_ORGANIZATION_CHAR


= '00000') Then
(
VALID = 'N'
OUT_MSG = 'GNB_GL_ORGANIZATION_ERROR_FF'
)
)

rLog = add_rlog (ffs_id, rule_id, '<< Exit - ' || ffName )

RETURN OUT_MSG

You might also like