DBA Data[Home] [Help]

APPS.PAY_GB_FPS_NI_AND_OTHERS_13 dependencies on PAY_GB_BACS_FPS

Line 2905: ) PAA, PAY_GB_BACS_FPS BACS_FPS

2901: WHERE payroll_action_id = L_PAYROLL_ACTION_ID
2902: )
2903: )
2904: )
2905: ) PAA, PAY_GB_BACS_FPS BACS_FPS
2906: WHERE PAA.PRE_PAYMENT_PAYROLL_ACTION_ID is not null
2907: and PAA.PRE_PAYMENT_PAYROLL_ACTION_ID = BACS_FPS.PRE_PAYMENT_PAYROLL_ACTION_ID
2908: and BACS_FPS.PRE_PAYMENT_ID is null
2909: AND nvl(BACS_FPS.RANDOM_STRING,'no data') <> 'COMP';

Line 2933: FROM PAY_GB_BACS_FPS bacs,

2929: */
2930:
2931: SELECT RANDOM_STRING
2932: INTO L_RANDOM
2933: FROM PAY_GB_BACS_FPS bacs,
2934: pay_assignment_actions paa
2935: WHERE paa.payroll_action_id = L_PAYROLL_ACTION_ID -- CONTEXT (BACS payroll action id)
2936: and paa.ASSIGNMENT_action_id = L_ASSIGNMENT_ACTION_ID -- CONTEXT (BACS ASSIGNMENT action id)
2937: AND paa.pre_payment_id = bacs.pre_payment_id

Line 2957: l_lockname VARCHAR2(25) := 'Lock_PAY_GB_BACS_FPS';

2953: IS
2954:
2955: L_DUMMY NUMBER := 0;
2956: --global variables used for locking;
2957: l_lockname VARCHAR2(25) := 'Lock_PAY_GB_BACS_FPS';
2958: l_lockhandle VARCHAR2(200);
2959: l_result PLS_INTEGER;
2960: p_ltype NUMBER :=6; -- Exclusive lock
2961: p_retval NUMBER;

Line 2964: L_PAY_GB_BACS_FPS PAY_GB_BACS_FPS.PRE_PAYMENT_PAYROLL_ACTION_ID%type;

2960: p_ltype NUMBER :=6; -- Exclusive lock
2961: p_retval NUMBER;
2962: l_count_lock_failures NUMBER :=0;
2963: l_message VARCHAR2(150);
2964: L_PAY_GB_BACS_FPS PAY_GB_BACS_FPS.PRE_PAYMENT_PAYROLL_ACTION_ID%type;
2965: BEGIN
2966: hr_utility.trace(' Inserting Master Record in PAY_GB_BACS_FPS ');
2967: fnd_file.put_line(FND_FILE.LOG,' Master Insert start at '||TO_CHAR(sysdate,'ddmmyyyy hh24:mi:ss'));
2968: --15903040 Begin

Line 2966: hr_utility.trace(' Inserting Master Record in PAY_GB_BACS_FPS ');

2962: l_count_lock_failures NUMBER :=0;
2963: l_message VARCHAR2(150);
2964: L_PAY_GB_BACS_FPS PAY_GB_BACS_FPS.PRE_PAYMENT_PAYROLL_ACTION_ID%type;
2965: BEGIN
2966: hr_utility.trace(' Inserting Master Record in PAY_GB_BACS_FPS ');
2967: fnd_file.put_line(FND_FILE.LOG,' Master Insert start at '||TO_CHAR(sysdate,'ddmmyyyy hh24:mi:ss'));
2968: --15903040 Begin
2969: IF l_lockhandle IS NULL THEN
2970: LOOP

Line 3018: INTO L_PAY_GB_BACS_FPS

3014: END IF;
3015: --The below section (till release lock) will run in single threaded mode eventhough called from multiple threads.
3016: BEGIN
3017: SELECT DISTINCT PRE_PAYMENT_PAYROLL_ACTION_ID
3018: INTO L_PAY_GB_BACS_FPS
3019: FROM PAY_GB_BACS_FPS
3020: WHERE PRE_PAYMENT_PAYROLL_ACTION_ID = P_PAYROLL_ACTION_ID;
3021: hr_utility.trace(' Second check - Data present in PAY_GB_BACS_FPS - No insert happened');
3022: fnd_file.put_line(FND_FILE.LOG,' Second check - Data present in PAY_GB_BACS_FPS - No insert happened at '||TO_CHAR(sysdate,'ddmmyyyy hh24:mi:ss'));

