[Home] [Help]
816: ) IS
817: l_dummy NUMBER;
818: BEGIN
819: -- Transform search criteria
820: HZ_TRANS_PKG.clear_globals;
821: MAP_PARTY_REC(FALSE,p_party_search_rec, l_dummy, g_party_stage_rec);
822: MAP_PARTY_SITE_REC(FALSE,p_party_site_list, l_dummy, g_party_site_stage_list);
823: MAP_CONTACT_REC(FALSE,p_contact_list, l_dummy, g_contact_stage_list);
824: MAP_CONTACT_POINT_REC(FALSE,p_contact_point_list, l_dummy, g_contact_pt_stage_list);
866: g_contact_pt_stage_list.DELETE;
867: call_order.DELETE;
868: call_max_score.DELETE;
869: HZ_DQM_SEARCH_UTIL.new_search;
870: HZ_TRANS_PKG.set_party_type(p_party_search_rec.PARTY_TYPE);
871: HZ_DQM_SEARCH_UTIL.set_num_eval(0);
872:
873: -- Transform search criteria
874: MAP_PARTY_REC(TRUE,p_party_search_rec, l_entered_max_score, g_party_stage_rec);
2034: /********************* Find Parties private procedures *******/
2035: PROCEDURE set_person_party_type IS
2036: BEGIN
2037: g_party_stage_rec.TX36:=
2038: HZ_TRANS_PKG.EXACT(
2039: 'PERSON'
2040: ,null,'PARTY_TYPE'
2041: ,'PARTY');
2042: END;
4575: END IF;
4576: IF p_search_ctx THEN
4577: IF p_search_rec.JGZZ_FISCAL_CODE IS NOT NULL THEN
4578: x_stage_rec.TX45 :=
4579: HZ_TRANS_PKG.RM_SPLCHAR(
4580: p_search_rec.JGZZ_FISCAL_CODE
4581: ,null,'JGZZ_FISCAL_CODE'
4582: ,'PARTY','SEARCH');
4583: ELSE
4584: x_stage_rec.TX45 := '';
4585: END IF;
4586: ELSE
4587: IF p_search_rec.JGZZ_FISCAL_CODE IS NOT NULL THEN
4588: tmp :=HZ_TRANS_PKG.RM_SPLCHAR(
4589: x_stage_rec.TX45
4590: ,null,'JGZZ_FISCAL_CODE'
4591: ,'PARTY','SCORE');
4592: IF tmp IS NOT NULL THEN
4596: END IF;
4597: IF p_search_ctx THEN
4598: IF p_search_rec.PARTY_NAME IS NOT NULL THEN
4599: x_stage_rec.TX59 :=
4600: HZ_TRANS_PKG.BASIC_WRNAMES(
4601: p_search_rec.PARTY_NAME
4602: ,null,'PARTY_NAME'
4603: ,'PARTY','SEARCH');
4604: ELSE
4605: x_stage_rec.TX59 := '';
4606: END IF;
4607: ELSE
4608: IF p_search_rec.PARTY_NAME IS NOT NULL THEN
4609: tmp :=HZ_TRANS_PKG.BASIC_WRNAMES(
4610: x_stage_rec.TX59
4611: ,null,'PARTY_NAME'
4612: ,'PARTY','SCORE');
4613: IF tmp IS NOT NULL THEN
4617: END IF;
4618: IF p_search_ctx THEN
4619: IF p_search_rec.PARTY_NAME IS NOT NULL THEN
4620: x_stage_rec.TX2 :=
4621: HZ_TRANS_PKG.EXACT_PADDED(
4622: p_search_rec.PARTY_NAME
4623: ,null,'PARTY_NAME'
4624: ,'PARTY');
4625: ELSE
4628: END IF;
4629: IF p_search_ctx THEN
4630: IF p_search_rec.PARTY_TYPE IS NOT NULL THEN
4631: x_stage_rec.TX36 :=
4632: HZ_TRANS_PKG.EXACT(
4633: p_search_rec.PARTY_TYPE
4634: ,null,'PARTY_TYPE'
4635: ,'PARTY');
4636: ELSE
4696: FOR I IN 1..p_search_list.COUNT LOOP
4697: IF p_search_ctx THEN
4698: IF p_search_list(I).ADDRESS IS NOT NULL THEN
4699: x_stage_list(I).TX26 :=
4700: HZ_TRANS_PKG.BASIC_WRADDR(
4701: p_search_list(I).ADDRESS
4702: ,null,'ADDRESS'
4703: ,'PARTY_SITES','SEARCH');
4704: ELSE
4705: x_stage_list(I).TX26 := '';
4706: END IF;
4707: ELSE
4708: IF p_search_list(I).ADDRESS IS NOT NULL THEN
4709: tmp := HZ_TRANS_PKG.BASIC_WRADDR(
4710: x_stage_list(I).TX26
4711: ,null,'ADDRESS'
4712: ,'PARTY_SITES','SCORE');
4713: IF tmp IS NOT NULL THEN
4719: FOR I IN 1..p_search_list.COUNT LOOP
4720: IF p_search_ctx THEN
4721: IF p_search_list(I).CITY IS NOT NULL THEN
4722: x_stage_list(I).TX9 :=
4723: HZ_TRANS_PKG.EXACT(
4724: p_search_list(I).CITY
4725: ,null,'CITY'
4726: ,'PARTY_SITES');
4727: ELSE
4732: FOR I IN 1..p_search_list.COUNT LOOP
4733: IF p_search_ctx THEN
4734: IF p_search_list(I).COUNTRY IS NOT NULL THEN
4735: x_stage_list(I).TX22 :=
4736: HZ_TRANS_PKG.EXACT(
4737: p_search_list(I).COUNTRY
4738: ,null,'COUNTRY'
4739: ,'PARTY_SITES');
4740: ELSE
4745: FOR I IN 1..p_search_list.COUNT LOOP
4746: IF p_search_ctx THEN
4747: IF p_search_list(I).POSTAL_CODE IS NOT NULL THEN
4748: x_stage_list(I).TX11 :=
4749: HZ_TRANS_PKG.RM_SPLCHAR(
4750: p_search_list(I).POSTAL_CODE
4751: ,null,'POSTAL_CODE'
4752: ,'PARTY_SITES','SEARCH');
4753: ELSE
4754: x_stage_list(I).TX11 := '';
4755: END IF;
4756: ELSE
4757: IF p_search_list(I).POSTAL_CODE IS NOT NULL THEN
4758: tmp := HZ_TRANS_PKG.RM_SPLCHAR(
4759: x_stage_list(I).TX11
4760: ,null,'POSTAL_CODE'
4761: ,'PARTY_SITES','SCORE');
4762: IF tmp IS NOT NULL THEN
4768: FOR I IN 1..p_search_list.COUNT LOOP
4769: IF p_search_ctx THEN
4770: IF p_search_list(I).STATE IS NOT NULL THEN
4771: x_stage_list(I).TX14 :=
4772: HZ_TRANS_PKG.WRSTATE_EXACT(
4773: p_search_list(I).STATE
4774: ,null,'STATE'
4775: ,'PARTY_SITES','SEARCH');
4776: ELSE
4777: x_stage_list(I).TX14 := '';
4778: END IF;
4779: ELSE
4780: IF p_search_list(I).STATE IS NOT NULL THEN
4781: tmp := HZ_TRANS_PKG.WRSTATE_EXACT(
4782: x_stage_list(I).TX14
4783: ,null,'STATE'
4784: ,'PARTY_SITES','SCORE');
4785: IF tmp IS NOT NULL THEN
4886: FOR I IN 1..p_search_list.COUNT LOOP
4887: IF p_search_ctx THEN
4888: IF p_search_list(I).EMAIL_ADDRESS IS NOT NULL THEN
4889: x_stage_list(I).TX5 :=
4890: HZ_TRANS_PKG.EXACT_EMAIL(
4891: p_search_list(I).EMAIL_ADDRESS
4892: ,null,'EMAIL_ADDRESS'
4893: ,'CONTACT_POINTS');
4894: ELSE
4899: FOR I IN 1..p_search_list.COUNT LOOP
4900: IF p_search_ctx THEN
4901: IF p_search_list(I).RAW_PHONE_NUMBER IS NOT NULL THEN
4902: x_stage_list(I).TX158 :=
4903: HZ_TRANS_PKG.REVERSE_PHONE_NUMBER(
4904: p_search_list(I).RAW_PHONE_NUMBER
4905: ,null,'RAW_PHONE_NUMBER'
4906: ,'CONTACT_POINTS');
4907: ELSE
4912: FOR I IN 1..p_search_list.COUNT LOOP
4913: IF p_search_ctx THEN
4914: IF p_search_list(I).RAW_PHONE_NUMBER IS NOT NULL THEN
4915: x_stage_list(I).TX10 :=
4916: HZ_TRANS_PKG.RM_SPLCHAR(
4917: p_search_list(I).RAW_PHONE_NUMBER
4918: ,null,'RAW_PHONE_NUMBER'
4919: ,'CONTACT_POINTS','SEARCH');
4920: ELSE
4921: x_stage_list(I).TX10 := '';
4922: END IF;
4923: ELSE
4924: IF p_search_list(I).RAW_PHONE_NUMBER IS NOT NULL THEN
4925: tmp := HZ_TRANS_PKG.RM_SPLCHAR(
4926: x_stage_list(I).TX10
4927: ,null,'RAW_PHONE_NUMBER'
4928: ,'CONTACT_POINTS','SCORE');
4929: IF tmp IS NOT NULL THEN