DBA Data[Home] [Help]

APPS.OKC_CONTRACT_PVT dependencies on OKC_DEBUG

Line 167: okc_debug.Set_Indentation('Generate Contract Number');

163: l_return_status VARCHAR2(1);
164:
165: BEGIN
166: IF (l_debug = 'Y') THEN
167: okc_debug.Set_Indentation('Generate Contract Number');
168: okc_debug.log('1000: Entering generate contract number');
169: END IF;
170: -- initialize return status
171: x_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 168: okc_debug.log('1000: Entering generate contract number');

164:
165: BEGIN
166: IF (l_debug = 'Y') THEN
167: okc_debug.Set_Indentation('Generate Contract Number');
168: okc_debug.log('1000: Entering generate contract number');
169: END IF;
170: -- initialize return status
171: x_return_status := OKC_API.G_RET_STS_SUCCESS;
172:

Line 178: okc_debug.log('1010: x_contract_Number is null');

174: If (x_contract_number = OKC_API.G_MISS_CHAR or
175: x_contract_number is null)
176: Then
177: IF (l_debug = 'Y') THEN
178: okc_debug.log('1010: x_contract_Number is null');
179: END IF;
180: -- Loop till a unique contract number + modifier found
181: -- WHILE (NOT l_unique_number_found)
182: -- LOOP

Line 184: okc_debug.log('1020: Before Get_K_Number');

180: -- Loop till a unique contract number + modifier found
181: -- WHILE (NOT l_unique_number_found)
182: -- LOOP
183: IF (l_debug = 'Y') THEN
184: okc_debug.log('1020: Before Get_K_Number');
185: END IF;
186: OKC_CONTRACT_SEQ_PUB.GET_K_NUMBER (
187: p_scs_code => p_scs_code,
188: p_contract_number_modifier => p_modifier,

Line 192: okc_debug.log('1030: After Get_K_Number');

188: p_contract_number_modifier => p_modifier,
189: x_contract_number => x_contract_number,
190: x_return_status => l_return_status );
191: IF (l_debug = 'Y') THEN
192: okc_debug.log('1030: After Get_K_Number');
193: okc_debug.log('1040: x_contract_number ' || x_contract_number);
194: END IF;
195:
196: x_return_status := l_return_status;

Line 193: okc_debug.log('1040: x_contract_number ' || x_contract_number);

189: x_contract_number => x_contract_number,
190: x_return_status => l_return_status );
191: IF (l_debug = 'Y') THEN
192: okc_debug.log('1030: After Get_K_Number');
193: okc_debug.log('1040: x_contract_number ' || x_contract_number);
194: END IF;
195:
196: x_return_status := l_return_status;
197: If (l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then

Line 213: okc_debug.log('1050: Exiting Generate Contract Number');

209: x_return_status := l_return_status;
210: END LOOP; */
211: End If;
212: IF (l_debug = 'Y') THEN
213: okc_debug.log('1050: Exiting Generate Contract Number');
214: okc_debug.reset_indentation;
215: END IF;
216: exception
217: when G_EXCEPTION_HALT_VALIDATION then

Line 214: okc_debug.reset_indentation;

210: END LOOP; */
211: End If;
212: IF (l_debug = 'Y') THEN
213: okc_debug.log('1050: Exiting Generate Contract Number');
214: okc_debug.reset_indentation;
215: END IF;
216: exception
217: when G_EXCEPTION_HALT_VALIDATION then
218: IF (l_debug = 'Y') THEN

Line 219: okc_debug.log('1060: Exiting Generate Contract Number');

215: END IF;
216: exception
217: when G_EXCEPTION_HALT_VALIDATION then
218: IF (l_debug = 'Y') THEN
219: okc_debug.log('1060: Exiting Generate Contract Number');
220: okc_debug.reset_indentation;
221: END IF;
222: when OTHERS then
223: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 220: okc_debug.reset_indentation;

216: exception
217: when G_EXCEPTION_HALT_VALIDATION then
218: IF (l_debug = 'Y') THEN
219: okc_debug.log('1060: Exiting Generate Contract Number');
220: okc_debug.reset_indentation;
221: END IF;
222: when OTHERS then
223: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
224: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

Line 231: okc_debug.log('1070: Exiting Generate Contract Number');

227: p_token1_value => sqlcode,
228: p_token2 => g_sqlerrm_token,
229: p_token2_value => sqlerrm);
230: IF (l_debug = 'Y') THEN
231: okc_debug.log('1070: Exiting Generate Contract Number');
232: okc_debug.reset_indentation;
233: END IF;
234: END GENERATE_CONTRACT_NUMBER;
235:

Line 232: okc_debug.reset_indentation;

228: p_token2 => g_sqlerrm_token,
229: p_token2_value => sqlerrm);
230: IF (l_debug = 'Y') THEN
231: okc_debug.log('1070: Exiting Generate Contract Number');
232: okc_debug.reset_indentation;
233: END IF;
234: END GENERATE_CONTRACT_NUMBER;
235:
236:

Line 2640: okc_debug.log('100: Validate_Line_id starts', 2);

2636: WHERE id=P_Line_Id;
2637: BEGIN
2638:
2639: IF (l_debug = 'Y') THEN
2640: okc_debug.log('100: Validate_Line_id starts', 2);
2641: END IF;
2642: IF P_Line_id = OKC_API.G_MISS_NUM OR
2643: P_Line_Id IS NULL
2644: THEN

Line 2651: okc_debug.log('200: l_return_status = ' || l_return_status, 2);

2647: l_return_status := OKC_API.G_RET_STS_ERROR;
2648: END IF;
2649:
2650: IF (l_debug = 'Y') THEN
2651: okc_debug.log('200: l_return_status = ' || l_return_status, 2);
2652: END IF;
2653:
2654: OPEN Cur_Line(P_LIne_Id);
2655: FETCH Cur_Line INTO l_Count;

Line 2665: okc_debug.log('300: validate_line_id ends', 2);

2661: l_return_status := OKC_API.G_RET_STS_ERROR;
2662: END IF;
2663: x_return_status := l_return_status;
2664: IF (l_debug = 'Y') THEN
2665: okc_debug.log('300: validate_line_id ends', 2);
2666: END IF;
2667: EXCEPTION
2668: WHEN OTHERS THEN
2669: -- store SQL error message on message stack for caller

Line 2679: okc_debug.log('300: WHEN OTHERS EXCEPTION', 2);