Line 3019: FROM PAY_GB_BACS_FPS

3015: --The below section (till release lock) will run in single threaded mode eventhough called from multiple threads.
3016: BEGIN
3017: SELECT DISTINCT PRE_PAYMENT_PAYROLL_ACTION_ID
3018: INTO L_PAY_GB_BACS_FPS
3019: FROM PAY_GB_BACS_FPS
3020: WHERE PRE_PAYMENT_PAYROLL_ACTION_ID = P_PAYROLL_ACTION_ID;
3021: hr_utility.trace(' Second check - Data present in PAY_GB_BACS_FPS - No insert happened');
3022: fnd_file.put_line(FND_FILE.LOG,' Second check - Data present in PAY_GB_BACS_FPS - No insert happened at '||TO_CHAR(sysdate,'ddmmyyyy hh24:mi:ss'));
3023: EXCEPTION

Line 3021: hr_utility.trace(' Second check - Data present in PAY_GB_BACS_FPS - No insert happened');

3017: SELECT DISTINCT PRE_PAYMENT_PAYROLL_ACTION_ID
3018: INTO L_PAY_GB_BACS_FPS
3019: FROM PAY_GB_BACS_FPS
3020: WHERE PRE_PAYMENT_PAYROLL_ACTION_ID = P_PAYROLL_ACTION_ID;
3021: hr_utility.trace(' Second check - Data present in PAY_GB_BACS_FPS - No insert happened');
3022: fnd_file.put_line(FND_FILE.LOG,' Second check - Data present in PAY_GB_BACS_FPS - No insert happened at '||TO_CHAR(sysdate,'ddmmyyyy hh24:mi:ss'));
3023: EXCEPTION
3024: WHEN no_data_found THEN
3025: INSERT

Line 3022: fnd_file.put_line(FND_FILE.LOG,' Second check - Data present in PAY_GB_BACS_FPS - No insert happened at '||TO_CHAR(sysdate,'ddmmyyyy hh24:mi:ss'));

3018: INTO L_PAY_GB_BACS_FPS
3019: FROM PAY_GB_BACS_FPS
3020: WHERE PRE_PAYMENT_PAYROLL_ACTION_ID = P_PAYROLL_ACTION_ID;
3021: hr_utility.trace(' Second check - Data present in PAY_GB_BACS_FPS - No insert happened');
3022: fnd_file.put_line(FND_FILE.LOG,' Second check - Data present in PAY_GB_BACS_FPS - No insert happened at '||TO_CHAR(sysdate,'ddmmyyyy hh24:mi:ss'));
3023: EXCEPTION
3024: WHEN no_data_found THEN
3025: INSERT
3026: INTO PAY_GB_BACS_FPS

Line 3026: INTO PAY_GB_BACS_FPS

