DBA Data[Home] [Help]

APPS.IGS_AD_IMP_008 dependencies on IGS_PE_EIT_INT

Line 5113: FROM igs_pe_eit_int mi,

5109: l_request_id NUMBER;
5110: l_interface_run_id igs_ad_interface_all.interface_run_id%TYPE;
5111: CURSOR c_biodemo(cp_interface_run_id igs_ad_interface_all.interface_run_id%TYPE) IS
5112: SELECT mi.*,i.person_id
5113: FROM igs_pe_eit_int mi,
5114: igs_ad_interface_all i
5115: WHERE mi.information_type IN ('PE_STAT_RES_COUNTRY','PE_STAT_RES_STATE', 'PE_STAT_RES_STATUS')
5116: AND mi.interface_run_id = cp_interface_run_id
5117: AND mi.interface_id = i.interface_id

Line 5192: igs_ad_imp_001.logerrormessage(biodem_rec.interface_eit_id,'E228','IGS_PE_EIT_INT');

5188: p_error_code := 'E228';
5189: p_status :='3';
5190:
5191: IF l_enable_log = 'Y' THEN
5192: igs_ad_imp_001.logerrormessage(biodem_rec.interface_eit_id,'E228','IGS_PE_EIT_INT');
5193: END IF;
5194: ELSE
5195: Igs_Pe_Eit_Pkg.insert_row (
5196: x_rowid => l_rowid,

Line 5240: igs_ad_imp_001.logerrormessage(biodem_rec.interface_eit_id,'E161','IGS_PE_EIT_INT');

5236: NULL,NULL,NULL,NULL,TO_CHAR(l_request_id));
5237: END IF;
5238:
5239: IF l_enable_log = 'Y' THEN
5240: igs_ad_imp_001.logerrormessage(biodem_rec.interface_eit_id,'E161','IGS_PE_EIT_INT');
5241: END IF;
5242:
5243:
5244: END crt_biodemo; -- END OF LOCAL PROCEDURE crt_biodemo

Line 5382: UPDATE igs_pe_eit_int

5378: CLOSE c_country;
5379: END IF;
5380: -- update for failure
5381:
5382: UPDATE igs_pe_eit_int
5383: SET status = '3',
5384: error_code = l_error
5385: WHERE interface_eit_id = p_biodemo_rec.interface_eit_id;
5386:

Line 5408: igs_ad_imp_001.logerrormessage(p_biodemo_rec.interface_eit_id,l_error,'IGS_PE_EIT_INT');

5404: NULL,NULL,NULL,NULL,TO_CHAR(l_request_id));
5405: END IF;
5406:
5407: IF l_enable_log = 'Y' THEN
5408: igs_ad_imp_001.logerrormessage(p_biodemo_rec.interface_eit_id,l_error,'IGS_PE_EIT_INT');
5409: END IF;
5410:
5411: RETURN FALSE ;
5412:

Line 5445: UPDATE igs_pe_eit_int

5441: l_rule :=IGS_AD_IMP_001.Find_Source_Cat_Rule(p_source_type_id, 'PERSON_STATISTICS');
5442: --
5443: --1 If rule is E or I, then if the match_ind is not null, the combination is invalid
5444: IF l_rule IN ('E','I') THEN
5445: UPDATE igs_pe_eit_int
5446: SET status = '3',
5447: ERROR_CODE = 'E695' -- Error code depicting incorrect combination
5448: WHERE match_ind IS NOT NULL
5449: AND status = '2'

Line 5455: UPDATE igs_pe_eit_int mi

5451: END IF;
5452:
5453: --2 If rule is E and duplicate exists, update match_ind to 19 and status to 1
5454: IF l_rule = 'E' THEN
5455: UPDATE igs_pe_eit_int mi
5456: SET status = '1',
5457: match_ind = '19'
5458: WHERE mi.interface_run_id = l_interface_run_id
5459: AND mi.status = '2'

Line 5472: UPDATE igs_pe_eit_int

5468:
5469: --3 If rule is R and there match_ind is 18,19,22 or 23 then the records must have been
5470: -- processed in prior runs and didn't get updated .. update to status 1
5471: IF l_rule = 'R' THEN
5472: UPDATE igs_pe_eit_int
5473: SET status = '1'
5474: WHERE interface_run_id = l_interface_run_id
5475: AND match_ind IN ('18','19','22','23')
5476: AND status = '2';

Line 5481: UPDATE igs_pe_eit_int

5477: END IF;
5478:
5479: --4 If rule is R and match_ind is neither 21 nor 25 then error
5480: IF l_rule = 'R' THEN
5481: UPDATE igs_pe_eit_int
5482: SET status = '3',
5483: ERROR_CODE = 'E695'
5484: WHERE interface_run_id = l_interface_run_id
5485: AND status = '2'

Line 5491: UPDATE igs_pe_eit_int mi

5487: END IF;
5488:
5489: --5 If rule is R, set duplicated records with no discrepancy to status 1 and match_ind 23
5490: IF l_rule = 'R' THEN
5491: UPDATE igs_pe_eit_int mi
5492: SET status = '1',
5493: match_ind = '23'
5494: WHERE mi.interface_run_id = l_interface_run_id
5495: AND mi.match_ind IS NULL

Line 5516: UPDATE igs_pe_eit_int mi