2675: SQLERRM);
2676: -- notify caller of an UNEXPECTED error
2677: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2678: IF (l_debug = 'Y') THEN
2679: okc_debug.log('300: WHEN OTHERS EXCEPTION', 2);
2680: END IF;
2681: END Validate_Line_id;
2682:
2683: PROCEDURE delete_rule(

Line 2726: okc_debug.log('10: starting delete rule', 2);

2722: l_proc varchar2(72) := 'delete_rule';
2723: --
2724: BEGIN
2725: IF (l_debug = 'Y') THEN
2726: okc_debug.log('10: starting delete rule', 2);
2727: END IF;
2728:
2729: OPEN l_atnv_csr;
2730: FETCH l_atnv_csr into l_dummy_var;

Line 2734: okc_debug.log('G_EXCEPTION_CANNOT_DELETE');

2730: FETCH l_atnv_csr into l_dummy_var;
2731: CLOSE l_atnv_csr;
2732: IF l_dummy_var = 'x' THEN
2733: IF (l_debug = 'Y') THEN
2734: okc_debug.log('G_EXCEPTION_CANNOT_DELETE');
2735: END IF;
2736: --RAISE G_EXCEPTION_CANNOT_DELETE;
2737: END IF;
2738:

Line 2748: okc_debug.log('100: calling OKC_RULE_PUB.delete_cover_time', 2);

2744: END LOOP;
2745:
2746: IF i > 0 THEN
2747: IF (l_debug = 'Y') THEN
2748: okc_debug.log('100: calling OKC_RULE_PUB.delete_cover_time', 2);
2749: END IF;
2750: --Delete the details
2751: -- call Public delete procedure
2752: OKC_RULE_PUB.delete_cover_time(

Line 2762: okc_debug.log('200: x_return_status = ' || x_return_status, 2);

2758: p_ctiv_tbl => l_ctiv_tbl);
2759:
2760: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
2761: IF (l_debug = 'Y') THEN
2762: okc_debug.log('200: x_return_status = ' || x_return_status, 2);
2763: END IF;
2764: -- stop delete process
2765: RETURN;
2766: END IF;

Line 2781: okc_debug.log('300: calling OKC_RULE_PUB.delete_react_interval', 2);

2777: IF i > 0 THEN
2778: --Delete the details
2779: -- call Public delete procedure
2780: IF (l_debug = 'Y') THEN
2781: okc_debug.log('300: calling OKC_RULE_PUB.delete_react_interval', 2);
2782: END IF;
2783: OKC_RULE_PUB.delete_react_interval(
2784: p_api_version => p_api_version,
2785: p_init_msg_list => p_init_msg_list,

Line 2793: okc_debug.log('300: x_return_status = ' || x_return_status, 2);

2789: p_rilv_tbl => l_rilv_tbl);
2790:
2791: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
2792: IF (l_debug = 'Y') THEN
2793: okc_debug.log('300: x_return_status = ' || x_return_status, 2);
2794: END IF;
2795: -- stop delete process
2796: RETURN;
2797: END IF;

Line 2824: okc_debug.log('600: calling okc_time_pub.delete_timevalues_n_tasks', 2);

2820: if (l_col_vals.COUNT>0) then
2821: i := l_col_vals.FIRST;
2822: LOOP
2823: IF (l_debug = 'Y') THEN
2824: okc_debug.log('600: calling okc_time_pub.delete_timevalues_n_tasks', 2);
2825: END IF;
2826: if (l_col_vals(i).col_value is not NULL) then
2827: okc_time_pub.delete_timevalues_n_tasks(
2828: p_api_version => p_api_version,

Line 2836: okc_debug.log('700: x_return_status = ' || x_return_status, 2);

2832: x_msg_data => x_msg_data,
2833: p_tve_id => l_col_vals(i).col_value);
2834: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
2835: IF (l_debug = 'Y') THEN
2836: okc_debug.log('700: x_return_status = ' || x_return_status, 2);
2837: END IF;
2838: -- stop delete process
2839: RETURN;
2840: END IF;

Line 2851: okc_debug.log('800: calling OKC_RUL_PVT.delete_row', 2);

2847: --
2848: -- /tve_id
2849: --
2850: IF (l_debug = 'Y') THEN
2851: okc_debug.log('800: calling OKC_RUL_PVT.delete_row', 2);
2852: END IF;
2853: OKC_RUL_PVT.delete_row(
2854: p_api_version => p_api_version,
2855: p_init_msg_list => p_init_msg_list,

Line 2862: okc_debug.log('900: x_return_status = ' || x_return_status, 2);

2858: x_msg_data => x_msg_data,
2859: p_rulv_rec => p_rulv_rec);
2860:
2861: IF (l_debug = 'Y') THEN
2862: okc_debug.log('900: x_return_status = ' || x_return_status, 2);
2863: END IF;
2864:
2865: EXCEPTION
2866: /*

Line 2903: okc_debug.log('100: starting force delete', 2);

2899: END delete_rule;
2900:
2901: BEGIN
2902: IF (l_debug = 'Y') THEN
2903: okc_debug.log('100: starting force delete', 2);
2904: okc_debug.log('200: cle_id=' || to_char(p_line_id),2);
2905: END IF;
2906: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
2907: Validate_Line_id(p_line_id,l_return_status);

Line 2904: okc_debug.log('200: cle_id=' || to_char(p_line_id),2);

2900:
2901: BEGIN
2902: IF (l_debug = 'Y') THEN
2903: okc_debug.log('100: starting force delete', 2);
2904: okc_debug.log('200: cle_id=' || to_char(p_line_id),2);
2905: END IF;
2906: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
2907: Validate_Line_id(p_line_id,l_return_status);
2908: IF NOT l_Return_Status ='S'

Line 2912: okc_debug.log('300: Validate_Line_id failed', 2);

2908: IF NOT l_Return_Status ='S'
2909: THEN
2910: x_return_status := l_return_status;
2911: IF (l_debug = 'Y') THEN
2912: okc_debug.log('300: Validate_Line_id failed', 2);
2913: END IF;
2914: RETURN;
2915: END IF;
2916:

Line 3005: okc_debug.log('400: calling OKC_K_REL_OBJS_PUB.Delete_Row', 2);

3001: END LOOP;
3002: END LOOP;
3003:
3004: IF (l_debug = 'Y') THEN
3005: okc_debug.log('400: calling OKC_K_REL_OBJS_PUB.Delete_Row', 2);
3006: END IF;
3007: IF NOT l_crjv_tbl_in.COUNT=0
3008: THEN
3009:

Line 3019: okc_debug.log('500: l_return_status = ' || l_return_status, 2);

3015: x_msg_data => l_msg_data,
3016: p_crjv_tbl => l_crjv_tbl_in);
3017:
3018: IF (l_debug = 'Y') THEN
3019: okc_debug.log('500: l_return_status = ' || l_return_status, 2);
3020: END IF;
3021:
3022: if not (l_return_status = OKC_API.G_RET_STS_SUCCESS)
3023: then

Line 3030: okc_debug.log('600: calling OKC_CONTRACT_PARTY_PUB.Delete_Contact', 2);

3026: end if;
3027: END IF;
3028:
3029: IF (l_debug = 'Y') THEN
3030: okc_debug.log('600: calling OKC_CONTRACT_PARTY_PUB.Delete_Contact', 2);
3031: END IF;
3032:
3033: IF NOT l_ctcv_tbl_in.COUNT=0
3034: THEN

Line 3044: okc_debug.log('700: l_return_status = ' || l_return_status, 2);

3040: x_msg_data => l_msg_data,
3041: p_ctcv_tbl => l_ctcv_tbl_in);
3042:
3043: IF (l_debug = 'Y') THEN
3044: okc_debug.log('700: l_return_status = ' || l_return_status, 2);
3045: END IF;
3046:
3047: if not (l_return_status = OKC_API.G_RET_STS_SUCCESS)
3048: then

Line 3055: okc_debug.log('800: calling OKC_CONTRACT_PARTY_PUB.Delete_k_Party_Role', 2);

3051: end if;
3052: END IF;
3053:
3054: IF (l_debug = 'Y') THEN
3055: okc_debug.log('800: calling OKC_CONTRACT_PARTY_PUB.Delete_k_Party_Role', 2);
3056: END IF;
3057:
3058: IF NOT l_cplv_tbl_in.COUNT=0
3059: THEN

Line 3069: okc_debug.log('900: l_return_status = ' || l_return_status, 2);

3065: x_msg_data => l_msg_data,
3066: p_cplv_tbl => l_cplv_tbl_in);
3067:
3068: IF (l_debug = 'Y') THEN
3069: okc_debug.log('900: l_return_status = ' || l_return_status, 2);
3070: END IF;
3071: if not (l_return_status = OKC_API.G_RET_STS_SUCCESS)
3072: then
3073: x_return_status := l_return_status;

Line 3079: okc_debug.log('1000: calling okc_Rule_pub.delete_Rule', 2);

3075: end if;
3076: END IF;
3077:
3078: IF (l_debug = 'Y') THEN
3079: okc_debug.log('1000: calling okc_Rule_pub.delete_Rule', 2);
3080: END IF;
3081: IF NOT l_rulv_tbl_in.COUNT=0
3082: THEN
3083: FOR i IN l_rulv_tbl_in.FIRST..l_rulv_tbl_in.LAST

Line 3096: okc_debug.log('1050: l_return_status = ' || l_return_status, 2);

3092: x_msg_data => l_msg_data,
3093: p_rulv_rec => l_rulv_tbl_in(i));
3094:
3095: IF (l_debug = 'Y') THEN
3096: okc_debug.log('1050: l_return_status = ' || l_return_status, 2);
3097: okc_debug.log('1100: calling OKC_CONTRACT_PARTY_PUB.Delete_Contact', 2);
3098: END IF;
3099:
3100: if not (l_return_status = OKC_API.G_RET_STS_SUCCESS)

Line 3097: okc_debug.log('1100: calling OKC_CONTRACT_PARTY_PUB.Delete_Contact', 2);

3093: p_rulv_rec => l_rulv_tbl_in(i));
3094:
3095: IF (l_debug = 'Y') THEN
3096: okc_debug.log('1050: l_return_status = ' || l_return_status, 2);
3097: okc_debug.log('1100: calling OKC_CONTRACT_PARTY_PUB.Delete_Contact', 2);
3098: END IF;
3099:
3100: if not (l_return_status = OKC_API.G_RET_STS_SUCCESS)
3101: THEN

Line 3125: okc_debug.log('1200: calling okc_Rule_pub.delete_Rule_group', 2);

3121:
3122: END IF;
3123:
3124: IF (l_debug = 'Y') THEN
3125: okc_debug.log('1200: calling okc_Rule_pub.delete_Rule_group', 2);
3126: END IF;
3127:
3128: IF NOT l_rgpv_tbl_in.COUNT=0
3129: THEN

Line 3139: okc_debug.log('1300: l_return_status = ' || l_return_status, 2);

3135: x_msg_data => l_msg_data,
3136: p_rgpv_tbl => l_rgpv_tbl_in);
3137:
3138: IF (l_debug = 'Y') THEN
3139: okc_debug.log('1300: l_return_status = ' || l_return_status, 2);
3140: END IF;
3141:
3142: if not (l_return_status = OKC_API.G_RET_STS_SUCCESS)
3143: then

Line 3150: okc_debug.log('1400: calling okc_contract_ITEM_pub.delete_Contract_ITEM', 2);

3146: end if;
3147: END IF;
3148:
3149: IF (l_debug = 'Y') THEN
3150: okc_debug.log('1400: calling okc_contract_ITEM_pub.delete_Contract_ITEM', 2);
3151: END IF;
3152:
3153: IF NOT l_cimv_tbl_in.COUNT=0
3154: THEN

Line 3164: okc_debug.log('1500: l_return_status = ' || l_return_status, 2);

3160: x_msg_data => l_msg_data,
3161: p_cimv_tbl => l_cimv_tbl_in);
3162:
3163: IF (l_debug = 'Y') THEN
3164: okc_debug.log('1500: l_return_status = ' || l_return_status, 2);
3165: END IF;
3166:
3167: IF nvl(l_return_status,'*') <> 'S'
3168: THEN

Line 3184: okc_debug.log('1400: calling okc_cle_pvt.force_delete_row', 2);

3180: END IF;
3181: END IF;
3182:
3183: IF (l_debug = 'Y') THEN
3184: okc_debug.log('1400: calling okc_cle_pvt.force_delete_row', 2);
3185: END IF;
3186:
3187: IF NOT l_clev_tbl_in.COUNT=0
3188: THEN

Line 3198: okc_debug.log('1500: l_return_status = ' || l_return_status, 2);

3194: x_msg_data => l_msg_data,
3195: p_clev_tbl => l_clev_tbl_in);
3196:
3197: IF (l_debug = 'Y') THEN
3198: okc_debug.log('1500: l_return_status = ' || l_return_status, 2);
3199: END IF;
3200:
3201: -- if the above process is success, delete all ancestrys
3202: If (l_return_status = OKC_API.G_RET_STS_SUCCESS) Then

Line 3205: okc_debug.log('1600: calling delete_ancestry', 2);

3201: -- if the above process is success, delete all ancestrys
3202: If (l_return_status = OKC_API.G_RET_STS_SUCCESS) Then
3203:
3204: IF (l_debug = 'Y') THEN
3205: okc_debug.log('1600: calling delete_ancestry', 2);
3206: END IF;
3207: FOR v_Index IN l_clev_tbl_in.FIRST .. l_clev_tbl_in.LAST
3208: LOOP
3209: delete_ancestry(

Line 3218: okc_debug.log('1700: l_return_status = ' || l_return_status, 2);

3214: x_msg_data => l_msg_data,
3215: p_cle_id => l_clev_tbl_in(v_Index).id);
3216:
3217: IF (l_debug = 'Y') THEN
3218: okc_debug.log('1700: l_return_status = ' || l_return_status, 2);
3219: END IF;
3220:
3221: If (l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
3222: x_return_status := l_return_status;

Line 3246: okc_debug.log('1800: x_return_status = ' || x_return_status, 2);

3242: END IF;
3243: END IF;
3244:
3245: IF (l_debug = 'Y') THEN
3246: okc_debug.log('1800: x_return_status = ' || x_return_status, 2);
3247: END IF;
3248:
3249: EXCEPTION
3250: WHEN e_Error THEN

Line 3252: okc_debug.log('1900: WHEN e_Error EXCEPTION', 2);

3248:
3249: EXCEPTION
3250: WHEN e_Error THEN
3251: IF (l_debug = 'Y') THEN
3252: okc_debug.log('1900: WHEN e_Error EXCEPTION', 2);
3253: END IF;
3254: -- notify caller of an error as UNEXPETED error
3255: x_msg_count :=l_msg_count;
3256: x_msg_data:=l_msg_data;

Line 3268: okc_debug.log('1900: WHEN OKC_API.G_EXCEPTION_ERROR EXCEPTION', 2);

3264: '_PVT'
3265: );
3266: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3267: IF (l_debug = 'Y') THEN
3268: okc_debug.log('1900: WHEN OKC_API.G_EXCEPTION_ERROR EXCEPTION', 2);
3269: END IF;
3270: x_msg_count :=l_msg_count;
3271: x_msg_data:=l_msg_data;
3272: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 3283: okc_debug.log('2000: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR EXCEPTION', 2);

3279: '_PVT'
3280: );
3281: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3282: IF (l_debug = 'Y') THEN
3283: okc_debug.log('2000: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR EXCEPTION', 2);
3284: END IF;
3285: x_msg_count :=l_msg_count;
3286: x_msg_data:=l_msg_data;
3287: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

Line 3298: okc_debug.log('2100: WHEN OTHERS EXCEPTION', 2);

3294: '_PVT'
3295: );
3296: WHEN OTHERS THEN
3297: IF (l_debug = 'Y') THEN
3298: okc_debug.log('2100: WHEN OTHERS EXCEPTION', 2);
3299: END IF;
3300: x_msg_count :=l_msg_count;
3301: OKC_API.SET_MESSAGE(
3302: p_app_name => g_app_name,

Line 4813: okc_debug.log('2200: Entered UPDATE_CONTRACT_AMOUNT');

4809:
4810:
4811:
4812: IF (l_debug = 'Y') THEN
4813: okc_debug.log('2200: Entered UPDATE_CONTRACT_AMOUNT');
4814: END IF;
4815:
4816: IF ((p_from_ste_code is NULL) OR (p_to_ste_code is NULL) OR (p_id is null)) THEN
4817: raise FND_API.G_EXC_ERROR;

Line 4821: okc_debug.log('2210: Parameter Values ' ||

4817: raise FND_API.G_EXC_ERROR;
4818: END IF;
4819:
4820: IF (l_debug = 'Y') THEN
4821: okc_debug.log('2210: Parameter Values ' ||
4822: 'p_id - '|| p_id ||
4823: 'p_from_ste_code - '||p_from_ste_code ||
4824: 'p_to_ste_code - '||p_to_ste_code ||
4825: 'p_cle_id- '||p_cle_id );

Line 4831: okc_debug.log('2300: p_cle_id is not null; Change Status called from line/subline level');

4827:
4828: IF (p_cle_id is NOT NULL) THEN -- implies line or subline level
4829:
4830: IF (l_debug = 'Y') THEN
4831: okc_debug.log('2300: p_cle_id is not null; Change Status called from line/subline level');
4832: END IF;
4833:
4834: Open get_line_lvl_csr;
4835: Fetch get_line_lvl_csr into l_cle_id;

Line 4841: okc_debug.log('2310: Updating topline of the subline due to status change of the subline');

4837:
4838: IF (l_cle_id is NOT NULL) THEN --p_cle_id is a subline
4839:
4840: IF (l_debug = 'Y') THEN
4841: okc_debug.log('2310: Updating topline of the subline due to status change of the subline');
4842: END IF;
4843:
4844: Open get_subline_amt_csr(p_cle_id);
4845: Fetch get_subline_amt_csr into l_sub_line_amt;

Line 4851: okc_debug.log('2320: ENTERED -> CANCELLED; Updating price_negotiated and cancelled_amount for the topline of the subline');

4847:
4848: IF ((p_from_ste_code = 'ENTERED' ) AND (p_to_ste_code = 'CANCELLED')) THEN
4849:
4850: IF (l_debug = 'Y') THEN
4851: okc_debug.log('2320: ENTERED -> CANCELLED; Updating price_negotiated and cancelled_amount for the topline of the subline');
4852: END IF;
4853:
4854: Update okc_k_lines_b
4855: set price_negotiated = nvl(price_negotiated,0) - nvl(l_sub_line_amt,0),

Line 4871: okc_debug.log('2330: CANCELLED -> ENTERED; Updating price_negotiated and cancelled_amount for the topline of the subline');

4867: /*Bug:6765336 */
4868: ELSIF ((p_from_ste_code = 'CANCELLED' ) AND (p_to_ste_code = 'ENTERED')) THEN
4869:
4870: IF (l_debug = 'Y') THEN
4871: okc_debug.log('2330: CANCELLED -> ENTERED; Updating price_negotiated and cancelled_amount for the topline of the subline');
4872: END IF;
4873: /*Added for bug:8775250*/
4874: Open get_subline_canamt_csr(p_cle_id);
4875: Fetch get_subline_canamt_csr into l_can_line_amt;

Line 4897: okc_debug.log('2400: Updating the topline');

4893:
4894: ELSE --l_cle_id is NULL --p_cle_id is a top line
4895:
4896: IF (l_debug = 'Y') THEN
4897: okc_debug.log('2400: Updating the topline');
4898: END IF;
4899:
4900: IF ((p_from_ste_code = 'ENTERED') AND (p_to_ste_code = 'CANCELLED')) THEN
4901:

Line 4903: okc_debug.log ('2410: ENTERED -> CANCELLED; Updating price_negotiated and cancelled_amount for topline');

4899:
4900: IF ((p_from_ste_code = 'ENTERED') AND (p_to_ste_code = 'CANCELLED')) THEN
4901:
4902: IF (l_debug = 'Y') THEN
4903: okc_debug.log ('2410: ENTERED -> CANCELLED; Updating price_negotiated and cancelled_amount for topline');
4904: END IF;
4905:
4906: Update okc_k_lines_b
4907: set cancelled_amount = nvl(cancelled_amount, 0) + nvl(price_negotiated, 0),

Line 4933: okc_debug.log ('2420: CANCELLED -> ENTERED; Updating price_negotiated and cancelled_amount for SUBSCRIPTION topline');

4929:
4930: IF (l_lse_id = 46 ) THEN --Checking if line type is of SUBSCRIPTION
4931:
4932: IF (l_debug = 'Y') THEN
4933: okc_debug.log ('2420: CANCELLED -> ENTERED; Updating price_negotiated and cancelled_amount for SUBSCRIPTION topline');
4934: END IF;
4935:
4936: --updating the topline price_negotiated and cancelled_amount for SUBSCRIPTION line type
4937:

Line 4948: okc_debug.log('2430: CANCELLED -> ENTERED; Updating price_negotiated and cancelled_amount for NON-SUBSCRIPTION topline');

4944:
4945: ELSE -- line type is not of SUBSCRIPTION type
4946:
4947: IF (l_debug = 'Y') THEN
4948: okc_debug.log('2430: CANCELLED -> ENTERED; Updating price_negotiated and cancelled_amount for NON-SUBSCRIPTION topline');
4949: END IF;
4950: /*Added for bug:8775250*/
4951: FOR get_subline_cancel_csr_rec IN get_subline_cancel_csr(p_cle_id)
4952: LOOP

Line 4983: okc_debug.log('2500: Updating Header');

4979:
4980: ELSE -- p_cle_id is NULL --implies action is taken on header
4981:
4982: IF (l_debug = 'Y') THEN
4983: okc_debug.log('2500: Updating Header');
4984: END IF;
4985:
4986: IF ((p_from_ste_code = 'ENTERED') AND (p_to_ste_code = 'CANCELLED')) THEN
4987:

Line 4989: okc_debug.log('2510: ENTERED -> CANCELLED; Updating price_negotiated and cancelled_amount for all toplines of contract');

4985:
4986: IF ((p_from_ste_code = 'ENTERED') AND (p_to_ste_code = 'CANCELLED')) THEN
4987:
4988: IF (l_debug = 'Y') THEN
4989: okc_debug.log('2510: ENTERED -> CANCELLED; Updating price_negotiated and cancelled_amount for all toplines of contract');
4990: END IF;
4991:
4992: -- updating price_negotiated and cancelled_amount for all the top lines of the contract
4993:

Line 5018: okc_debug.log('2520: CANCELLED -> ENTERED; Updating price_negotiated and cancelled_amount for all toplines of contract');

5014:
5015: ELSIF ((p_from_ste_code = 'CANCELLED' ) AND (p_to_ste_code = 'ENTERED')) THEN
5016:
5017: IF (l_debug = 'Y') THEN
5018: okc_debug.log('2520: CANCELLED -> ENTERED; Updating price_negotiated and cancelled_amount for all toplines of contract');
5019: END IF;
5020: /*Added for bug:8775250*/
5021: FOR get_lines_id_rec IN get_lines_id(p_id)
5022: LOOP

Line 5079: okc_debug.log('2600: Updating header estimated_amount and cancelled_amount');

5075:
5076: END IF; --p_cle_id is NULL
5077:
5078: IF (l_debug = 'Y') THEN
5079: okc_debug.log('2600: Updating header estimated_amount and cancelled_amount');
5080: END IF;
5081:
5082: -- updating estimated_amount, cancelled_amount for header level of the contract due to change in the status of line/subline/contract
5083:

Line 5104: okc_debug.log('2700: Leaving OKC_CONTRACT_PVT, one or more mandatory parameters missing :FND_API.G_EXC_ERROR');

5100: WHEN FND_API.G_EXC_ERROR THEN
5101: x_return_status := FND_API.G_RET_STS_ERROR;
5102:
5103: IF (l_debug = 'Y') THEN
5104: okc_debug.log('2700: Leaving OKC_CONTRACT_PVT, one or more mandatory parameters missing :FND_API.G_EXC_ERROR');
5105: END IF;
5106:
5107: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5108: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 5111: okc_debug.log('2710: Leaving OKC_CONTRACT_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '|| SQLERRM);

5107: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5108: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5109:
5110: IF (l_debug = 'Y') THEN
5111: okc_debug.log('2710: Leaving OKC_CONTRACT_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '|| SQLERRM);
5112: END IF;
5113:
5114: WHEN OTHERS THEN
5115: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 5118: okc_debug.log('2720: Leaving OKC_CONTRACT_PVT because of EXCEPTION: '||sqlerrm);

5114: WHEN OTHERS THEN
5115: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5116:
5117: IF (l_debug = 'Y') THEN
5118: okc_debug.log('2720: Leaving OKC_CONTRACT_PVT because of EXCEPTION: '||sqlerrm);
5119: END IF;
5120:
5121: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
5122: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name, SQLERRM );