3022: fnd_file.put_line(FND_FILE.LOG,' Second check - Data present in PAY_GB_BACS_FPS - No insert happened at '||TO_CHAR(sysdate,'ddmmyyyy hh24:mi:ss'));
3023: EXCEPTION
3024: WHEN no_data_found THEN
3025: INSERT
3026: INTO PAY_GB_BACS_FPS
3027: (
3028: PRE_PAYMENT_PAYROLL_ACTION_ID,
3029: CREATION_DATE,
3030: TRIGGERED_BY

Line 3077: L_DUMMY PAY_GB_BACS_FPS.PRE_PAYMENT_PAYROLL_ACTION_ID%TYPE;

3073: IS
3074: L_HASH VARCHAR2(64);
3075: L_AMOUNT NUMBER;
3076:
3077: L_DUMMY PAY_GB_BACS_FPS.PRE_PAYMENT_PAYROLL_ACTION_ID%TYPE;
3078: L_COUNT_CHECK NUMBER := 0;
3079: BEGIN
3080: hr_utility.trace(' Entered Fetch hash for FPS - ASSIGNMENT');
3081: --15903040 Begin

Line 3088: FROM PAY_GB_BACS_FPS

3084: --This is needed because the calling program(FPS) runs in multithread where the
3085: --call to fetch the Hash string may be executed before the insert completed.
3086: Begin
3087: SELECT PRE_PAYMENT_PAYROLL_ACTION_ID INTO L_DUMMY
3088: FROM PAY_GB_BACS_FPS
3089: WHERE PRE_PAYMENT_PAYROLL_ACTION_ID = P_PAYROLL_ACTION_ID
3090: AND PRE_PAYMENT_ID is null
3091: AND RANDOM_STRING = 'COMP';
3092: exit;

Line 3112: FROM PAY_GB_BACS_FPS

3108: SELECT HASH,
3109: AMOUNT
3110: INTO L_HASH,
3111: L_AMOUNT
3112: FROM PAY_GB_BACS_FPS
3113: WHERE PRE_PAYMENT_PAYROLL_ACTION_ID = p_PAYROLL_ACTION_ID
3114: AND ASSIGNMENT_ID = p_ASSIGNMENT_ID ;
3115: hr_utility.trace(' Fetched hash for FPS '||L_HASH);
3116: hr_utility.trace(' Fetched amount for FPS '||L_AMOUNT);

Line 3133: L_DUMMY PAY_GB_BACS_FPS.PRE_PAYMENT_PAYROLL_ACTION_ID%TYPE;

3129: L_HASH VARCHAR2(64);
3130:
3131: L_AMOUNT NUMBER;
3132: L_ASG_ID NUMBER;
3133: L_DUMMY PAY_GB_BACS_FPS.PRE_PAYMENT_PAYROLL_ACTION_ID%TYPE;
3134: L_COUNT_CHECK NUMBER := 0;
3135: BEGIN
3136: hr_utility.trace(' Entered Fetch hash for FPS - PERSON');
3137: --15903040 Begin

Line 3144: FROM PAY_GB_BACS_FPS

3140: --This is needed because the calling program(FPS) runs in multithread where the
3141: --call to fetch the Hash string may be executed before the insert completed.
3142: Begin
3143: SELECT PRE_PAYMENT_PAYROLL_ACTION_ID INTO L_DUMMY
3144: FROM PAY_GB_BACS_FPS
3145: WHERE PRE_PAYMENT_PAYROLL_ACTION_ID = P_PAYROLL_ACTION_ID
3146: AND PRE_PAYMENT_ID is null
3147: AND RANDOM_STRING = 'COMP';
3148: exit;

Line 3166: FROM PAY_GB_BACS_FPS

3162: END LOOP;
3163: --15903040 End
3164: SELECT HASH,AMOUNT,ASSIGNMENT_ID
3165: INTO L_HASH,L_AMOUNT,L_ASG_ID
3166: FROM PAY_GB_BACS_FPS
3167: WHERE PRE_PAYMENT_PAYROLL_ACTION_ID = p_PAYROLL_ACTION_ID
3168: AND PERSON_ID = p_PERSON_ID ;
3169: hr_utility.trace(' Fetched hash for FPS '||L_HASH);
3170: hr_utility.trace(' Fetched amount for FPS '||L_AMOUNT);

Line 3185: L_PAY_GB_BACS_FPS PAY_GB_BACS_FPS.PRE_PAYMENT_PAYROLL_ACTION_ID%type;

3181: RETURN NUMBER
3182: IS
3183: PRAGMA AUTONOMOUS_TRANSACTION;
3184: --This program will be called from FPS and BACS
3185: L_PAY_GB_BACS_FPS PAY_GB_BACS_FPS.PRE_PAYMENT_PAYROLL_ACTION_ID%type;
3186: L_PAYROLL_ACTION_ID NUMBER;
3187: B_PAYROLL_ACTION_ID NUMBER;
3188: l_return NUMBER := 0;
3189: l_insert_bacs NUMBER;

Line 3317: INTO L_PAY_GB_BACS_FPS

3313: IF l_insert_bacs IS NOT NULL OR l_uptake_value = 'ALL' THEN
3314: BEGIN
3315: fnd_file.put_line(FND_FILE.LOG,' Check for PAYROLL_ACTION_ID '||L_PAYROLL_ACTION_ID);
3316: SELECT DISTINCT PRE_PAYMENT_PAYROLL_ACTION_ID
3317: INTO L_PAY_GB_BACS_FPS
3318: FROM PAY_GB_BACS_FPS
3319: WHERE PRE_PAYMENT_PAYROLL_ACTION_ID = L_PAYROLL_ACTION_ID;
3320: hr_utility.trace(' Data present in PAY_GB_BACS_FPS - No insert happened');
3321: fnd_file.put_line(FND_FILE.LOG,' Data present in PAY_GB_BACS_FPS - No insert happened');

Line 3318: FROM PAY_GB_BACS_FPS

3314: BEGIN
3315: fnd_file.put_line(FND_FILE.LOG,' Check for PAYROLL_ACTION_ID '||L_PAYROLL_ACTION_ID);
3316: SELECT DISTINCT PRE_PAYMENT_PAYROLL_ACTION_ID
3317: INTO L_PAY_GB_BACS_FPS
3318: FROM PAY_GB_BACS_FPS
3319: WHERE PRE_PAYMENT_PAYROLL_ACTION_ID = L_PAYROLL_ACTION_ID;
3320: hr_utility.trace(' Data present in PAY_GB_BACS_FPS - No insert happened');
3321: fnd_file.put_line(FND_FILE.LOG,' Data present in PAY_GB_BACS_FPS - No insert happened');
3322: RETURN l_return;

Line 3320: hr_utility.trace(' Data present in PAY_GB_BACS_FPS - No insert happened');

3316: SELECT DISTINCT PRE_PAYMENT_PAYROLL_ACTION_ID
3317: INTO L_PAY_GB_BACS_FPS
3318: FROM PAY_GB_BACS_FPS
3319: WHERE PRE_PAYMENT_PAYROLL_ACTION_ID = L_PAYROLL_ACTION_ID;
3320: hr_utility.trace(' Data present in PAY_GB_BACS_FPS - No insert happened');
3321: fnd_file.put_line(FND_FILE.LOG,' Data present in PAY_GB_BACS_FPS - No insert happened');
3322: RETURN l_return;
3323: EXCEPTION
3324: WHEN no_data_found THEN

Line 3321: fnd_file.put_line(FND_FILE.LOG,' Data present in PAY_GB_BACS_FPS - No insert happened');

3317: INTO L_PAY_GB_BACS_FPS
3318: FROM PAY_GB_BACS_FPS
3319: WHERE PRE_PAYMENT_PAYROLL_ACTION_ID = L_PAYROLL_ACTION_ID;
3320: hr_utility.trace(' Data present in PAY_GB_BACS_FPS - No insert happened');
3321: fnd_file.put_line(FND_FILE.LOG,' Data present in PAY_GB_BACS_FPS - No insert happened');
3322: RETURN l_return;
3323: EXCEPTION
3324: WHEN no_data_found THEN
3325: l_insert_status := 0;

Line 3327: fnd_file.put_line(FND_FILE.LOG,' Data not present in PAY_GB_BACS_FPS- Calling Master insert');

3323: EXCEPTION
3324: WHEN no_data_found THEN
3325: l_insert_status := 0;
3326: --Insert the master row.
3327: fnd_file.put_line(FND_FILE.LOG,' Data not present in PAY_GB_BACS_FPS- Calling Master insert');
3328: l_return := Insert_master(L_PAYROLL_ACTION_ID,P_PROGRAM,l_insert_status);
3329: fnd_file.put_line(FND_FILE.LOG,' Master insert completed - Moving to other inserts');
3330: --Insert the computed rows with random digits and hash value
3331: BEGIN --14807372

Line 3337: INTO PAY_GB_BACS_FPS

3333: --l_insert_status = 5 means Insert_master inserted the master row in this thread/session
3334: --so below insert should be executed.
3335: fnd_file.put_line(FND_FILE.LOG,' Main insert started at '||TO_CHAR(sysdate,'ddmmyyyy hh24:mi:ss'));
3336: INSERT
3337: INTO PAY_GB_BACS_FPS
3338: (
3339: PRE_PAYMENT_PAYROLL_ACTION_ID,
3340: PRE_PAYMENT_ID,
3341: PERSON_ID,

Line 3405: FROM PAY_GB_BACS_FPS

3401: ) BACS
3402: WHERE BACS.highest = 1
3403: AND 1 = -- This check is to prevent inserts from multiple programs at the same time
3404: (SELECT COUNT(*)
3405: FROM PAY_GB_BACS_FPS
3406: WHERE PRE_PAYMENT_PAYROLL_ACTION_ID = L_PAYROLL_ACTION_ID
3407: );
3408: hr_utility.trace(' All insert completed for '||L_PAYROLL_ACTION_ID);
3409: fnd_file.put_line(FND_FILE.LOG,' Main insert completed at '||TO_CHAR(sysdate,'ddmmyyyy hh24:mi:ss'));

Line 3413: update PAY_GB_BACS_FPS

3409: fnd_file.put_line(FND_FILE.LOG,' Main insert completed at '||TO_CHAR(sysdate,'ddmmyyyy hh24:mi:ss'));
3410: --15903040 Begin
3411: --This update statement will be fired once.
3412: --This will indicate all inserts for the payroll action id is completed.
3413: update PAY_GB_BACS_FPS
3414: set RANDOM_STRING = 'COMP'
3415: where PRE_PAYMENT_PAYROLL_ACTION_ID = L_PAYROLL_ACTION_ID
3416: and RANDOM_STRING is null
3417: and PRE_PAYMENT_ID is null;

Line 3423: FROM PAY_GB_BACS_FPS

3419: END IF;-- check for l_insert_status = 5
3420: fnd_file.put_line(FND_FILE.LOG,' Sanity check start at '||TO_CHAR(sysdate,'ddmmyyyy hh24:mi:ss'));
3421:
3422: DELETE
3423: FROM PAY_GB_BACS_FPS
3424: WHERE rowid NOT IN
3425: (SELECT MIN(rowid)
3426: FROM PAY_GB_BACS_FPS
3427: WHERE NVL(AGGREGATION_FLAG,'N')= 'N'

Line 3426: FROM PAY_GB_BACS_FPS

3422: DELETE
3423: FROM PAY_GB_BACS_FPS
3424: WHERE rowid NOT IN
3425: (SELECT MIN(rowid)
3426: FROM PAY_GB_BACS_FPS
3427: WHERE NVL(AGGREGATION_FLAG,'N')= 'N'
3428: GROUP BY PRE_PAYMENT_PAYROLL_ACTION_ID,
3429: PERSON_ID,
3430: ASSIGNMENT_ID,

Line 3439: FROM PAY_GB_BACS_FPS

3435: (SELECT PRE_PAYMENT_PAYROLL_ACTION_ID,
3436: PERSON_ID,
3437: ASSIGNMENT_ID,
3438: AMOUNT
3439: FROM PAY_GB_BACS_FPS
3440: WHERE NVL(AGGREGATION_FLAG,'N')= 'N'
3441: GROUP BY PRE_PAYMENT_PAYROLL_ACTION_ID,
3442: PERSON_ID,
3443: ASSIGNMENT_ID,

Line 3449: FROM PAY_GB_BACS_FPS

3445: HAVING COUNT(*) > 1
3446: );
3447: hr_utility.trace(' Deleted Non aggregated duplicate rows for '||L_PAYROLL_ACTION_ID);
3448: DELETE
3449: FROM PAY_GB_BACS_FPS
3450: WHERE rowid NOT IN
3451: (SELECT MIN(rowid)
3452: FROM PAY_GB_BACS_FPS
3453: WHERE NVL(AGGREGATION_FLAG,'N') = 'Y'

Line 3452: FROM PAY_GB_BACS_FPS

3448: DELETE
3449: FROM PAY_GB_BACS_FPS
3450: WHERE rowid NOT IN
3451: (SELECT MIN(rowid)
3452: FROM PAY_GB_BACS_FPS
3453: WHERE NVL(AGGREGATION_FLAG,'N') = 'Y'
3454: -- AND PRE_PAYMENT_PAYROLL_ACTION_ID = L_PAYROLL_ACTION_ID -- To Delete all Payroll actions' duplicates
3455: GROUP BY PRE_PAYMENT_PAYROLL_ACTION_ID,
3456: PERSON_ID,

Line 3464: FROM PAY_GB_BACS_FPS

3460: AND (PRE_PAYMENT_PAYROLL_ACTION_ID, PERSON_ID, AMOUNT) IN
3461: (SELECT PRE_PAYMENT_PAYROLL_ACTION_ID,
3462: PERSON_ID,
3463: AMOUNT
3464: FROM PAY_GB_BACS_FPS
3465: WHERE NVL(AGGREGATION_FLAG,'N') = 'Y'
3466: -- AND PRE_PAYMENT_PAYROLL_ACTION_ID = L_PAYROLL_ACTION_ID -- To Delete all Payroll actions' duplicates
3467: GROUP BY PRE_PAYMENT_PAYROLL_ACTION_ID,
3468: PERSON_ID,

Line 3482: FROM PAY_GB_BACS_FPS

3478:
3479: --Master insert completed but actual data inserts failed so rollback Master also
3480: --This is needed as commit is done after master insert
3481: DELETE
3482: FROM PAY_GB_BACS_FPS
3483: WHERE PRE_PAYMENT_PAYROLL_ACTION_ID = L_PAYROLL_ACTION_ID;
3484: COMMIT;
3485: hr_utility.raise_error;
3486: END;