DBA Data[Home] [Help]

APPS.OKS_COPY_CONTRACT_PVT dependencies on OKC_K_PARTY_ROLES_B

Line 7998: -- copy_okc_k_party_roles_b

7994: End copy_okc_price_adjustments;
7995:
7996:
7997: --===================================================
7998: -- copy_okc_k_party_roles_b
7999: -- Parameters: P_From_Chr_ID : Header ID of source contract
8000: -- P_To_Chr_ID : Header ID of target contract
8001: -- P_Partial_Copy_YN : Flag to indicate whether the routine is being invoked as part of full contract copy (value = 'N')
8002: -- or as part of component copy from UI (value = 'Y')

Line 8005: PROCEDURE copy_okc_k_party_roles_b(P_From_Chr_ID IN NUMBER

8001: -- P_Partial_Copy_YN : Flag to indicate whether the routine is being invoked as part of full contract copy (value = 'N')
8002: -- or as part of component copy from UI (value = 'Y')
8003: -- P_Lines_Count : Count of rows in P_Lines_Tbl PLSQL Table
8004: --====================================================
8005: PROCEDURE copy_okc_k_party_roles_b(P_From_Chr_ID IN NUMBER
8006: ,P_To_Chr_ID IN NUMBER
8007: ,P_Partial_Copy_YN IN VARCHAR2
8008: ,P_Lines_Count IN NUMBER DEFAULT 0
8009: ,x_return_status OUT NOCOPY VARCHAR2) IS

Line 8057: OKC_K_PARTY_ROLES_B okcPRB

8053: ,okcPRB.ID AS okcPRB_ORIG_SYSTEM_ID1
8054: ,'COPY' AS okcPRB_ORIG_SYSTEM_REFERENCE1
8055: ,NULL AS okcPRB_ORIG_SYSTEM_SOURCE_CODE
8056: FROM
8057: OKC_K_PARTY_ROLES_B okcPRB
8058: ,OKC_K_HEADERS_B okcH
8059: where okcPRB.DNZ_CHR_ID = okcH.ORIG_SYSTEM_ID1
8060: and okcPRB.CLE_ID is NULL
8061: and okcH.ID = P_To_Chr_ID

Line 8105: OKC_K_PARTY_ROLES_B okcPRB

8101: ,okcPRB.ID AS okcPRB_ORIG_SYSTEM_ID1
8102: ,'COPY' AS okcPRB_ORIG_SYSTEM_REFERENCE1
8103: ,NULL AS okcPRB_ORIG_SYSTEM_SOURCE_CODE
8104: FROM
8105: OKC_K_PARTY_ROLES_B okcPRB
8106: ,OKC_K_LINES_B okcB
8107: WHERE
8108: okcPRB.CLE_ID = okcB.ORIG_SYSTEM_ID1
8109: AND okcPRB.DNZ_CHR_ID = P_From_Chr_ID

Line 8157: OKC_K_PARTY_ROLES_B okcPRB

8153: ,okcPRB.ID AS okcPRB_ORIG_SYSTEM_ID1
8154: ,'COPY' AS okcPRB_ORIG_SYSTEM_REFERENCE1
8155: ,NULL AS okcPRB_ORIG_SYSTEM_SOURCE_CODE
8156: FROM
8157: OKC_K_PARTY_ROLES_B okcPRB
8158: ,OKC_K_LINES_B_TEMP okcBT
8159: WHERE
8160: okcPRB.CLE_ID = okcBT.ORIG_SYSTEM_ID1
8161: AND okcPRB.CHR_ID IS NULL

Line 8276: INSERT INTO OKC_K_PARTY_ROLES_B(

8272: ,OkcPRBRecTab.OkcPRB_ORIG_SYSTEM_SOURCE_CODE LIMIT G_BULK_FETCH_LIMIT;
8273: END IF;
8274:
8275: FORALL i in OkcPRBRecTab.OkcPRB_NewID.FIRST .. OkcPRBRecTab.OkcPRB_NewID.LAST
8276: INSERT INTO OKC_K_PARTY_ROLES_B(
8277: ID
8278: ,CHR_ID
8279: ,CLE_ID
8280: ,DNZ_CHR_ID

Line 8405: End copy_okc_k_party_roles_b;

8401: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8402: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name, substr(SQLERRM,1,240));
8403: RAISE;
8404:
8405: End copy_okc_k_party_roles_b;
8406:
8407: ---------------------------------------------------------------------------------
8408:
8409: --==================================================

Line 8410: -- create_vendor_if_missing : Creates a record in okc_k_party_roles_b for the target contract based on the org_id of the target contract

8406:
8407: ---------------------------------------------------------------------------------
8408:
8409: --==================================================
8410: -- create_vendor_if_missing : Creates a record in okc_k_party_roles_b for the target contract based on the org_id of the target contract
8411: -- Parameters: P_To_Chr_ID
8412: --==================================================
8413: PROCEDURE create_vendor_if_missing(P_From_Chr_ID IN NUMBER
8414: ,P_To_Chr_ID IN NUMBER

Line 8432: FROM okc_k_party_roles_b

8428: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
8429:
8430: CURSOR getSourceHdrVendorPartyRoleID IS
8431: SELECT id
8432: FROM okc_k_party_roles_b
8433: WHERE dnz_chr_id = P_From_Chr_ID
8434: AND cle_id is NULL
8435: AND jtot_object1_code = 'OKX_OPERUNIT';
8436: l_Source_Vendor_PRole_ID NUMBER;

Line 8444: from okc_k_party_roles_b

8440: Begin
8441: /*modified the where clause for bug6667810*/
8442: select ID
8443: into l_vendor_role_id
8444: from okc_k_party_roles_b
8445: where dnz_chr_id = P_To_Chr_ID /*where chr_id = P_To_Chr_ID*/
8446: and jtot_object1_code = 'OKX_OPERUNIT';
8447: EXCEPTION
8448: WHEN NO_DATA_FOUND THEN

Line 8473: --create a record in okc_k_party_roles_b--

8469: l_cplv_rec.dnz_chr_id := P_To_Chr_ID;
8470: l_cplv_rec.chr_id := P_To_Chr_ID;
8471: End;
8472:
8473: --create a record in okc_k_party_roles_b--
8474: Begin
8475: OKC_CONTRACT_PARTY_PUB.create_k_party_role(
8476: p_api_version => p_api_version,
8477: p_init_msg_list => p_init_msg_list,

Line 8552: ,OKC_K_PARTY_ROLES_B okcPRB

8548: ,okcPRTL.ALIAS AS okcPRTL_ALIAS
8549: ,okcPRTL.SECURITY_GROUP_ID AS okcPRTL_SECURITY_GROUP_ID
8550: FROM
8551: OKC_K_PARTY_ROLES_TL okcPRTL
8552: ,OKC_K_PARTY_ROLES_B okcPRB
8553: where okcPRTL.ID = okcPRB.ORIG_SYSTEM_ID1
8554: AND okcPRB.DNZ_CHR_ID = P_To_Chr_ID;
8555:
8556: CURSOR GetOkcPRTLPartial IS

Line 8568: ,OKC_K_PARTY_ROLES_B okcPRB

8564: ,okcPRTL.ALIAS AS okcPRTL_ALIAS
8565: ,okcPRTL.SECURITY_GROUP_ID AS okcPRTL_SECURITY_GROUP_ID
8566: FROM
8567: OKC_K_PARTY_ROLES_TL okcPRTL
8568: ,OKC_K_PARTY_ROLES_B okcPRB
8569: ,OKC_K_LINES_B_TEMP okcBT
8570: where okcPRTL.ID = okcPRB.ORIG_SYSTEM_ID1
8571: AND okcPRB.DNZ_CHR_ID = okcBT.DNZ_CHR_ID
8572: AND okcPRB.CLE_ID = okcBT.ID

Line 8732: ,OKC_K_PARTY_ROLES_B okcPRB

8728: , okcC.RESOURCE_CLASS AS okcC_RESOURCE_CLASS
8729: , okcC.SALES_GROUP_ID AS okcC_SALES_GROUP_ID
8730: FROM
8731: OKC_CONTACTS okcC
8732: ,OKC_K_PARTY_ROLES_B okcPRB
8733: WHERE okcC.CPL_ID = okcPRB.ORIG_SYSTEM_ID1
8734: AND okcPRB.DNZ_CHR_ID = P_To_Chr_ID
8735: AND okcC.DNZ_CHR_ID = P_From_Chr_ID;
8736:

Line 8773: ,OKC_K_PARTY_ROLES_B okcPRB

8769: , okcC.RESOURCE_CLASS AS okcC_RESOURCE_CLASS
8770: , okcC.SALES_GROUP_ID AS okcC_SALES_GROUP_ID
8771: FROM
8772: OKC_CONTACTS okcC
8773: ,OKC_K_PARTY_ROLES_B okcPRB
8774: ,OKC_K_LINES_B_TEMP okcBT
8775: WHERE okcC.CPL_ID = okcPRB.ORIG_SYSTEM_ID1
8776: AND okcPRB.DNZ_CHR_ID = okcBT.DNZ_CHR_ID
8777: AND okcPRB.CLE_ID = okcBT.ID

Line 19485: ,l_module_name||'.copy_okc_k_party_roles_b'

19481: Begin
19482: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
19483: IF (FND_LOG.test(FND_LOG.level_statement, l_module_name)) THEN
19484: FND_LOG.string(FND_LOG.level_statement
19485: ,l_module_name||'.copy_okc_k_party_roles_b'
19486: ,'Before call to copy_okc_k_party_roles_b'
19487: );
19488: END IF;
19489: END IF;

Line 19486: ,'Before call to copy_okc_k_party_roles_b'

19482: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
19483: IF (FND_LOG.test(FND_LOG.level_statement, l_module_name)) THEN
19484: FND_LOG.string(FND_LOG.level_statement
19485: ,l_module_name||'.copy_okc_k_party_roles_b'
19486: ,'Before call to copy_okc_k_party_roles_b'
19487: );
19488: END IF;
19489: END IF;
19490:

Line 19491: copy_okc_k_party_roles_b(P_From_Chr_ID => P_From_Chr_ID

19487: );
19488: END IF;
19489: END IF;
19490:
19491: copy_okc_k_party_roles_b(P_From_Chr_ID => P_From_Chr_ID
19492: ,P_To_Chr_ID => P_To_Chr_ID
19493: ,P_Partial_Copy_YN => 'N'
19494: ,x_return_status => l_return_status);
19495:

Line 19499: ,l_module_name||'.copy_okc_k_party_roles_b'

19495:
19496: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
19497: IF (FND_LOG.test(FND_LOG.level_statement, l_module_name)) THEN
19498: FND_LOG.string(FND_LOG.level_statement
19499: ,l_module_name||'.copy_okc_k_party_roles_b'
19500: ,'After call to copy_okc_k_party_roles_b: x_return_status:'||l_return_status
19501: ||' '||SQLERRM
19502: );
19503: END IF;

Line 19500: ,'After call to copy_okc_k_party_roles_b: x_return_status:'||l_return_status

19496: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
19497: IF (FND_LOG.test(FND_LOG.level_statement, l_module_name)) THEN
19498: FND_LOG.string(FND_LOG.level_statement
19499: ,l_module_name||'.copy_okc_k_party_roles_b'
19500: ,'After call to copy_okc_k_party_roles_b: x_return_status:'||l_return_status
19501: ||' '||SQLERRM
19502: );
19503: END IF;
19504: END IF;

Line 24850: ,l_module_name||'.copy_okc_k_party_roles_b'

24846: Begin
24847: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
24848: IF (FND_LOG.test(FND_LOG.level_statement, l_module_name)) THEN
24849: FND_LOG.string(FND_LOG.level_statement
24850: ,l_module_name||'.copy_okc_k_party_roles_b'
24851: ,'Before call to copy_okc_k_party_roles_b'
24852: );
24853: END IF;
24854: END IF;

Line 24851: ,'Before call to copy_okc_k_party_roles_b'

24847: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
24848: IF (FND_LOG.test(FND_LOG.level_statement, l_module_name)) THEN
24849: FND_LOG.string(FND_LOG.level_statement
24850: ,l_module_name||'.copy_okc_k_party_roles_b'
24851: ,'Before call to copy_okc_k_party_roles_b'
24852: );
24853: END IF;
24854: END IF;
24855:

Line 24856: copy_okc_k_party_roles_b(P_From_Chr_ID => P_From_Chr_ID

24852: );
24853: END IF;
24854: END IF;
24855:
24856: copy_okc_k_party_roles_b(P_From_Chr_ID => P_From_Chr_ID
24857: ,P_To_Chr_ID => P_To_Chr_ID
24858: ,P_Partial_Copy_YN => 'Y'
24859: ,P_Lines_Count => P_Lines_Tbl.COUNT
24860: ,x_return_status => l_return_status);

Line 24865: ,l_module_name||'.copy_okc_k_party_roles_b'

24861:
24862: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
24863: IF (FND_LOG.test(FND_LOG.level_statement, l_module_name)) THEN
24864: FND_LOG.string(FND_LOG.level_statement
24865: ,l_module_name||'.copy_okc_k_party_roles_b'
24866: ,'After call to copy_okc_k_party_roles_b: x_return_status:'||l_return_status
24867: ||' '||SQLERRM
24868: );
24869: END IF;

Line 24866: ,'After call to copy_okc_k_party_roles_b: x_return_status:'||l_return_status

24862: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
24863: IF (FND_LOG.test(FND_LOG.level_statement, l_module_name)) THEN
24864: FND_LOG.string(FND_LOG.level_statement
24865: ,l_module_name||'.copy_okc_k_party_roles_b'
24866: ,'After call to copy_okc_k_party_roles_b: x_return_status:'||l_return_status
24867: ||' '||SQLERRM
24868: );
24869: END IF;
24870: END IF;

Line 26179: FROM okc_k_party_roles_b

26175:
26176: l_stage VARCHAR2(100);
26177: CURSOR l_party_csr(P_To_Chr_ID IN NUMBER) IS
26178: SELECT count(ID)
26179: FROM okc_k_party_roles_b
26180: WHERE dnz_chr_id = P_To_Chr_ID
26181: AND jtot_object1_code = 'OKX_PARTY'
26182: --npalepu added on for bug # 5116858
26183: AND RLE_CODE in ('CUSTOMER','SUBSCRIBER')

Line 26191: FROM okc_k_party_roles_b

26187: --npalepu added on 5/8/2006 for bug # 5116858
26188: CURSOR l_party_comp_csr IS
26189: SELECT COUNT(*) FROM
26190: (SELECT RLE_CODE,jtot_object1_code
26191: FROM okc_k_party_roles_b
26192: WHERE dnz_chr_id = P_From_Chr_ID
26193: AND cle_id is null
26194: MINUS
26195: SELECT RLE_CODE,jtot_object1_code

Line 26196: FROM okc_k_party_roles_b

26192: WHERE dnz_chr_id = P_From_Chr_ID
26193: AND cle_id is null
26194: MINUS
26195: SELECT RLE_CODE,jtot_object1_code
26196: FROM okc_k_party_roles_b
26197: WHERE dnz_chr_id = P_To_Chr_ID
26198: AND cle_id is null);
26199:
26200: l_party_comp_count NUMBER;

Line 26289: where cpl_id in (SELECT ID from OKC_K_PARTY_ROLES_B WHERE DNZ_CHR_ID = P_To_Chr_ID

26285:
26286: --Delete line level party contacts--
26287: l_stage := 'Deleting from OKC_CONTACTS';
26288: DELETE from okc_contacts
26289: where cpl_id in (SELECT ID from OKC_K_PARTY_ROLES_B WHERE DNZ_CHR_ID = P_To_Chr_ID
26290: --npalepu removed the condition on 5/8/2006 for bug # 5116858
26291: /* and JTOT_OBJECT1_CODE = 'OKX_PARTY' */
26292: --end npalepu
26293: and CLE_ID is NOT NULL);

Line 26296: l_stage := 'Deleting from OKC_K_PARTY_ROLES_B';

26292: --end npalepu
26293: and CLE_ID is NOT NULL);
26294:
26295: --Delete line level party roles--
26296: l_stage := 'Deleting from OKC_K_PARTY_ROLES_B';
26297: DELETE from okc_k_party_roles_b
26298: where dnz_chr_id = P_To_Chr_ID
26299: --npalepu removed the condition on 5/8/2006 for bug # 5116858
26300: /* and jtot_object1_code = 'OKX_PARTY' */

Line 26297: DELETE from okc_k_party_roles_b

26293: and CLE_ID is NOT NULL);
26294:
26295: --Delete line level party roles--
26296: l_stage := 'Deleting from OKC_K_PARTY_ROLES_B';
26297: DELETE from okc_k_party_roles_b
26298: where dnz_chr_id = P_To_Chr_ID
26299: --npalepu removed the condition on 5/8/2006 for bug # 5116858
26300: /* and jtot_object1_code = 'OKX_PARTY' */
26301: --end npalepu

Line 26348: where cpl_id in (SELECT ID from OKC_K_PARTY_ROLES_B WHERE DNZ_CHR_ID = P_To_Chr_ID

26344:
26345: --Delete line level party contacts--
26346: l_stage := 'Deleting from OKC_CONTACTS';
26347: DELETE from okc_contacts
26348: where cpl_id in (SELECT ID from OKC_K_PARTY_ROLES_B WHERE DNZ_CHR_ID = P_To_Chr_ID
26349: and CLE_ID is NOT NULL
26350: AND CLE_ID in (select ID from okc_k_lines_b where DNZ_CHR_ID = P_To_Chr_ID and CLE_ID IS NULL
26351: AND id in (SELECT ID FROM OKC_K_LINES_B_TEMP)));
26352:

Line 26354: l_stage := 'Deleting from OKC_K_PARTY_ROLES_B';

26350: AND CLE_ID in (select ID from okc_k_lines_b where DNZ_CHR_ID = P_To_Chr_ID and CLE_ID IS NULL
26351: AND id in (SELECT ID FROM OKC_K_LINES_B_TEMP)));
26352:
26353: --Delete line level party roles--
26354: l_stage := 'Deleting from OKC_K_PARTY_ROLES_B';
26355: DELETE from okc_k_party_roles_b
26356: where dnz_chr_id = P_To_Chr_ID
26357: and cle_id is not null
26358: AND CLE_ID in (select ID from okc_k_lines_b where DNZ_CHR_ID = P_To_Chr_ID and CLE_ID IS NULL

Line 26355: DELETE from okc_k_party_roles_b

26351: AND id in (SELECT ID FROM OKC_K_LINES_B_TEMP)));
26352:
26353: --Delete line level party roles--
26354: l_stage := 'Deleting from OKC_K_PARTY_ROLES_B';
26355: DELETE from okc_k_party_roles_b
26356: where dnz_chr_id = P_To_Chr_ID
26357: and cle_id is not null
26358: AND CLE_ID in (select ID from okc_k_lines_b where DNZ_CHR_ID = P_To_Chr_ID and CLE_ID IS NULL
26359: AND id in (SELECT ID FROM OKC_K_LINES_B_TEMP));