DBA Data[Home] [Help]

APPS.PA_AGREEMENT_PVT dependencies on PA_AGREEMENT_UTILS

Line 349: -- pa_agreement_utils.check_valid_customer

345: --Description: This function can be used to check IF it is OK to create the
346: -- agreement.
347: --
348: --Called subprograms:
349: -- pa_agreement_utils.check_valid_customer
350: -- pa_agreement_utils.check_valid_type
351: -- pa_agreement_utils.check_valid_agreement_num
352: -- pa_agreement_utils.check_valid_term_id
353: -- pa_agreement_pvt.check_valid_template_flag

Line 350: -- pa_agreement_utils.check_valid_type

346: -- agreement.
347: --
348: --Called subprograms:
349: -- pa_agreement_utils.check_valid_customer
350: -- pa_agreement_utils.check_valid_type
351: -- pa_agreement_utils.check_valid_agreement_num
352: -- pa_agreement_utils.check_valid_term_id
353: -- pa_agreement_pvt.check_valid_template_flag
354: -- pa_agreement_pvt.check_valid_revenue_limit_flag

Line 351: -- pa_agreement_utils.check_valid_agreement_num

347: --
348: --Called subprograms:
349: -- pa_agreement_utils.check_valid_customer
350: -- pa_agreement_utils.check_valid_type
351: -- pa_agreement_utils.check_valid_agreement_num
352: -- pa_agreement_utils.check_valid_term_id
353: -- pa_agreement_pvt.check_valid_template_flag
354: -- pa_agreement_pvt.check_valid_revenue_limit_flag
355: -- pa_agreement_utils.check_valid_owned_by_person_id

Line 352: -- pa_agreement_utils.check_valid_term_id

348: --Called subprograms:
349: -- pa_agreement_utils.check_valid_customer
350: -- pa_agreement_utils.check_valid_type
351: -- pa_agreement_utils.check_valid_agreement_num
352: -- pa_agreement_utils.check_valid_term_id
353: -- pa_agreement_pvt.check_valid_template_flag
354: -- pa_agreement_pvt.check_valid_revenue_limit_flag
355: -- pa_agreement_utils.check_valid_owned_by_person_id
356: -- pa_agreement_utils.check_unique_agreement

Line 355: -- pa_agreement_utils.check_valid_owned_by_person_id

351: -- pa_agreement_utils.check_valid_agreement_num
352: -- pa_agreement_utils.check_valid_term_id
353: -- pa_agreement_pvt.check_valid_template_flag
354: -- pa_agreement_pvt.check_valid_revenue_limit_flag
355: -- pa_agreement_utils.check_valid_owned_by_person_id
356: -- pa_agreement_utils.check_unique_agreement
357: --
358: --
359: --History:

Line 356: -- pa_agreement_utils.check_unique_agreement

352: -- pa_agreement_utils.check_valid_term_id
353: -- pa_agreement_pvt.check_valid_template_flag
354: -- pa_agreement_pvt.check_valid_revenue_limit_flag
355: -- pa_agreement_utils.check_valid_owned_by_person_id
356: -- pa_agreement_utils.check_unique_agreement
357: --
358: --
359: --History:
360: -- 25-MAR-2000 Rakesh Raghavan Created.

Line 397: IF pa_agreement_utils.check_valid_customer

393: -- VALIDATE THE PARAMETERS
394:
395: -- Customer Number
396: --dbms_output.put_line('Check for Valid Customer Id');
397: IF pa_agreement_utils.check_valid_customer
398: (p_customer_id => p_customer_id) = 'N'
399: THEN
400: --dbms_output.put_line('Invalid Customer Id');
401: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 419: IF pa_agreement_utils.check_valid_type

415: END IF;
416:
417: -- Agreement Type
418: --dbms_output.put_line('Check for valid Agreement Type');
419: IF pa_agreement_utils.check_valid_type
420: (p_agreement_type => p_agreement_type) = 'N'
421: THEN
422: --dbms_output.put_line('Invalid Agreement Type');
423: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 442: IF pa_agreement_utils.check_valid_agreement_num

