[Home] [Help]
2082: l_dummy_tbl8 as_sales_leads_pub.sales_lead_line_tbl_type;
2083: l_dummy_tbl9 as_sales_leads_pub.sales_lead_contact_tbl_type;
2084:
2085: cursor c_cnt_role (c_import_interface_id NUMBER) is
2086: select * from AS_IMP_CNT_ROL_INTERFACE
2087: where import_interface_id = c_import_interface_id;
2088:
2089: Begin
2090: --check if the relationship is existing or not.
2188: write_log(3, 'Creating PS for Rel failed');
2189: END IF;
2190: END IF;
2191:
2192: -- Creating OrgContact Role(in as_imp_cnt_rol_interface)
2193: IF (pI.customer_rank is not NULL AND
2194: pI.customer_rank <> FND_API.G_MISS_CHAR) THEN
2195: l_role_rec.role_type := pI.customer_rank;
2196: l_role_rec.primary_flag := 'N'; --'Y';
2231: End if;
2232: End if;
2233: End if;
2234:
2235: -- Creating OrgContact Role(in as_imp_cnt_rol_interface)
2236: FOR OCR IN c_cnt_role(pI.import_interface_id) LOOP
2237: l_role_rec.role_type := OCR.role_type;
2238: -- pI.customer_rank;
2239: IF (OCR.primary_flag is not NULL AND
2300: 'Creating OrgContRole failed');
2301: ELSE
2302: -- ffang 082201, write back to role
2303: -- interface table
2304: update as_imp_cnt_rol_interface
2305: set org_contact_role_id = l_role_id,
2306: org_contact_id =
2307: G_LOCAL_ORG_CONTACT_ID
2308: where imp_cnt_rol_interface_id =