5512: END IF;
5513:
5514: --6 If rule is R records still exist, they are duplicates and have discrepancy .. update status=3,match_ind=20
5515: IF l_rule = 'R' THEN
5516: UPDATE igs_pe_eit_int mi
5517: SET status = '3',
5518: match_ind = '20',
5519: DUP_PE_EIT_ID = (SELECT pe.pe_eit_id
5520: FROM igs_pe_eit pe, igs_ad_interface_all ii

Line 5585: UPDATE igs_pe_eit_int

5581: CLOSE date_overlap;
5582:
5583: IF l_count > 0 THEN
5584:
5585: UPDATE igs_pe_eit_int
5586: SET status = '3',
5587: error_code = 'E228'
5588: WHERE interface_eit_id = biodem_rec.interface_eit_id;
5589:

Line 5591: igs_ad_imp_001.logerrormessage(biodem_rec.interface_eit_id,'E228','IGS_PE_EIT_INT');

5587: error_code = 'E228'
5588: WHERE interface_eit_id = biodem_rec.interface_eit_id;
5589:
5590: IF l_enable_log = 'Y' THEN
5591: igs_ad_imp_001.logerrormessage(biodem_rec.interface_eit_id,'E228','IGS_PE_EIT_INT');
5592: END IF;
5593:
5594: ELSE
5595: -- open the Null handling cursor

Line 5611: UPDATE igs_pe_eit_int

5607: x_end_date => NVL(biodem_rec.end_date,dup_cur_rec.end_date),
5608: x_mode => 'R'
5609: );
5610:
5611: UPDATE igs_pe_eit_int
5612: SET status = '1',
5613: match_ind = '18'
5614: WHERE interface_eit_id = biodem_rec.interface_eit_id;
5615: END IF;

Line 5619: UPDATE igs_pe_eit_int

5615: END IF;
5616:
5617: EXCEPTION
5618: WHEN OTHERS THEN
5619: UPDATE igs_pe_eit_int
5620: SET status = '3',
5621: error_code = 'E090'
5622: WHERE interface_eit_id = biodem_rec.interface_eit_id;
5623:

Line 5647: igs_ad_imp_001.logerrormessage(biodem_rec.interface_eit_id,'E090','IGS_PE_EIT_INT');

5643: NULL,NULL,NULL,NULL,TO_CHAR(l_request_id));
5644: END IF;
5645:
5646: IF l_enable_log = 'Y' THEN
5647: igs_ad_imp_001.logerrormessage(biodem_rec.interface_eit_id,'E090','IGS_PE_EIT_INT');
5648: END IF;
5649:
5650: END;
5651:

Line 5679: UPDATE igs_pe_eit_int

5675: CLOSE date_overlap;
5676:
5677: IF l_count > 0 THEN
5678:
5679: UPDATE igs_pe_eit_int
5680: SET status = '3',
5681: error_code = 'E228'
5682: WHERE interface_eit_id = biodem_rec.interface_eit_id;
5683:

Line 5685: igs_ad_imp_001.logerrormessage(biodem_rec.interface_eit_id,'E228','IGS_PE_EIT_INT');

5681: error_code = 'E228'
5682: WHERE interface_eit_id = biodem_rec.interface_eit_id;
5683:
5684: IF l_enable_log = 'Y' THEN
5685: igs_ad_imp_001.logerrormessage(biodem_rec.interface_eit_id,'E228','IGS_PE_EIT_INT');
5686: END IF;
5687:
5688: ELSE
5689: igs_pe_eit_pkg.update_row (

Line 5704: UPDATE igs_pe_eit_int

5700: x_end_date => NVL(biodem_rec.end_date,dup_cur_rec.end_date),
5701: x_mode => 'R'
5702: );
5703:
5704: UPDATE igs_pe_eit_int
5705: SET status = '1', error_code = NULL,match_ind = '18'
5706: WHERE interface_eit_id = biodem_rec.interface_eit_id;
5707: END IF;
5708: EXCEPTION

Line 5710: UPDATE igs_pe_eit_int

5706: WHERE interface_eit_id = biodem_rec.interface_eit_id;
5707: END IF;
5708: EXCEPTION
5709: WHEN OTHERS THEN
5710: UPDATE igs_pe_eit_int
5711: SET status = '3',
5712: error_code = 'E089'
5713: WHERE interface_eit_id = biodem_rec.interface_eit_id;
5714:

Line 5738: igs_ad_imp_001.logerrormessage(biodem_rec.interface_eit_id,'E089','IGS_PE_EIT_INT');

5734: NULL,NULL,NULL,NULL,TO_CHAR(l_request_id));
5735: END IF;
5736:
5737: IF l_enable_log = 'Y' THEN
5738: igs_ad_imp_001.logerrormessage(biodem_rec.interface_eit_id,'E089','IGS_PE_EIT_INT');
5739: END IF;
5740:
5741: END;
5742:

Line 5755: UPDATE igs_pe_eit_int

5751: crt_biodemo (biodem_rec => biodem_rec,
5752: p_error_code => l_error_code,
5753: p_status => l_status );
5754:
5755: UPDATE igs_pe_eit_int
5756: SET status = l_status,
5757: error_code = l_error_code
5758: WHERE interface_eit_id = biodem_rec.interface_eit_id;
5759:

Line 5764: igs_ad_imp_001.logerrormessage(biodem_rec.interface_eit_id,l_error_code,'IGS_PE_EIT_INT');

5760: -- Call Log detail
5761:
5762: IF l_status <> '1' THEN
5763: IF l_enable_log = 'Y' THEN
5764: igs_ad_imp_001.logerrormessage(biodem_rec.interface_eit_id,l_error_code,'IGS_PE_EIT_INT');
5765: END IF;
5766: END IF;
5767: END IF; -- for 2 IF
5768: -- ELSE already taken care in the Validate Record function for update of interface table