438:
439: /* NOT REQUIRED - TEST
440: -- Agreement Number
441: --dbms_output.put_line('Check for Agreement Number');
442: IF pa_agreement_utils.check_valid_agreement_num
443: (p_agreement_num => p_agreement_num) = 'N'
444: THEN
445: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
446: THEN

Line 465: IF pa_agreement_utils.check_valid_term_id

461: */
462:
463: -- Term Name
464: --dbms_output.put_line('Check for valid Term Name');
465: IF pa_agreement_utils.check_valid_term_id
466: (p_term_id => p_term_id) = 'N'
467: THEN
468: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
469: THEN

Line 535: IF pa_agreement_utils.check_valid_owned_by_person_id

531:
532:
533: -- Owned By Person Id
534: --dbms_output.put_line('Check for valid owned by person id');
535: IF pa_agreement_utils.check_valid_owned_by_person_id
536: (p_owned_by_person_id => p_owned_by_person_id) = 'N'
537: THEN
538: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
539: THEN

Line 557: IF pa_agreement_utils.check_unique_agreement

553: END IF;
554:
555: -- Unique Agreement
556: --dbms_output.put_line('Check for Unique agreement');
557: IF pa_agreement_utils.check_unique_agreement
558: (p_agreement_num => p_agreement_num
559: ,p_agreement_type => p_agreement_type
560: ,p_customer_id => p_customer_id) = 'N'
561: THEN

Line 586: IF pa_agreement_utils.check_valid_owning_orgn_id

582:
583: IF (p_owning_organization_id is not null )and
584: (p_owning_organization_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM )then /* Bug 2701579 */
585:
586: IF pa_agreement_utils.check_valid_owning_orgn_id
587: (p_owning_organization_id => p_owning_organization_id
588: ) = 'N'
589: THEN
590: --dbms_output.put_line('Invalid owning organization_id ');

Line 611: IF pa_agreement_utils.check_valid_agr_curr_code

607:
608: IF (p_agreement_currency_code is not null ) AND
609: (p_agreement_currency_code <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR) then /* Bug 2701579 */
610:
611: IF pa_agreement_utils.check_valid_agr_curr_code
612: (p_agreement_currency_code => p_agreement_currency_code
613: ) = 'N'
614: THEN
615: --dbms_output.put_line('Invalid agreement_currency_code ');

Line 835: IF pa_agreement_utils.check_valid_customer

831: --dbms_output.put_line('Check for Valid Customer Id');
832: IF (p_customer_id IS NOT NULL AND p_customer_id <>
833: PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
834: AND p_customer_id <> l_agrcur.customer_id) THEN /* Bug 6602451 */
835: IF pa_agreement_utils.check_valid_customer
836: (p_customer_id => p_customer_id) = 'N'
837: THEN
838: --dbms_output.put_line('Invalid Customer Id');
839: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 863: IF pa_agreement_utils.check_valid_type

859: -- Agreement Type
860: --dbms_output.put_line('Check for valid Agreement Type');
861: IF (p_agreement_type IS NOT NULL AND p_agreement_type <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
862: AND p_agreement_type <> l_agrcur.agreement_type) THEN /* Bug 6602451 */
863: IF pa_agreement_utils.check_valid_type
864: (p_agreement_type => p_agreement_type) = 'N'
865: THEN
866: --dbms_output.put_line('Invalid Agreement Type');
867: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 890: IF pa_agreement_utils.check_valid_agreement_num

886:
887: /* NOT REQUIRED
888: -- Agreement Number
889: --dbms_output.put_line('Check for Agreement Number');
890: IF pa_agreement_utils.check_valid_agreement_num
891: (p_agreement_num => p_agreement_num) = 'N'
892: THEN
893: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
894: THEN

Line 915: IF pa_agreement_utils.check_valid_term_id

911: -- Term Name
912: --dbms_output.put_line('Check for valid Term Name');
913: IF (p_term_id IS NOT NULL AND p_term_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
914: AND p_term_id <> l_agrcur.term_id) THEN /* Bug 6602451 */
915: IF pa_agreement_utils.check_valid_term_id
916: (p_term_id => p_term_id) = 'N'
917: THEN
918: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
919: THEN

Line 995: IF pa_agreement_utils.check_valid_owned_by_person_id

991: -- Owned By Person Id
992: --dbms_output.put_line('Check for valid owned by person id');
993: IF (p_owned_by_person_id IS NOT NULL AND p_owned_by_person_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
994: AND p_owned_by_person_id <> l_agrcur.owned_by_person_id) THEN /* Bug 6602451 */
995: IF pa_agreement_utils.check_valid_owned_by_person_id
996: (p_owned_by_person_id => p_owned_by_person_id) = 'N'
997: THEN
998: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
999: THEN

Line 1021: IF pa_agreement_utils.check_fund_rev_amt

1017: END IF;
1018:
1019: /* NOT REQUIRED
1020: -- Check Funding Revenue Amount
1021: IF pa_agreement_utils.check_fund_rev_amt
1022: ( p_funding_id => p_funding_id) = 'N'
1023: THEN
1024: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1025: THEN

Line 1232: IF pa_agreement_utils.check_revenue_limit

1228:
1229: -- Check Revenue Limit
1230: IF (UPPER(p_revenue_limit_flag)='Y') THEN /* IF condition added for bug 2862024 */
1231:
1232: IF pa_agreement_utils.check_revenue_limit
1233: (p_agreement_id => p_agreement_id)= 'N'
1234: THEN
1235: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1236: THEN

Line 1253: /*IF pa_agreement_utils.check_fund_allocated

1249: END IF;
1250:
1251: END IF;/* 2862024 */
1252: -- Check Fund Allocated
1253: /*IF pa_agreement_utils.check_fund_allocated
1254: (p_agreement_id => p_agreement_id)= 'N' Federal */
1255: /* Commeted for bug 6853994
1256: IF (l_agm_amt < l_tot_fund)-- bug 5685032 changed to < from <=
1257: THEN

Line 1281: IF pa_agreement_utils.check_valid_owning_orgn_id

1277: /* IF p_owning_organization_id is not null then Commenetd for Bug 6602451 and added the below IF condition*/
1278:
1279: IF (p_owning_organization_id IS NOT NULL AND p_owning_organization_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
1280: AND p_owning_organization_id <> l_agrcur.owning_organization_id) THEN /* Bug 6602451 */
1281: IF pa_agreement_utils.check_valid_owning_orgn_id
1282: (p_owning_organization_id => p_owning_organization_id
1283: ) = 'N'
1284: THEN
1285: --dbms_output.put_line('Invalid owning organization_id ');

Line 1311: IF pa_agreement_utils.check_valid_agr_curr_code

1307:
1308: IF (p_agreement_currency_code IS NOT NULL AND p_agreement_currency_code <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
1309: AND p_agreement_currency_code <> l_agrcur.agreement_currency_code) THEN /* Bug 6602451 */
1310: -- Start of Bugfix 2442176
1311: IF pa_agreement_utils.check_valid_agr_curr_code
1312: (p_agreement_currency_code => p_agreement_currency_code
1313: ) ='Y' THEN
1314: IF l_return = 'Y' THEN
1315: BEGIN

Line 1344: /* Comment for bug 2442176 : IF pa_agreement_utils.check_valid_agr_curr_code

1340: l_return :='Y';
1341: END;
1342: end if;
1343: ELSE
1344: /* Comment for bug 2442176 : IF pa_agreement_utils.check_valid_agr_curr_code
1345: (p_agreement_currency_code => p_agreement_currency_code
1346: ) = 'N'
1347: THEN */
1348: -- End of Changes for Bug 2442176

Line 1396: IF pa_agreement_utils.check_invoice_limit

1392: END IF;
1393: l_RETURN:='N';
1394:
1395: ELSIF UPPER(p_invoice_limit_flag)='Y' THEN /* Added for bug 2862024 */
1396: IF pa_agreement_utils.check_invoice_limit
1397: (p_agreement_id => p_agreement_id)= 'N' THEN
1398:
1399: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1400: pa_interface_utils_pub.map_new_amg_msg

Line 1699: IF ( ( pa_agreement_utils.check_valid_project

1695: -- Check Valid Project
1696:
1697: -- NOT REQUIRED
1698: --dbms_output.put_line('Check valid project');
1699: IF ( ( pa_agreement_utils.check_valid_project
1700: (p_customer_id => p_customer_id,
1701: p_project_id => p_project_id,
1702: p_agreement_id => p_agreement_id) = 'N' )/*Federal*/
1703: OR

Line 1704: ( pa_agreement_utils.check_proj_agr_fund_ok

1700: (p_customer_id => p_customer_id,
1701: p_project_id => p_project_id,
1702: p_agreement_id => p_agreement_id) = 'N' )/*Federal*/
1703: OR
1704: ( pa_agreement_utils.check_proj_agr_fund_ok
1705: (p_agreement_id => p_agreement_id,
1706: p_project_id => p_project_id) = 'N' ) /* added OR condition Bug2756047 */
1707: )
1708: THEN

Line 1725: IF pa_agreement_utils.check_valid_customer

1721: END IF;
1722: l_RETURN:='N';
1723: END IF;
1724: --dbms_output.put_line('Check valid customer');
1725: IF pa_agreement_utils.check_valid_customer
1726: (p_customer_id => p_customer_id) = 'N'
1727: THEN
1728: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1729: THEN

Line 1748: IF pa_agreement_utils.check_valid_task

1744:
1745: -- Check Valid Task
1746: IF p_task_id IS NOT NULL and p_task_id <> FND_API.G_MISS_NUM THEN
1747: --dbms_output.put_line('Check valid task');
1748: IF pa_agreement_utils.check_valid_task
1749: (p_project_id => p_project_id
1750: ,p_task_id => p_task_id) = 'N'
1751: THEN
1752: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 1884: l_funding_lvl := pa_agreement_utils.check_proj_task_lvl_funding_fp

1880: RAISE FND_API.G_EXC_ERROR;
1881: END IF;
1882:
1883: If l_plan_type_id is not null then
1884: l_funding_lvl := pa_agreement_utils.check_proj_task_lvl_funding_fp
1885: (p_project_id => p_project_id
1886: ,p_task_id => p_task_id
1887: ,p_agreement_id => p_agreement_id);
1888: else commented for bug 2729975*/

Line 1889: l_funding_lvl := pa_agreement_utils.check_proj_task_lvl_funding

1885: (p_project_id => p_project_id
1886: ,p_task_id => p_task_id
1887: ,p_agreement_id => p_agreement_id);
1888: else commented for bug 2729975*/
1889: l_funding_lvl := pa_agreement_utils.check_proj_task_lvl_funding
1890: (p_project_id => p_project_id
1891: ,p_task_id => p_task_id
1892: ,p_agreement_id => p_agreement_id);
1893: /*end if; commented for bug 2729975*/

Line 1985: l_funding_lvl := pa_agreement_utils.check_proj_task_lvl_funding_fp

1981: RAISE FND_API.G_EXC_ERROR;
1982: END IF;
1983:
1984: If l_plan_type_id is not null then
1985: l_funding_lvl := pa_agreement_utils.check_proj_task_lvl_funding_fp
1986: (p_project_id => p_project_id
1987: ,p_task_id => p_task_id
1988: ,p_agreement_id => p_agreement_id);
1989:

Line 2102: IF pa_agreement_utils.check_budget_type (

2098: -- VALIDATE THE INCOMING PARAMETERS
2099:
2100: -- Check Valid Project
2101:
2102: IF pa_agreement_utils.check_budget_type (
2103: p_funding_id => p_funding_id) = 'N' THEN
2104:
2105: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2106: THEN

Line 2125: IF pa_agreement_utils.check_valid_project

2121:
2122: /*For bug 3066711 Changed the message code */
2123:
2124: /*Federal*/
2125: IF pa_agreement_utils.check_valid_project
2126: (p_customer_id => p_customer_id,
2127: p_project_id => p_project_id,
2128: p_agreement_id => p_agreement_id) = 'N'
2129: THEN

Line 2147: IF pa_agreement_utils.check_valid_customer

2143: l_RETURN:='N';
2144: RETURN(l_RETURN);
2145: END IF;
2146:
2147: IF pa_agreement_utils.check_valid_customer
2148: (p_customer_id => p_customer_id) = 'N'
2149: THEN
2150: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2151: THEN

Line 2169: IF pa_agreement_utils.check_valid_task

2165: END IF;
2166:
2167: -- Check Valid Task
2168: IF p_task_id IS NOT NULL and p_task_id <> FND_API.G_MISS_NUM THEN
2169: IF pa_agreement_utils.check_valid_task
2170: (p_project_id => p_project_id
2171: ,p_task_id => p_task_id) = 'N'
2172: THEN
2173: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 2272: l_check_proj_task_lvl_funding := pa_agreement_utils.check_proj_task_lvl_funding_fp

2268: RAISE FND_API.G_EXC_ERROR;
2269: END IF;
2270:
2271: If l_plan_type_id is not null then
2272: l_check_proj_task_lvl_funding := pa_agreement_utils.check_proj_task_lvl_funding_fp
2273: (p_project_id => p_project_id
2274: ,p_task_id => p_task_id
2275: ,p_agreement_id => p_agreement_id); commented for bug 2729975*/
2276: /*end of change for finplan impact on billing*/

Line 2278: l_check_proj_task_lvl_funding := pa_agreement_utils.check_proj_task_lvl_funding

2274: ,p_task_id => p_task_id
2275: ,p_agreement_id => p_agreement_id); commented for bug 2729975*/
2276: /*end of change for finplan impact on billing*/
2277: --else
2278: l_check_proj_task_lvl_funding := pa_agreement_utils.check_proj_task_lvl_funding
2279: (p_project_id => p_project_id
2280: ,p_task_id => p_task_id
2281: ,p_agreement_id => p_agreement_id);
2282: --end if;

Line 2371: l_check_proj_task_lvl_funding := pa_agreement_utils.check_proj_task_lvl_funding_fp

2367: RAISE FND_API.G_EXC_ERROR;
2368: END IF;
2369:
2370: If l_plan_type_id is not null then
2371: l_check_proj_task_lvl_funding := pa_agreement_utils.check_proj_task_lvl_funding_fp
2372: (p_project_id => p_project_id
2373: ,p_task_id => p_task_id
2374: ,p_agreement_id => p_agreement_id);
2375: IF l_check_proj_task_lvl_funding='A' THEN

Line 2476: --dbms_output.put_line('Calling: pa_agreement_utils.check_budget_type');

2472: BEGIN
2473: --dbms_output.put_line('Inside" PA_AGREEMENT_PVT.CHECK_DELETE_FUNDING_OK');
2474:
2475: -- Check Budget Type
2476: --dbms_output.put_line('Calling: pa_agreement_utils.check_budget_type');
2477: IF pa_agreement_utils.check_budget_type
2478: (p_funding_id => p_funding_id) = 'N'
2479: THEN
2480: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 2477: IF pa_agreement_utils.check_budget_type

2473: --dbms_output.put_line('Inside" PA_AGREEMENT_PVT.CHECK_DELETE_FUNDING_OK');
2474:
2475: -- Check Budget Type
2476: --dbms_output.put_line('Calling: pa_agreement_utils.check_budget_type');
2477: IF pa_agreement_utils.check_budget_type
2478: (p_funding_id => p_funding_id) = 'N'
2479: THEN
2480: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2481: THEN

Line 2496: --dbms_output.put_line('Calling: pa_agreement_utils.check_revenue_limit');

2492: END IF;
2493: l_RETURN:='N';
2494: END IF;
2495:
2496: --dbms_output.put_line('Calling: pa_agreement_utils.check_revenue_limit');
2497: IF pa_agreement_utils.check_revenue_limit
2498: (p_agreement_id => p_agreement_id) = 'N'
2499: THEN
2500: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 2497: IF pa_agreement_utils.check_revenue_limit

2493: l_RETURN:='N';
2494: END IF;
2495:
2496: --dbms_output.put_line('Calling: pa_agreement_utils.check_revenue_limit');
2497: IF pa_agreement_utils.check_revenue_limit
2498: (p_agreement_id => p_agreement_id) = 'N'
2499: THEN
2500: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2501: THEN