[Home] [Help]
345: -- This procedure is dependent on the Contracts group API OKC_TERMS_QA_GRP and
346: -- calls procedure qa_doc. It also subtypes the qa_result_tbl_type to store
347: -- returned error messages.
348: --Modifies:
349: -- po_online_report_text_gt
350: --Locks:
351: -- None.
352: --Function:
353: -- This procedure is used to validate contract articles and deliverables and is
492: l_progress := '002';
493: l_row_index := l_qa_result_tbl.FIRST;
494: LOOP
495: EXIT WHEN l_row_index IS NULL;
496: INSERT INTO po_online_report_text_gt
497: (online_report_id
498: ,last_updated_by
499: ,last_update_date
500: ,created_by
657: IF l_enable_epls = 'Y' AND l_eligibility = 'NOTRUN' THEN
658:
659: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_VENDOR_ELIGIBILITY_NOTRUN');
660:
661: INSERT INTO po_online_report_text_gt
662: (online_report_id
663: ,last_updated_by
664: ,last_update_date
665: ,created_by
692: IF l_enable_epls = 'Y' AND l_eligibility = 'INELIGIBILE' THEN
693:
694: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_VENDOR_ELIGIBILITY_INVALID');
695:
696: INSERT INTO po_online_report_text_gt
697: (online_report_id
698: ,last_updated_by
699: ,last_update_date
700: ,created_by
852: IF l_enable_wdol = 'Y' AND l_wdol_attachment_exists = 'N' AND l_not_par = 'Y' THEN
853:
854: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_WDOL_NOTRUN');
855:
856: INSERT INTO po_online_report_text_gt
857: (online_report_id
858: ,last_updated_by
859: ,last_update_date
860: ,created_by
1021: IF l_enable_eda = 'Y' AND l_validate_pds_status = 'N' AND l_not_par = 'Y' THEN
1022:
1023: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_VALIDATE_PDS_NOTRUN');
1024:
1025: INSERT INTO po_online_report_text_gt
1026: (online_report_id
1027: ,last_updated_by
1028: ,last_update_date
1029: ,created_by
1398: PO_DEBUG.debug_stmt(l_log_head || l_api_name, l_progress, 'SGD validation starts');
1399:
1400: SELECT Nvl(Max(SEQUENCE), 0) + 1
1401: INTO p_sequence
1402: FROM po_online_report_text_gt
1403: WHERE online_report_id = x_online_report_id;
1404: PO_DEBUG.debug_stmt(l_log_head || l_api_name, l_progress, 'p_sequence' ||p_sequence);
1405:
1406: validate_genchangedesc(p_draft_id => p_draft_id
1535:
1536: PO_DEBUG.debug_stmt(l_log_head || l_api_name, l_progress, 'l_print_doc_type :' || l_print_doc_type);
1537:
1538: IF ( (p_draft_id <> -1) AND (l_is_clm_doc = 'Y') ) THEN --Mod Commercialization
1539: INSERT INTO po_online_report_text_gt
1540: (
1541: online_report_id,
1542: last_update_login,
1543: last_updated_by,
1578: )
1579: AND Nvl(phmv.draft_type, '*') <> 'PAR'; --
1580:
1581: ELSIF (l_is_clm_doc = 'Y') THEN
1582: INSERT INTO po_online_report_text_gt
1583: (
1584: online_report_id,
1585: last_update_login,
1586: last_updated_by,
1655: END IF;
1656:
1657: --Submission check to validate total amount in UDA = total amount on the line
1658: /*CLM Phase-2 Changes*/
1659: INSERT INTO po_online_report_text_gt
1660: ( online_report_id,
1661: last_update_login,
1662: last_updated_by,
1663: last_update_date,
1706:
1707: PO_DEBUG.debug_stmt(l_log_head || l_api_name, l_progress,
1708: 'No of errors logged into the error report table for PO_PRICING_MISMATCH '||sql%rowcount);
1709:
1710: INSERT INTO po_online_report_text_gt
1711: ( online_report_id,
1712: last_update_login,
1713: last_updated_by,
1714: last_update_date,
1832:
1833: EXCEPTION
1834:
1835: WHEN No_Data_Found THEN
1836: INSERT INTO po_online_report_text_gt
1837: (
1838: online_report_id,
1839: last_update_login,
1840: last_updated_by,
1893:
1894: IF l_failure THEN
1895: FOR msg_counter IN 1 ..l_msg_count
1896: LOOP
1897: INSERT INTO po_online_report_text_gt
1898: (
1899: online_report_id,
1900: last_update_login,
1901: last_updated_by,
1975: IF (l_reporting_method <> 'EXEMPT' AND l_approved_without_reporting <> '1') THEN
1976: IF (l_reporting_method = 'NONE') OR
1977: (l_reporting_method = 'SINGLE_CAR' AND
1978: l_car_status = 'NOT_REPORTED') THEN
1979: INSERT INTO po_online_report_text_gt
1980: (
1981: online_report_id,
1982: last_update_login,
1983: last_updated_by,
2009: 'W'
2010: );
2011: ELSIF (l_reporting_method = 'SINGLE_CAR' AND
2012: l_car_status = 'DRAFT') THEN
2013: INSERT INTO po_online_report_text_gt
2014: (
2015: online_report_id,
2016: last_update_login,
2017: last_updated_by,
3069: SELECT count(text_line),
3070: COUNT(DECODE(message_type, 'W', 'W', NULL))
3071: INTO l_num_messages,
3072: l_num_warnings
3073: FROM po_online_report_text_gt
3074: WHERE online_report_id = l_online_report_id;
3075:
3076:
3077: l_progress := '026';
3124: distribution_num,
3125: sequence,
3126: text_line,
3127: message_type --
3128: FROM po_online_report_text_gt
3129: WHERE online_report_id = x_online_report_id;
3130:
3131: select count(*) into l_num_messages from po_online_report_text_gt where online_report_id = x_online_report_id;
3132:
3127: message_type --
3128: FROM po_online_report_text_gt
3129: WHERE online_report_id = x_online_report_id;
3130:
3131: select count(*) into l_num_messages from po_online_report_text_gt where online_report_id = x_online_report_id;
3132:
3133: l_progress := '027';
3134:
3135: -- SQL What: Gets the relevent messages from global temp table
3143: x_doc_check_error_record.shipment_num,
3144: x_doc_check_error_record.distribution_num,
3145: x_doc_check_error_record.message_name,
3146: x_doc_check_error_record.message_type --
3147: FROM po_online_report_text_gt
3148: WHERE online_report_id = x_online_report_id;
3149:
3150: ELSE
3151: x_sub_check_status := FND_API.G_RET_STS_SUCCESS;
3324:
3325: --Done with CHECKS, now prepare OUT parameters to pass back
3326: SELECT count(text_line)
3327: INTO l_num_errors
3328: FROM po_online_report_text_gt
3329: WHERE online_report_id = l_online_report_id;
3330:
3331: l_progress := '008';
3332:
3367: shipment_num,
3368: distribution_num,
3369: sequence,
3370: text_line
3371: FROM po_online_report_text_gt
3372: WHERE online_report_id = x_online_report_id;
3373:
3374: l_progress := '009';
3375:
3500:
3501: -- Check 1: Each Requisition Header must have atleast one line
3502: -- PO_SUB_REQ_HEADER_NO_LINES
3503: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REQ_HEADER_NO_LINES');
3504: INSERT INTO po_online_report_text_gt(online_report_id,
3505: last_update_login,
3506: last_updated_by,
3507: last_update_date,
3508: created_by,
3553: l_clm_req := PO_CLM_INTG_GRP.is_clm_document( p_doc_type => 'REQUISITION',
3554: p_document_id => p_document_id );
3555:
3556: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REQ_LINE_NO_DIST');
3557: INSERT INTO po_online_report_text_gt(online_report_id,
3558: last_update_login,
3559: last_updated_by,
3560: last_update_date,
3561: created_by,
3652: l_rowCount(i) := i;
3653: END LOOP;
3654:
3655: FORALL i IN 1..l_line_num.COUNT
3656: INSERT INTO po_online_report_text_gt (online_report_id,
3657: last_update_login,
3658: last_updated_by,
3659: last_update_date,
3660: created_by,
3718: -- Check 4:Lines with SOURCE type as INVENTORY can have one only one dist
3719: -- PO_SUB_REQ_SOURCE_ONE_DIST
3720:
3721: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REQ_SOURCE_ONE_DIST');
3722: INSERT INTO po_online_report_text_gt(online_report_id,
3723: last_update_login,
3724: last_updated_by,
3725: last_update_date,
3726: created_by,
3766:
3767: -- Check 5: Requistion Rate cannot be NULL if using a foreign currency vendor
3768: -- PO_SUB_REQ_RATE_NULL
3769: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REQ_RATE_NULL');
3770: INSERT INTO po_online_report_text_gt(online_report_id,
3771: last_update_login,
3772: last_updated_by,
3773: last_update_date,
3774: created_by,
3854:
3855: -- Check 7: Requisitions cannot have ATO/CTO model items (Bug 3362369)
3856: -- PO_ATO_ITEM_NA
3857: l_textline := FND_MESSAGE.GET_STRING('PO','PO_ATO_ITEM_NA');
3858: INSERT INTO po_online_report_text_gt(online_report_id,
3859: last_update_login,
3860: last_updated_by,
3861: last_update_date,
3862: created_by,
3934: l_tax_message := fnd_message.get_string('PO','PO_TAX_CALCULATION')||' : ' ;
3935:
3936: FOR i IN 1..po_tax_interface_pvt.G_TAX_ERRORS_TBL.MESSAGE_TEXT.COUNT
3937: LOOP
3938: INSERT INTO po_online_report_text_gt
3939: (
3940: online_report_id,
3941: last_update_login,
3942: last_updated_by,
4112: --< Bug 3422733 > Only do this check if the BPA is not ON HOLD. The ON HOLD
4113: -- check is done later. Avoids showing 2 msgs for BPA that is ON HOLD.
4114:
4115: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REL_PA_APPROVED');
4116: INSERT INTO po_online_report_text_gt(online_report_id,
4117: last_update_login,
4118: last_updated_by,
4119: last_update_date,
4120: created_by,
4169: --CHANGED THE WHERE CLAUSE TO EXCEEDE THE END DATE BY THE TOLERANCE VALUE
4170:
4171:
4172: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REL_PA_EXPIRED');
4173: INSERT INTO po_online_report_text_gt(online_report_id,
4174: last_update_login,
4175: last_updated_by,
4176: last_update_date,
4177: created_by,
4217: -- on hold
4218: -- PO_SUB_REL_PA_ON_HOLD
4219:
4220: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REL_PA_ON_HOLD');
4221: INSERT INTO po_online_report_text_gt(online_report_id,
4222: last_update_login,
4223: last_updated_by,
4224: last_update_date,
4225: created_by,
4263: -- Check 4: Associated Purchase Agreement's supplier should not be on hold
4264: -- PO_SUB_REL_VENDOR_ON_HOLD
4265:
4266: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REL_VENDOR_ON_HOLD');
4267: INSERT INTO po_online_report_text_gt(online_report_id,
4268: last_update_login,
4269: last_updated_by,
4270: last_update_date,
4271: created_by,
4312: -- Check 5: Every Release must have atleast one shipment
4313: -- PO_SUB_REL_NO_SHIP
4314:
4315: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REL_NO_SHIP');
4316: INSERT INTO po_online_report_text_gt(online_report_id,
4317: last_update_login,
4318: last_updated_by,
4319: last_update_date,
4320: created_by,
4382: l_rowCount(i) := i;
4383: END LOOP;
4384:
4385: FORALL i IN 1..l_line_num.COUNT
4386: INSERT INTO po_online_report_text_gt (
4387: online_report_id,
4388: last_update_login,
4389: last_updated_by,
4390: last_update_date,
4438: -- Bug 3177525: This check should not be done if allow_price_override_flag
4439: -- is 'N' because the user can never modify the release price/amount; it is
4440: -- automatically defaulted.
4441:
4442: INSERT INTO po_online_report_text_gt(online_report_id,
4443: last_update_login,
4444: last_updated_by,
4445: last_update_date,
4446: created_by,
4556: l_rowCount(i) := i;
4557: END LOOP;
4558:
4559: FORALL i IN 1..l_line_num.COUNT
4560: INSERT INTO po_online_report_text_gt(online_report_id,
4561: last_update_login,
4562: last_updated_by,
4563: last_update_date,
4564: created_by,
4615: -- Check 8: All Release shipments should have atleast one distribution
4616: -- PO_SUB_REL_SHIP_NO_DIST
4617:
4618: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REL_SHIP_NO_DIST');
4619: INSERT INTO po_online_report_text_gt(online_report_id,
4620: last_update_login,
4621: last_updated_by,
4622: last_update_date,
4623: created_by,
4667: -- currency vendor. We are using foreign currency if the currency on PO
4668: -- Header does not match Set of Books currency
4669: -- PO_SUB_REL_RATE_NULL
4670: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REL_RATE_NULL');
4671: INSERT INTO po_online_report_text_gt(online_report_id,
4672: last_update_login,
4673: last_updated_by,
4674: last_update_date,
4675: created_by,
4726: -- minimum release amount
4727: -- PO_SUB_REL_AMT_LESS_MINREL_AMT
4728:
4729: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REL_AMT_LESS_MINREL_AMT');
4730: INSERT INTO po_online_report_text_gt(online_report_id,
4731: last_update_login,
4732: last_updated_by,
4733: last_update_date,
4734: created_by,
4869: --
4870:
4871:
4872: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REL_AMT_GRT_LIMIT_AMT');
4873: INSERT INTO po_online_report_text_gt (online_report_id,
4874: last_update_login,
4875: last_updated_by,
4876: last_update_date,
4877: created_by,
4967: l_rowCount(i) := i;
4968: END LOOP;
4969:
4970: FORALL i IN 1..l_line_num.COUNT
4971: INSERT INTO po_online_report_text_gt(online_report_id,
4972: last_update_login,
4973: last_updated_by,
4974: last_update_date,
4975: created_by,
5050: --'Shipment#
5051: -- is disabled
5052: -- Bug #1630662
5053: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_UOM_CLASS_CONVERSION');
5054: INSERT INTO po_online_report_text_gt(online_report_id,
5055: last_update_login,
5056: last_updated_by,
5057: last_update_date,
5058: created_by,
5113: atlease one approved ASL either at item level or at category level
5114: if there is no item ASL*/
5115:
5116: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_ITEM_NOT_APPROVED_REL');
5117: INSERT INTO po_online_report_text_gt(online_report_id,
5118: last_update_login,
5119: last_updated_by,
5120: last_update_date,
5121: created_by,
5215: time items as there will not be any record
5216: */
5217:
5218: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_ITEM_ASL_DEBARRED_REL');
5219: INSERT INTO po_online_report_text_gt(online_report_id,
5220: last_update_login,
5221: last_updated_by,
5222: last_update_date,
5223: created_by,
5298: -- Check 17: ATO/CTO Model items not allowed on Releases (Bug 3362369)
5299:
5300: l_textline := FND_MESSAGE.get_string('PO', 'PO_ATO_ITEM_NA');
5301:
5302: INSERT INTO po_online_report_text_gt(
5303: online_report_id,
5304: last_update_login,
5305: last_updated_by,
5306: last_update_date,
5357:
5358: -- Check 018: Item has to purchasable
5359:
5360: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_ALL_NO_ITEM');
5361: INSERT INTO po_online_report_text_gt(online_report_id,
5362: last_update_login,
5363: last_updated_by,
5364: last_update_date,
5365: created_by,
5410: -- Check 19: Release should not be on hold (Bug 3678912)
5411: -- PO_ON_HOLD_CANNOT_APPROVE
5412:
5413: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_ON_HOLD_CANNOT_APPROVE');
5414: INSERT INTO po_online_report_text_gt(online_report_id,
5415: last_update_login,
5416: last_updated_by,
5417: last_update_date,
5418: created_by,
5463: fnd_message.set_token('VALUE', to_char(l_vendor_id), FALSE);
5464: l_textline := substr(fnd_message.get, 1, 240);
5465:
5466:
5467: INSERT INTO po_online_report_text_gt(online_report_id,
5468: last_update_login,
5469: last_updated_by,
5470: last_update_date,
5471: created_by,
5508: fnd_message.set_name('PO', 'PO_PDOI_INVALID_VENDOR_SITE');
5509: fnd_message.set_token('VALUE', to_char(l_vendor_site_id), FALSE);
5510: l_textline := substr(fnd_message.get, 1, 240);
5511:
5512: INSERT INTO po_online_report_text_gt(online_report_id,
5513: last_update_login,
5514: last_updated_by,
5515: last_update_date,
5516: created_by,
5552: fnd_message.set_name('PO', 'PO_PDOI_INVALID_VDR_CNTCT');
5553: fnd_message.set_token('VALUE', to_char(l_vendor_contact_id), FALSE);
5554: l_textline := substr(fnd_message.get, 1, 240);
5555:
5556: INSERT INTO po_online_report_text_gt(online_report_id,
5557: last_update_login,
5558: last_updated_by,
5559: last_update_date,
5560: created_by,
5659: l_tax_message := fnd_message.get_string('PO','PO_TAX_CALCULATION')||' : ' ;
5660:
5661: FOR i IN 1..po_tax_interface_pvt.G_TAX_ERRORS_TBL.MESSAGE_TEXT.COUNT
5662: LOOP
5663: INSERT INTO po_online_report_text_gt
5664: (
5665: online_report_id,
5666: last_update_login,
5667: last_updated_by,
5730: END IF;
5731: END IF;
5732: -- Check 25: Validation for LCM enabled release to check whether its shipment has invoice match option as 'Receipt'
5733: l_textline := FND_MESSAGE.GET_STRING('PO','PO_SUB_REL_SHIP_INV_MATCH_NE_R');
5734: INSERT INTO po_online_report_text_gt (online_report_id,
5735: last_update_login,
5736: last_updated_by,
5737: last_update_date,
5738: created_by,
5775: END IF;
5776: END IF;
5777: -- Check 26: Validation for LCM enabled release to check whether its distribution has destination type as 'Inventory'
5778: l_textline := FND_MESSAGE.GET_STRING('PO','PO_SUB_REL_DIST_DEST_TYPE_NE_I');
5779: INSERT INTO po_online_report_text_gt (online_report_id,
5780: last_update_login,
5781: last_updated_by,
5782: last_update_date,
5783: created_by,
5823: -- Check 27: Buyer on the release should not be inactive
5824: -- PO_BUYER_INACTIVE
5825:
5826: l_textline := substr(FND_MESSAGE.GET_STRING('PO', 'PO_BUYER_INACTIVE'),1,240);
5827: INSERT INTO po_online_report_text_gt(online_report_id,
5828: last_update_login,
5829: last_updated_by,
5830: last_update_date,
5831: created_by,
6507:
6508: l_progress := '019';
6509: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REQ_PRICE_TOL_EXCEED');
6510: INSERT
6511: INTO po_online_report_text_gt
6512: (
6513: online_report_id ,
6514: last_update_login,
6515: last_updated_by ,
6726: l_progress := '030';
6727: --Report the price tolerance error
6728: l_textline := FND_MESSAGE.GET_STRING('PO',
6729: 'PO_SUB_REQ_PRICE_TOL_EXCEED');
6730: INSERT into po_online_report_text_gt(
6731: online_report_id,
6732: last_update_login,
6733: last_updated_by,
6734: last_update_date,
6868:
6869: l_progress := '060';
6870: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REQ_AMT_TOL_EXCEED');
6871: INSERT
6872: INTO po_online_report_text_gt
6873: (
6874: online_report_id ,
6875: last_update_login,
6876: last_updated_by ,
7044: l_progress := '080';
7045: --Report the price amount exceeded error
7046: l_textline :=
7047: FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REQ_AMT_TOL_EXCEED');
7048: INSERT into po_online_report_text_gt(
7049: online_report_id,
7050: last_update_login,
7051: last_updated_by,
7052: last_update_date,
7182: -- Check 1: Purchase Order vendor should not be on hold
7183: -- PO_SUB_VENDOR_ON_HOLD
7184:
7185: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_VENDOR_ON_HOLD');
7186: INSERT INTO po_online_report_text_gt(online_report_id,
7187: last_update_login,
7188: last_updated_by,
7189: last_update_date,
7190: created_by,
7258: -- Check 2: When no rows are returned, its likely that there
7259: --are problems with system setup
7260: --
7261: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_SYSTEM_SETUP');
7262: INSERT INTO po_online_report_text_gt(online_report_id,
7263: last_update_login,
7264: last_updated_by,
7265: last_update_date,
7266: created_by,
7305:
7306: --Check 3: vendor_id is NULL
7307: IF l_vendor_id IS NULL THEN
7308: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_ENTER_VENDOR');
7309: INSERT INTO po_online_report_text_gt(online_report_id,
7310: last_update_login,
7311: last_updated_by,
7312: last_update_date,
7313: created_by,
7345:
7346: --Check 4: vendor_site_id is NULL
7347: IF l_vendor_site_id IS NULL THEN
7348: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_ENTER_VENDOR_SITE');
7349: INSERT INTO po_online_report_text_gt(online_report_id,
7350: last_update_login,
7351: last_updated_by,
7352: last_update_date,
7353: created_by,
7385:
7386: --Check 5: ship_to_location_id is NULL
7387: IF l_ship_to_location_id IS NULL THEN
7388: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_NO_SHIP_TO_LOC_ID');
7389: INSERT INTO po_online_report_text_gt(online_report_id,
7390: last_update_login,
7391: last_updated_by,
7392: last_update_date,
7393: created_by,
7425: AND NVL(TRUNC(hla.inactive_date), TRUNC(SYSDATE)+1 ) <= TRUNC(SYSDATE)
7426: AND hlt.location_id=hla.location_id
7427: AND hlt.language=USERENV('LANG');
7428:
7429: INSERT INTO po_online_report_text_gt(online_report_id,
7430: last_update_login,
7431: last_updated_by,
7432: last_update_date,
7433: created_by,
7476: --Check 6: bill_to_location_id is NULL
7477: IF l_bill_to_location_id IS NULL THEN
7478:
7479: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_NO_BILL_TO_LOC_ID');
7480: INSERT INTO po_online_report_text_gt(online_report_id,
7481: last_update_login,
7482: last_updated_by,
7483: last_update_date,
7484: created_by,
7516: AND NVL(TRUNC(hla.inactive_date), TRUNC(SYSDATE)+1 ) <= TRUNC(SYSDATE)
7517: AND hlt.location_id=hla.location_id
7518: AND hlt.language=USERENV('LANG');
7519:
7520: INSERT INTO po_online_report_text_gt(online_report_id,
7521: last_update_login,
7522: last_updated_by,
7523: last_update_date,
7524: created_by,
7563:
7564: --Check 7: currency_code is NULL
7565: IF l_currency_code IS NULL THEN
7566: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_NO_CURRENCY_CODE');
7567: INSERT INTO po_online_report_text_gt(online_report_id,
7568: last_update_login,
7569: last_updated_by,
7570: last_update_date,
7571: created_by,
7606: (l_rate_type IS NULL OR l_rate IS NULL OR
7607: (l_rate_type <> 'User' AND l_rate_date IS NULL)) -- Bug 3759198
7608: THEN
7609: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_NO_RATE_TYPE');
7610: INSERT INTO po_online_report_text_gt(online_report_id,
7611: last_update_login,
7612: last_updated_by,
7613: last_update_date,
7614: created_by,
7653: IF ( l_rate_type = 'User' ) THEN
7654:
7655: l_textline := FND_MESSAGE.get_string('PO','PO_SUB_USER_RATE_TYPE');
7656:
7657: INSERT INTO po_online_report_text_gt
7658: ( online_report_id
7659: , last_update_login
7660: , last_updated_by
7661: , last_update_date
7706: -- Check 10: Purchase Order should not be on hold (Bug 3678912)
7707: -- PO_ON_HOLD_CANNOT_APPROVE
7708:
7709: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_ON_HOLD_CANNOT_APPROVE');
7710: INSERT INTO po_online_report_text_gt(online_report_id,
7711: last_update_login,
7712: last_updated_by,
7713: last_update_date,
7714: created_by,
7758: fnd_message.set_token('VALUE', to_char(l_vendor_id), FALSE);
7759: l_textline := substr(fnd_message.get, 1, 240);
7760:
7761:
7762: INSERT INTO po_online_report_text_gt(online_report_id,
7763: last_update_login,
7764: last_updated_by,
7765: last_update_date,
7766: created_by,
7802: fnd_message.set_name('PO', 'PO_PDOI_INVALID_VENDOR_SITE');
7803: fnd_message.set_token('VALUE', to_char(l_vendor_site_id), FALSE);
7804: l_textline := substr(fnd_message.get, 1, 240);
7805:
7806: INSERT INTO po_online_report_text_gt(online_report_id,
7807: last_update_login,
7808: last_updated_by,
7809: last_update_date,
7810: created_by,
7845: fnd_message.set_name('PO', 'PO_PDOI_INVALID_VDR_CNTCT');
7846: fnd_message.set_token('VALUE', to_char(l_vendor_contact_id), FALSE);
7847: l_textline := substr(fnd_message.get, 1, 240);
7848:
7849: INSERT INTO po_online_report_text_gt(online_report_id,
7850: last_update_login,
7851: last_updated_by,
7852: last_update_date,
7853: created_by,
7912: if l_acceptance_required in ('S') then
7913: -- check 14: Check if vendor contact is available.
7914: if l_vendor_contact_id is null then
7915: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_ENTER_VENDOR_CONTACT');
7916: INSERT INTO po_online_report_text_gt(online_report_id,
7917: last_update_login,
7918: last_updated_by,
7919: last_update_date,
7920: created_by,
7945: fnd_message.set_name('PO', 'PO_CONTACT_WITHOUT_VALID_USER');
7946: fnd_message.set_token('VALUE', to_char(l_vendor_contact_id), FALSE);
7947: l_textline := substr(fnd_message.get, 1, 240);
7948:
7949: INSERT INTO po_online_report_text_gt(online_report_id,
7950: last_update_login,
7951: last_updated_by,
7952: last_update_date,
7953: created_by,
7993: -- Check 16: Award/IDV Type should not be NULL
7994: -- PO_SUB_AWARD_TYPE_NULL
7995:
7996: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_AWARD_TYPE_NULL');
7997: INSERT INTO po_online_report_text_gt(online_report_id,
7998: last_update_login,
7999: last_updated_by,
8000: last_update_date,
8001: created_by,
8031: -- Check 17: Order of IDV Type without source IDV or External IDV
8032: -- PO_SUB_IDV_WITHOUT_SOURCE
8033:
8034: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_IDV_WITHOUT_SOURCE');
8035: INSERT INTO po_online_report_text_gt(online_report_id,
8036: last_update_login,
8037: last_updated_by,
8038: last_update_date,
8039: created_by,
8072: -- Check 18: Award Type with source IDV or External IDV
8073: -- PO_SUB_IDV_WITHOUT_SOURCE
8074:
8075: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_AWARD_WITH_SOURCE');
8076: INSERT INTO po_online_report_text_gt(online_report_id,
8077: last_update_login,
8078: last_updated_by,
8079: last_update_date,
8080: created_by,
8115: -- Check 19: Buyer on the po/pa should not be inactive
8116: -- PO_BUYER_INACTIVE
8117:
8118: l_textline := substr(FND_MESSAGE.GET_STRING('PO', 'PO_BUYER_INACTIVE'),1,240);
8119: INSERT INTO po_online_report_text_gt(online_report_id,
8120: last_update_login,
8121: last_updated_by,
8122: last_update_date,
8123: created_by,
8281: -- Check 1: Header must have at least one line
8282: -- PO_SUB_HEADER_NO_LINES
8283: -- Message inserted is 'Purchase Document has no lines'
8284: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_HEADER_NO_LINES');
8285: INSERT INTO po_online_report_text_gt(online_report_id,
8286: last_update_login,
8287: last_updated_by,
8288: last_update_date,
8289: created_by,
8340: FND_MESSAGE.SET_NAME('PO','PO_SUB_LINE_NO_SHIP');
8341: FND_MESSAGE.SET_TOKEN('LINE_LOCATION_TYPE', l_line_loc_token_value);
8342:
8343: l_textline := FND_MESSAGE.GET;
8344: INSERT INTO po_online_report_text_gt(online_report_id,
8345: last_update_login,
8346: last_updated_by,
8347: last_update_date,
8348: created_by,
8407: ELSE
8408: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_CLM_SUB_SHIP_NO_DIST_WARN');
8409: END IF;
8410:
8411: INSERT INTO po_online_report_text_gt(online_report_id,
8412: last_update_login,
8413: last_updated_by,
8414: last_update_date,
8415: created_by,
8491: -- books currency code.
8492: -- PO_SUB_DIST_RATE_NULL
8493:
8494: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_DIST_RATE_NULL');
8495: INSERT INTO po_online_report_text_gt(online_report_id,
8496: last_update_login,
8497: last_updated_by,
8498: last_update_date,
8499: created_by,
8550:
8551: -- Check 7: If using functional currency then rate has to be null.
8552: -- PO_SUB_DIST_RATE_NOT_NULL
8553: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_DIST_RATE_NOT_NULL');
8554: INSERT INTO po_online_report_text_gt(online_report_id,
8555: last_update_login,
8556: last_updated_by,
8557: last_update_date,
8558: created_by,
8619:
8620: IF (l_val_contract_limit = 0) THEN
8621:
8622: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_STD_CONTRACT_AMT_LIMIT');
8623: INSERT INTO po_online_report_text_gt(online_report_id,
8624: last_update_login,
8625: last_updated_by,
8626: last_update_date,
8627: created_by,
8669: --< Bug 3422733 > Only do this check if Contract is not ON HOLD. The ON HOLD
8670: -- check is done later. Avoids showing 2 msgs for Contract that is ON HOLD.
8671:
8672: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_REF_UNAPPROVED_CONTRACT');
8673: INSERT INTO po_online_report_text_gt(online_report_id,
8674: last_update_login,
8675: last_updated_by,
8676: last_update_date,
8677: created_by,
8728: -- PO_SUB_LINE_CONTRACT_MISMATCH
8729: --< CLM Novation > bug13059027 - This check is a Warning for OrderOfIDV Modifications
8730: -- or Re-approval Base docs whose Supplier is different from that of referenced IDV
8731: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_LINE_CONTRACT_MISMATCH');
8732: INSERT INTO po_online_report_text_gt(online_report_id,
8733: last_update_login,
8734: last_updated_by,
8735: last_update_date,
8736: created_by,
8823: --'Line#
8824: -- is disabled
8825: -- Bug #1630662
8826: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_UOM_CLASS_CONVERSION');
8827: INSERT INTO po_online_report_text_gt(online_report_id,
8828: last_update_login,
8829: last_updated_by,
8830: last_update_date,
8831: created_by,
8934: atlease one approved ASL either at item level or at category level
8935: if there is no item ASL*/
8936:
8937: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_ITEM_NOT_APPROVED');
8938: INSERT INTO po_online_report_text_gt(online_report_id,
8939: last_update_login,
8940: last_updated_by,
8941: last_update_date,
8942: created_by,
9038: If supplier is debarred in any of the ASL item/category (Global/Local)
9039: (Suplier/Supplier+site) then the approval of the PO will not be allowed */
9040:
9041: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_ITEM_ASL_DEBARRED');
9042: INSERT INTO po_online_report_text_gt(online_report_id,
9043: last_update_login,
9044: last_updated_by,
9045: last_update_date,
9046: created_by,
9124: -- (If contract is in incomplete status)
9125:
9126: l_textline := FND_MESSAGE.get_string('PO', 'PO_SUB_LINE_CONTRACT_HOLD');
9127:
9128: INSERT INTO po_online_report_text_gt(
9129: online_report_id,
9130: last_update_login,
9131: last_updated_by,
9132: last_update_date,
9180: -- dates of the contracts referenced
9181:
9182: l_textline := FND_MESSAGE.get_string('PO', 'PO_SUB_LINE_CONTRACT_EXP');
9183:
9184: INSERT INTO po_online_report_text_gt(
9185: online_report_id,
9186: last_update_login,
9187: last_updated_by,
9188: last_update_date,
9236: -- Check 17: ATO/CTO Model items not allowed on PO's (Bug 3362369)
9237:
9238: l_textline := FND_MESSAGE.get_string('PO', 'PO_ATO_ITEM_NA');
9239: --Bug10064616
9240: INSERT INTO po_online_report_text_gt(
9241: online_report_id,
9242: last_update_login,
9243: last_updated_by,
9244: last_update_date,
9294: END IF;
9295: END IF;
9296: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_ALL_NO_ITEM');
9297: --Bug10064616
9298: INSERT INTO po_online_report_text_gt(online_report_id,
9299: last_update_login,
9300: last_updated_by,
9301: last_update_date,
9302: created_by,
9343: l_api_name||'.' || l_progress,
9344: 'PO 19: Non Purchasable Item is not allowed'); END IF;
9345: END IF;
9346: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_ALL_NO_ITEM');
9347: INSERT INTO po_online_report_text_gt(online_report_id,
9348: last_update_login,
9349: last_updated_by,
9350: last_update_date,
9351: created_by,
9405: -- items (ECO 4503425 for HTML Orders R12)
9406:
9407: l_textline := FND_MESSAGE.get_string('PO', 'PO_PO_PLANNED_ITEM_DATE_REQ');
9408:
9409: INSERT INTO po_online_report_text_gt(
9410: online_report_id,
9411: last_update_login,
9412: last_updated_by,
9413: last_update_date,
9500: l_rowCount(i) := i;
9501: END LOOP;
9502:
9503: FORALL i IN 1..l_line_num.COUNT
9504: INSERT INTO po_online_report_text_gt (online_report_id,
9505: last_update_login,
9506: last_updated_by,
9507: last_update_date,
9508: created_by,
9578: END IF;
9579: l_tax_message := fnd_message.get_string('PO','PO_TAX_CALCULATION')||' : ' ;
9580: FOR i IN 1..po_tax_interface_pvt.G_TAX_ERRORS_TBL.MESSAGE_TEXT.COUNT
9581: LOOP
9582: INSERT INTO po_online_report_text_gt
9583: (
9584: online_report_id,
9585: last_update_login,
9586: last_updated_by,
9660: IF (l_po_vmi_display_warning = 'Y') THEN
9661:
9662: l_textline := FND_MESSAGE.get_string('PO', 'PO_SUB_VMI_ASL_EXISTS');
9663:
9664: INSERT INTO po_online_report_text_gt(
9665: online_report_id,
9666: last_update_login,
9667: last_updated_by,
9668: last_update_date,
9744: -- Bug 7001748: Added new validation check
9745: -- Check 23: Validate OKE Contract Version, Line Id and Deliverable Id.
9746:
9747: -- Check 23a: Validate Contract Version
9748: INSERT INTO po_online_report_text_gt
9749: (online_report_id,
9750: last_update_login,
9751: last_updated_by,
9752: last_update_date,
9785: --Increment the p_sequence with number of errors reported in last query
9786: p_sequence := p_sequence + SQL%ROWCOUNT;
9787:
9788: -- Check 23b: Validate Contract Line Id
9789: INSERT INTO po_online_report_text_gt
9790: (online_report_id,
9791: last_update_login,
9792: last_updated_by,
9793: last_update_date,
9834: --Increment the p_sequence with number of errors reported in last query
9835: p_sequence := p_sequence + SQL%ROWCOUNT;
9836:
9837: -- Check 23c: Validate Contract Deliverable Id
9838: INSERT INTO po_online_report_text_gt
9839: (online_report_id,
9840: last_update_login,
9841: last_updated_by,
9842: last_update_date,
9902: FND_MESSAGE.SET_TOKEN('SHIP_PRICE', price_rec.price_override);
9903: FND_MESSAGE.SET_TOKEN('LINE_PRICE',price_rec.unit_price);
9904: l_textline := FND_MESSAGE.GET;
9905:
9906: INSERT INTO po_online_report_text_gt
9907: (online_report_id,
9908: last_update_login,
9909: last_updated_by,
9910: last_update_date,
9943: END IF;
9944: END IF;
9945: -- Check 24: Validate the LCM enabled PO to check whether its invoice match option is set as 'Receipt'.
9946: l_textline := FND_MESSAGE.GET_STRING('PO','PO_SUB_PO_SHIP_INV_MATCH_NE_R');
9947: INSERT INTO po_online_report_text_gt (online_report_id,
9948: last_update_login,
9949: last_updated_by,
9950: last_update_date,
9951: created_by,
9994:
9995: END IF;
9996: -- Check 25: Validate the LCM enabled PO to check whether its destination type is set as 'Inventory'
9997: l_textline := FND_MESSAGE.GET_STRING('PO','PO_SUB_PO_DIST_DEST_TYPE_NE_IN');
9998: INSERT INTO po_online_report_text_gt (online_report_id,
9999: last_update_login,
10000: last_updated_by,
10001: last_update_date,
10002: created_by,
10056: PO_DEBUG.debug_stmt(g_log_head || '.'||l_api_name||'.',
10057: l_progress,'PO 26: Funded Value Should be less than or equal to Total Order Value');
10058: END IF;
10059:
10060: INSERT INTO po_online_report_text_gt
10061: (online_report_id,
10062: last_update_login,
10063: last_updated_by,
10064: last_update_date,
10174: l_rowCount(i) := i;
10175: END LOOP;
10176:
10177: FORALL i IN 1..l_line_num.COUNT
10178: INSERT INTO po_online_report_text_gt(
10179: online_report_id,
10180: last_update_login,
10181: last_updated_by,
10182: last_update_date,
10237: l_progress,'PO 28: Total Funded Value of Distributions should be less than Funds remaining on the backing Requisition');
10238: END IF;
10239:
10240: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_FUNDED_VAL_GT_REQ_FUNDS');
10241: INSERT INTO po_online_report_text_gt(
10242: online_report_id,
10243: last_update_login,
10244: last_updated_by,
10245: last_update_date,
10349: p_document_id => p_document_id );
10350:
10351: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_IDV_REF_NOT_EQUAL');
10352:
10353: INSERT INTO po_online_report_text_gt(online_report_id,
10354: last_update_login,
10355: last_updated_by,
10356: last_update_date,
10357: created_by,
10463: -- pa should be less than the amount limit.
10464: -- PO_SUB_AGREED_GRT_LIMIT
10465:
10466: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_AGREED_GRT_LIMIT');
10467: INSERT INTO po_online_report_text_gt(online_report_id,
10468: last_update_login,
10469: last_updated_by,
10470: last_update_date,
10471: created_by,
10512: -- blanket pa should be less than the amount limit.
10513: -- PO_SUB_MINREL_GRT_LIMIT
10514:
10515: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_MINREL_GRT_LIMIT');
10516: INSERT INTO po_online_report_text_gt(online_report_id,
10517: last_update_login,
10518: last_updated_by,
10519: last_update_date,
10520: created_by,
10573: -- Releases.
10574: -- PO_SUB_LIMIT_GRT_REL_AMT
10575:
10576: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_LIMIT_GRT_REL_AMT');
10577: INSERT INTO po_online_report_text_gt(online_report_id,
10578: last_update_login,
10579: last_updated_by,
10580: last_update_date,
10581: created_by,
10670:
10671: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SVC_PRICE_LIMIT_LT_PRICE');
10672:
10673:
10674: INSERT into po_online_report_text_gt(online_report_id,
10675: last_update_login,
10676: last_updated_by,
10677: last_update_date,
10678: created_by,
10784: -- Check 1: Blanket Header must have at least one line
10785: -- PO_SUB_HEADER_NO_LINES
10786: -- Message inserted is 'Purchase Document has no lines'
10787: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_HEADER_NO_LINES');
10788: INSERT INTO po_online_report_text_gt(online_report_id,
10789: last_update_login,
10790: last_updated_by,
10791: last_update_date,
10792: created_by,
10827: END IF;
10828: END IF;
10829: l_textline := FND_MESSAGE.GET_STRING('PO','PO_SUB_HEADER_END_DATED');
10830:
10831: INSERT INTO po_online_report_text_gt(
10832: online_report_id,
10833: last_update_login,
10834: last_updated_by,
10835: last_update_date,
10913: 'PO 04: Non Purchasable Item is not allowed');
10914: END IF;
10915: END IF;
10916: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_ALL_NO_ITEM');
10917: INSERT INTO po_online_report_text_gt(online_report_id,
10918: last_update_login,
10919: last_updated_by,
10920: last_update_date,
10921: created_by,
10968: 'BPA 06: Checking price breaks effective date range');
10969: END IF;
10970: END IF;
10971:
10972: INSERT INTO po_online_report_text_gt(online_report_id,
10973: last_update_login,
10974: last_updated_by,
10975: last_update_date,
10976: created_by,
11060:
11061: -- Bug 9816849 : Added condition to avoid checking expiration date for lines
11062: -- having canceled_flag=Y
11063: l_textline := FND_MESSAGE.GET_STRING('PO', PO_MESSAGE_S.POX_EXPIRATION_DATES);
11064: INSERT INTO po_online_report_text_gt(online_report_id,
11065: last_update_login,
11066: last_updated_by,
11067: last_update_date,
11068: created_by,
11112: -- DEBARRED.
11113: -- PO_SUB_ITEM_ASL_DEBARRED
11114:
11115: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_ITEM_ASL_DEBARRED');
11116: INSERT INTO po_online_report_text_gt(online_report_id,
11117: last_update_login,
11118: last_updated_by,
11119: last_update_date,
11120: created_by,
11448:
11449: -- l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUP_CONS_DOC_REF_COEXIST');
11450: --
11451: -- INSERT INTO
11452: -- po_online_report_text_gt(online_report_id,
11453: -- last_update_login,
11454: -- last_updated_by,
11455: -- last_update_date,
11456: -- created_by,
11632: -- ASL and the shipment does not match
11633: IF(l_consigned_mismatch_found)
11634: THEN
11635: INSERT INTO
11636: po_online_report_text_gt
11637: (online_report_id,
11638: last_update_login,
11639: last_updated_by,
11640: last_update_date,
11751: --
11752: --Check 1: The GA should be enabled for purchasing in the current OU.
11753: --< Shared Proc FPJ > Bug 3301427: Only do this check for new SPO lines
11754: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_STD_GA_DISABLED');
11755: INSERT into po_online_report_text_gt(online_report_id,
11756: last_update_login,
11757: last_updated_by,
11758: last_update_date,
11759: created_by,
11820: --< Bug 3422733 > Only do this check if GA is not ON HOLD. The ON HOLD check
11821: -- is done later. Avoids showing 2 msgs for Contract that is ON HOLD.
11822:
11823: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_STD_GA_APPROVED');
11824: INSERT into po_online_report_text_gt(online_report_id,
11825: last_update_login,
11826: last_updated_by,
11827: last_update_date,
11828: created_by,
11833: sequence,
11834: text_line,
11835: message_name)
11836: --SQL What: Querying for PO lines that reference GAs that are not approved.
11837: --SQL Why: Add appropriate error message to po_online_report_text_gt
11838: SELECT p_online_report_id,
11839: p_login_id,
11840: p_user_id,
11841: sysdate,
11877:
11878: --Check 3: The GA should not be on hold.
11879: --< Shared Proc FPJ > Bug 3301427: Only do this check for new SPO lines
11880: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_STD_GA_ON_HOLD');
11881: INSERT into po_online_report_text_gt(online_report_id,
11882: last_update_login,
11883: last_updated_by,
11884: last_update_date,
11885: created_by,
11890: sequence,
11891: text_line,
11892: message_name)
11893: --SQL What: Querying for PO lines that reference GAs that are on hold
11894: --SQL Why: Add appropriate error message to po_online_report_text_gt
11895: SELECT p_online_report_id,
11896: p_login_id,
11897: p_user_id,
11898: sysdate,
11938: --Check 4: The vendor on the PO should match the GA.
11939: --< CLM Novation > bug13059027 - This check is a Warning for OrderOfIDV Modifications
11940: -- or Re-approval Base docs whose Supplier is different from that of referenced IDV
11941: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_STD_GA_VENDOR_MISMATCH');
11942: INSERT into po_online_report_text_gt(online_report_id,
11943: last_update_login,
11944: last_updated_by,
11945: last_update_date,
11946: created_by,
11953: message_name,
11954: message_type)
11955: --SQL What: Querying for PO lines whose vendor does not
11956: --SQL match the vendor of the referenced GA
11957: --SQL Why: Add appropriate error message to po_online_report_text_gt
11958: SELECT p_online_report_id,
11959: p_login_id,
11960: p_user_id,
11961: sysdate,
11996: --< CLM Novation > bug13059027 - This check is a Warning for OrderOfIDV Modifications
11997: -- or Re-approval Base docs whose Supplier is different from that of referenced IDV
11998: l_textline :=
11999: FND_MESSAGE.GET_STRING('PO', 'PO_SUB_STD_GA_VDR_SITE_MISMT');
12000: INSERT into po_online_report_text_gt(online_report_id,
12001: last_update_login,
12002: last_updated_by,
12003: last_update_date,
12004: created_by,
12011: message_name,
12012: message_type)
12013: --SQL What: Querying for PO lines whose vendor_site_id does not
12014: --SQL match a valid vendor_site_id in the GA's org assignments
12015: --SQL Why: Add appropriate error message to po_online_report_text_gt
12016: SELECT p_online_report_id,
12017: p_login_id,
12018: p_user_id,
12019: sysdate,
12065: -- corresponding Line expiration date
12066: --Bug8847964 the need by date should be just greater than the start date of the blanket
12067: -- and can be later to the end date.
12068: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_STD_AFTER_GA_DATE');
12069: INSERT into po_online_report_text_gt(online_report_id,
12070: last_update_login,
12071: last_updated_by,
12072: last_update_date,
12073: created_by,
12079: text_line,
12080: message_name)
12081: --SQL What: Querying for PO lines that were not created within
12082: --SQL the effective dates of the referenced GA
12083: --SQL Why: Add appropriate error message to po_online_report_text_gt
12084: SELECT p_online_report_id,
12085: p_login_id,
12086: p_user_id,
12087: sysdate,
12129:
12130: --Check 7: The Need-by-date (or if NULL the PO creation date) should be
12131: -- after the start dates of the GA
12132: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_STD_BEFORE_GA_DATE');
12133: INSERT into po_online_report_text_gt(online_report_id,
12134: last_update_login,
12135: last_updated_by,
12136: last_update_date,
12137: created_by,
12143: text_line,
12144: message_name)
12145: --SQL What: Querying for PO lines that were not created within
12146: --SQL the effective dates of the referenced GA
12147: --SQL Why: Add appropriate error message to po_online_report_text_gt
12148: SELECT p_online_report_id,
12149: p_login_id,
12150: p_user_id,
12151: sysdate,
12183: END IF;
12184:
12185: --Check 8: The currency_code on the PO should match the GA.
12186: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_STD_GA_CURR_MISMATCH');
12187: INSERT into po_online_report_text_gt(online_report_id,
12188: last_update_login,
12189: last_updated_by,
12190: last_update_date,
12191: created_by,
12197: text_line,
12198: message_name)
12199: --SQL What: Querying for PO lines whose currency code does not
12200: --SQL match the currency code of the referenced GA
12201: --SQL Why: Add appropriate error message to po_online_report_text_gt
12202: SELECT p_online_report_id,
12203: p_login_id,
12204: p_user_id,
12205: sysdate,
12361: --raise an error for that line
12362: IF (l_amount_limit(l_curr_doc_line_index) < l_po_amount(l_curr_doc_line_index)) THEN
12363: l_rowcount := l_rowcount +1;
12364: -- Bug 2818810. Use l_curr_doc_line_num to retrieve the line number
12365: INSERT INTO po_online_report_text_gt(online_report_id,
12366: last_update_login,
12367: last_updated_by,
12368: last_update_date,
12369: created_by,
12417: -- Bug 3177525: This check should not be done if allow_price_override_flag
12418: -- is 'N' because the user can never modify the standard PO price/amount;
12419: -- it is automatically defaulted.
12420:
12421: INSERT into po_online_report_text_gt(online_report_id,
12422: last_update_login,
12423: last_updated_by,
12424: last_update_date,
12425: created_by,
12431: text_line,
12432: message_name)
12433: --SQL What: Querying for PO line unit prices that exceed the
12434: --SQL price tolerance on the GA line
12435: --SQL Why: Add appropriate error message to po_online_report_text_gt
12436: SELECT p_online_report_id,
12437: p_login_id,
12438: p_user_id,
12439: sysdate,
12506: --referencing same GA line should be greater than the minimum release amount
12507: --on the GA line.
12508: l_textline := -- <2710030>
12509: FND_MESSAGE.GET_STRING('PO','PO_SUB_STD_GA_LINE_LESS_MINREL');
12510: INSERT into po_online_report_text_gt(online_report_id,
12511: last_update_login,
12512: last_updated_by,
12513: last_update_date,
12514: created_by,
12520: text_line,
12521: message_name)
12522: --SQL What: Querying for PO shipment totals that fail to meet the
12523: --SQL minimum release amount of the GA line
12524: --SQL Why: Add appropriate error message to po_online_report_text_gt
12525: SELECT p_online_report_id,
12526: p_login_id,
12527: p_user_id,
12528: sysdate,
12673: --< Shared Proc FPJ > Bug 3301427: Only do this check for new SPO lines
12674:
12675: l_textline := FND_MESSAGE.get_string ('PO', 'PO_SUB_STD_GC_NOT_EN_PUR');
12676:
12677: INSERT INTO po_online_report_text_gt (
12678: online_report_id,
12679: last_update_login,
12680: last_updated_by,
12681: last_update_date,
12747: --< CLM Novation > bug13059027 - This check is a Warning for OrderOfIDV Modifications
12748: -- or Re-approval Base docs whose Supplier is different from that of referenced IDV
12749: l_textline := FND_MESSAGE.get_string ('PO', 'PO_SUB_STD_GC_INVALID_SITE');
12750:
12751: INSERT INTO po_online_report_text_gt (
12752: online_report_id,
12753: last_update_login,
12754: last_updated_by,
12755: last_update_date,
12984: l_po_amount(l_curr_doc_line_index))
12985: THEN
12986: l_rowcount := l_rowcount + 1;
12987:
12988: INSERT INTO po_online_report_text_gt (
12989: online_report_id,
12990: last_update_login,
12991: last_updated_by,
12992: last_update_date,
13028: || l_progress,'PO STD GC 4: Exp Date Check on Source Document');
13029: END IF;
13030: END IF;
13031: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_STD_AFTER_GA_DATE');
13032: INSERT INTO po_online_report_text_gt (
13033: online_report_id,
13034: last_update_login,
13035: last_updated_by,
13036: last_update_date,
13148: --
13149: --instead of summing up the Line Loc values. The results should be
13150: --equivalent for SPOs.
13151: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_SUB_CONTRACT_AMT_LIMIT');
13152: INSERT INTO po_online_report_text_gt(online_report_id,
13153: last_update_login,
13154: last_updated_by,
13155: last_update_date,
13156: created_by,
13344: --Deleting msg so that we can always use G_Last to get the
13345: --message we want
13346: FND_MSG_PUB.Delete_Msg(p_msg_index => FND_MSG_PUB.G_LAST);
13347: l_progress := '003';
13348: INSERT INTO PO_ONLINE_REPORT_TEXT_GT (online_report_id,
13349: last_update_login,
13350: last_updated_by,
13351: last_update_date,
13352: created_by,
13488: DELETE FROM po_releases_gt;
13489: DELETE FROM po_req_headers_gt;
13490: DELETE FROM po_req_lines_gt;
13491: DELETE FROM po_req_distributions_gt;
13492: DELETE FROM po_online_report_text_gt;
13493:
13494:
13495: PO_CORE_S.get_document_ids(
13496: p_doc_type => p_doc_type
17145: --Pre-reqs:
17146: -- The global temp tables are populated with exactly those rows
17147: -- that should undergo the checks.
17148: --Modifies:
17149: -- PO_ONLINE_REPORT_TEXT_GT
17150: --Locks:
17151: -- None.
17152: --Function:
17153: -- This procedure performs the document checks for an UNRESERVE action.
17153: -- This procedure performs the document checks for an UNRESERVE action.
17154: --Parameters:
17155: --IN:
17156: --p_online_report_id
17157: -- ID used to insert into PO_ONLINE_REPORT_TEXT_GT.
17158: --p_user_id
17159: -- User performing the action.
17160: --p_login_id
17161: -- Last update login_id.
17180:
17181: l_log_head CONSTANT VARCHAR2(100) := g_log_head||'CHECK_UNRESERVE';
17182: l_progress VARCHAR2(3) := '000';
17183:
17184: l_textline PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE := NULL;
17185: l_ret_sts VARCHAR2(1);
17186: BEGIN
17187:
17188: IF g_debug_stmt THEN
17209: l_progress := '040';
17210:
17211: -- Perform the check.
17212:
17213: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
17214: ( online_report_id
17215: , last_update_login
17216: , last_updated_by
17217: , last_update_date
17294: l_progress := '110';
17295:
17296: -- Perform the check.
17297:
17298: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
17299: ( online_report_id
17300: , last_update_login
17301: , last_updated_by
17302: , last_update_date
17381: l_progress := '210';
17382:
17383: -- Perform the check.
17384:
17385: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
17386: ( online_report_id
17387: , last_update_login
17388: , last_updated_by
17389: , last_update_date
18263: -- The global temp tables for the appropriate doc type
18264: -- have been populated with all of the rows required for the check.
18265: -- This should only be called if encumbrance is on.
18266: --Modifies:
18267: -- PO_ONLINE_REPORT_TEXT_GT
18268: --Locks:
18269: -- None.
18270: --Function:
18271: -- Checks that the GL date is usable (valid for GL and PO).
18277: -- PA
18278: -- PO
18279: -- RELEASE
18280: --p_online_report_id
18281: -- ID used to insert into PO_ONLINE_REPORT_TEXT_GT.
18282: --p_user_id
18283: -- User performing the action.
18284: --p_login_id
18285: -- Last update login_id.
18301:
18302: l_log_head CONSTANT VARCHAR2(100) := g_log_head||'CHECK_GL_DATE';
18303: l_progress VARCHAR2(3) := '000';
18304:
18305: l_msg_name PO_ONLINE_REPORT_TEXT_GT.message_name%TYPE;
18306: l_textline PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE;
18307:
18308: l_date_tbl po_tbl_date;
18309: l_line_num_tbl po_tbl_number;
18302: l_log_head CONSTANT VARCHAR2(100) := g_log_head||'CHECK_GL_DATE';
18303: l_progress VARCHAR2(3) := '000';
18304:
18305: l_msg_name PO_ONLINE_REPORT_TEXT_GT.message_name%TYPE;
18306: l_textline PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE;
18307:
18308: l_date_tbl po_tbl_date;
18309: l_line_num_tbl po_tbl_number;
18310: l_shipment_num_tbl po_tbl_number;
18506: l_progress := '230';
18507:
18508: -- Report the invalid dates.
18509:
18510: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
18511: ( online_report_id
18512: , last_update_login
18513: , last_updated_by
18514: , last_update_date
18746: --Name: check_vendor_site_ccr_regis
18747: --Pre-reqs:
18748: -- None
18749: --Modifies:
18750: -- po_online_report_text_gt
18751: --Locks:
18752: -- None.
18753: --Function:
18754: -- This procedure is used to perform the submission check related to CCR
18854: END IF;
18855: END IF;
18856:
18857: l_text_line := FND_MESSAGE.get_string('PO', 'PO_VENDOR_SITE_CCR_INVALID');
18858: INSERT INTO po_online_report_text_gt
18859: (online_report_id
18860: ,last_updated_by
18861: ,last_update_date
18862: ,created_by
19211: , x_return_status OUT NOCOPY VARCHAR2
19212: )
19213: IS
19214:
19215: l_textline PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE;
19216: l_ret_sts VARCHAR2(1);
19217: l_is_complex_po boolean;
19218: l_token_value VARCHAR2(256);
19219:
19246: d_progress := 10;
19247:
19248: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_CAN_POH_WITH_RCV_TRX');
19249:
19250: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
19251: ( online_report_id
19252: , last_update_login
19253: , last_updated_by
19254: , last_update_date
19298: d_progress := 20;
19299:
19300: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_CAN_REL_WITH_RCV_TRX');
19301:
19302: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
19303: ( online_report_id
19304: , last_update_login
19305: , last_updated_by
19306: , last_update_date
19353: d_progress := 30;
19354:
19355: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_CAN_POL_WITH_RCV_TRX');
19356:
19357: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
19358: ( online_report_id
19359: , last_update_login
19360: , last_updated_by
19361: , last_update_date
19426: of the PO or Release Shipments being finally closed*/
19427:
19428: IF (p_document_type <> g_document_type_RELEASE)
19429: THEN
19430: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
19431: ( online_report_id
19432: , last_update_login
19433: , last_updated_by
19434: , last_update_date
19472: AND rti.po_line_location_id = poll.line_location_id
19473: );
19474:
19475: ELSE
19476: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
19477: ( online_report_id
19478: , last_update_login
19479: , last_updated_by
19480: , last_update_date
19580: , p_sequence IN OUT NOCOPY NUMBER
19581: , x_return_status OUT NOCOPY VARCHAR2
19582: )
19583: IS
19584: l_textline PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE; --Bug9012072
19585: l_ret_sts VARCHAR2(1); --Bug9012072
19586: d_msg VARCHAR2(60); --Bug9012072
19587:
19588:
19585: l_ret_sts VARCHAR2(1); --Bug9012072
19586: d_msg VARCHAR2(60); --Bug9012072
19587:
19588:
19589: l_text_normal_po PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE;
19590: l_text_complex_po PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE;
19591:
19592: d_module VARCHAR2(70) := 'po.plsql.PO_DOCUMENT_CHECKS_PVT.check_asn_not_fully_received';
19593: d_progress NUMBER;
19586: d_msg VARCHAR2(60); --Bug9012072
19587:
19588:
19589: l_text_normal_po PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE;
19590: l_text_complex_po PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE;
19591:
19592: d_module VARCHAR2(70) := 'po.plsql.PO_DOCUMENT_CHECKS_PVT.check_asn_not_fully_received';
19593: d_progress NUMBER;
19594:
19618: l_text_normal_po := FND_MESSAGE.GET_STRING('PO', 'PO_CAN_POLL_WITH_ASN');
19619: l_text_complex_po := FND_MESSAGE.GET_STRING('PO', 'PO_CAN_POLL_WITH_PENDING_WCR');
19620:
19621: --
19622: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
19623: ( online_report_id
19624: , last_update_login
19625: , last_updated_by
19626: , last_update_date
19669: d_progress := 20;
19670:
19671: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_CAN_POLL_WITH_ASN');
19672:
19673: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
19674: ( online_report_id
19675: , last_update_login
19676: , last_updated_by
19677: , last_update_date
19729:
19730: l_text_normal_po := FND_MESSAGE.GET_STRING('PO', 'PO_CAN_POLL_WITH_ASN');
19731: l_text_complex_po := FND_MESSAGE.GET_STRING('PO', 'PO_CAN_POLL_WITH_PENDING_WCR');
19732:
19733: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
19734: ( online_report_id
19735: , last_update_login
19736: , last_updated_by
19737: , last_update_date
19791:
19792: l_text_normal_po := FND_MESSAGE.GET_STRING('PO', 'PO_CAN_POLL_WITH_ASN');
19793: l_text_complex_po := FND_MESSAGE.GET_STRING('PO', 'PO_CAN_POLL_WITH_PENDING_WCR');
19794:
19795: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
19796: ( online_report_id
19797: , last_update_login
19798: , last_updated_by
19799: , last_update_date
19840: ELSE
19841:
19842: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_CAN_POLL_WITH_ASN');
19843:
19844: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
19845: ( online_report_id
19846: , last_update_login
19847: , last_updated_by
19848: , last_update_date
19944: , x_return_status OUT NOCOPY VARCHAR2
19945: )
19946: IS
19947:
19948: l_textline PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE;
19949:
19950: d_module VARCHAR2(70) := 'po.plsql.PO_DOCUMENT_CHECKS_PVT.check_qty_rcv_but_not_deliv';
19951: d_progress NUMBER;
19952:
19964: END IF;
19965:
19966: d_progress := 10;
19967:
19968: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
19969: ( online_report_id
19970: , last_update_login
19971: , last_updated_by
19972: , last_update_date
20063: , x_return_status OUT NOCOPY VARCHAR2
20064: )
20065: IS
20066:
20067: l_textline PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE;
20068:
20069: d_module VARCHAR2(70) := 'po.plsql.PO_DOCUMENT_CHECKS_PVT.check_amt_rcv_but_not_deliv';
20070: d_progress NUMBER;
20071:
20087: --
20088: -- In query below, changed quantity columns to amount columns and also
20089: -- group by ROWNUM so that it can be used in the select clause
20090:
20091: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
20092: ( online_report_id
20093: , last_update_login
20094: , last_updated_by
20095: , last_update_date
20189: , x_return_status OUT NOCOPY VARCHAR2
20190: )
20191: IS
20192:
20193: l_textline PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE;
20194: l_is_complex_po boolean;
20195: l_token_value VARCHAR2(256);
20196:
20197: d_module VARCHAR2(70) := 'po.plsql.PO_DOCUMENT_CHECKS_PVT.check_invalid_acct_flex';
20230: FND_MESSAGE.SET_TOKEN('LINE_LOCATION_TYPE', l_token_value);
20231:
20232: l_textline := FND_MESSAGE.GET;
20233:
20234: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
20235: ( online_report_id
20236: , last_update_login
20237: , last_updated_by
20238: , last_update_date
20313: , x_return_status OUT NOCOPY VARCHAR2
20314: )
20315: IS
20316:
20317: l_textline PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE;
20318:
20319: d_module VARCHAR2(70) := 'po.plsql.PO_DOCUMENT_CHECKS_PVT.check_bpa_has_open_release';
20320: d_progress NUMBER;
20321:
20334: d_progress := 10;
20335:
20336: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_CAN_POL_PLAN_WITH_OPEN_REL');
20337:
20338: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
20339: ( online_report_id
20340: , last_update_login
20341: , last_updated_by
20342: , last_update_date
20410: , x_return_status OUT NOCOPY VARCHAR2
20411: )
20412: IS
20413:
20414: l_textline PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE;
20415:
20416: d_module VARCHAR2(70) := 'po.plsql.PO_DOCUMENT_CHECKS_PVT.check_bpa_has_open_stdref';
20417: d_progress NUMBER;
20418:
20431: d_progress := 10;
20432:
20433: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_CAN_GAL_WITH_OPEN_STD_REF');
20434:
20435: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
20436: ( online_report_id
20437: , last_update_login
20438: , last_updated_by
20439: , last_update_date
20506: , x_return_status OUT NOCOPY VARCHAR2
20507: )
20508: IS
20509:
20510: l_textline PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE;
20511:
20512: d_module VARCHAR2(70) := 'po.plsql.PO_DOCUMENT_CHECKS_PVT.check_cpa_has_open_stdref';
20513: d_progress NUMBER;
20514:
20527: d_progress := 10;
20528:
20529: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_CAN_CGA_WITH_OPEN_STD_REF');
20530:
20531: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
20532: ( online_report_id
20533: , last_update_login
20534: , last_updated_by
20535: , last_update_date
20602: , x_return_status OUT NOCOPY VARCHAR2
20603: )
20604: IS
20605:
20606: l_textline PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE;
20607:
20608: d_module VARCHAR2(70) := 'po.plsql.PO_DOCUMENT_CHECKS_PVT.check_ppo_has_open_release';
20609: d_progress NUMBER;
20610:
20623: d_progress := 10;
20624:
20625: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_CAN_POLL_PLAN_WITH_OPEN_REL');
20626:
20627: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
20628: ( online_report_id
20629: , last_update_login
20630: , last_updated_by
20631: , last_update_date
20814: l_rowCount(i) := i;
20815: END LOOP;
20816:
20817: FORALL i IN 1..l_line_num.COUNT
20818: INSERT INTO po_online_report_text_gt(online_report_id,
20819: last_update_login,
20820: last_updated_by,
20821: last_update_date,
20822: created_by,
20984:
20985: --Bug 5440038 and 5517131: Cleared the TODOs for complex work submission checks error messages
20986:
20987: FORALL i IN 1..l_line_num.COUNT
20988: INSERT INTO po_online_report_text_gt(online_report_id,
20989: last_update_login,
20990: last_updated_by,
20991: last_update_date,
20992: created_by,
21141: l_rowCount(i) := i;
21142: END LOOP;
21143:
21144: FORALL i IN 1..l_line_num.COUNT
21145: INSERT INTO po_online_report_text_gt (online_report_id,
21146: last_update_login,
21147: last_updated_by,
21148: last_update_date,
21149: created_by,
21351: , x_return_status OUT NOCOPY VARCHAR2
21352: )
21353: IS
21354:
21355: l_textline PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE;
21356: l_message_name FND_NEW_MESSAGES.MESSAGE_NAME%TYPE;
21357: l_calling_sequence VARCHAR2(100);
21358: l_invoice_type VARCHAR2(100) := 'BOTH';
21359: l_is_complex_po boolean;
21405: -- Handle Header final close / Unreserve SPO
21406: --
21407: IF (p_document_level = g_document_level_HEADER) THEN
21408:
21409: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
21410: ( online_report_id
21411: , last_update_login
21412: , last_updated_by
21413: , last_update_date
21440: --
21441: -- Handle Line final close / Unreserve SPO
21442: --
21443: ELSIF (p_document_level = g_document_level_LINE) THEN
21444: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
21445: ( online_report_id
21446: , last_update_login
21447: , last_updated_by
21448: , last_update_date
21475: --
21476: -- Handle Release Header related checks for unvalidated AP Invoices
21477: --
21478: ELSIF (p_document_type = 'RELEASE' AND p_document_level = g_document_level_HEADER) THEN
21479: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
21480: ( online_report_id
21481: , last_update_login
21482: , last_updated_by
21483: , last_update_date
21510: --
21511: -- Handle Shipment/Payitem final close and Unreserve(Both SPO and Release)
21512: --
21513: ELSIF (p_document_level = g_document_level_SHIPMENT) THEN
21514: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
21515: ( online_report_id
21516: , last_update_login
21517: , last_updated_by
21518: , last_update_date
21544: --
21545: -- Handle Distribution Unreserve(for both SPO/Release)
21546: --
21547: ELSIF (p_document_level=g_document_level_DISTRIBUTION AND p_action_requested = g_action_UNRESERVE) THEN
21548: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
21549: ( online_report_id
21550: , last_update_login
21551: , last_updated_by
21552: , last_update_date
21613: x_invoice_type OUT NOCOPY VARCHAR2,
21614: x_calling_sequence OUT NOCOPY VARCHAR2,
21615: x_return_status OUT NOCOPY VARCHAR2) IS
21616:
21617: l_textline PO_ONLINE_REPORT_TEXT_GT.text_line%TYPE;
21618: l_message_name FND_NEW_MESSAGES.MESSAGE_NAME%TYPE;
21619: l_calling_sequence VARCHAR2(100);
21620: l_invoice_type VARCHAR2(100) := 'BOTH';
21621: l_is_complex_po boolean := false;
21950:
21951: IF( debar_status = 'Y') THEN
21952: l_progress := '040';
21953:
21954: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
21955: ( online_report_id
21956: , last_update_login
21957: , last_updated_by
21958: , last_update_date
22066: ELSE
22067: BEGIN
22068: SELECT Nvl(Max(SEQUENCE), 0)
22069: INTO p_sequence
22070: FROM po_online_report_text_gt
22071: WHERE online_report_id = p_online_report_id;
22072: EXCEPTION
22073: WHEN OTHERS THEN
22074: p_sequence := 0;
22087: END;
22088:
22089: IF l_valid_co = 'N' THEN
22090: p_sequence := p_sequence + 1;
22091: INSERT INTO po_online_report_text_gt(online_report_id,
22092: last_update_login,
22093: last_updated_by,
22094: last_update_date,
22095: created_by,
22148: -- Warrant Validations
22149: -- Contracting Officer validations
22150: IF p_contracting_officer IS NULL THEN
22151: p_sequence := p_sequence + 1;
22152: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
22153: ( online_report_id
22154: , last_update_login
22155: , last_updated_by
22156: , last_update_date
22338: IF itemtype is not NULL and itemkey is not NULL THEN
22339: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,l_log_head || 'Warrant not found for the doc currency');
22340: END IF;
22341: p_sequence := p_sequence + 1;
22342: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
22343: ( online_report_id
22344: , last_update_login
22345: , last_updated_by
22346: , last_update_date
22364: , 'E');
22365: x_return_status := FND_API.G_RET_STS_ERROR;
22366: ELSIF l_warrant_amount < l_doc_amount THEN
22367: p_sequence := p_sequence + 1;
22368: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
22369: ( online_report_id
22370: , last_update_login
22371: , last_updated_by
22372: , last_update_date
22399: IF itemtype is not NULL and itemkey is not NULL THEN
22400: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,l_log_head || 'Warrant not found');
22401: END IF;
22402: p_sequence := p_sequence + 1;
22403: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
22404: ( online_report_id
22405: , last_update_login
22406: , last_updated_by
22407: , last_update_date
22566: FND_MESSAGE.set_name('PO', msg_name);
22567: l_err_msg_txt := FND_MESSAGE.GET;
22568:
22569:
22570: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
22571: ( online_report_id
22572: , last_update_login
22573: , last_updated_by
22574: , last_update_date
22636: --FND_MESSAGE.SET_TOKEN('LINE_LOCATION_TYPE', l_line_loc_token_value);
22637:
22638: --l_textline := FND_MESSAGE.GET;
22639: -- Percentage should be between 0 and 100
22640: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
22641: ( online_report_id
22642: , last_update_login
22643: , last_updated_by
22644: , last_update_date
22666: OR POH.clm_min_guar_award_amt_percent < 0);
22667:
22668: -- Maximum Ceiling Award Amount >= Maximum Per Order Amount
22669: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_IDV_MX_CL_AMT_GT_MXPM_CLM');
22670: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
22671: ( online_report_id
22672: , last_update_login
22673: , last_updated_by
22674: , last_update_date
22695: AND POH.amount_limit < POH.clm_max_order_amount;
22696:
22697: -- Maximum Per Order Amount(Line) <= Maximum Per Order Amount(Header)
22698: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_IDV_MX_AMT_H_GT_MX_AMT_L');
22699: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
22700: ( online_report_id
22701: , last_update_login
22702: , last_updated_by
22703: , last_update_date
22770:
22771: IF p_document_type IN ('PO') THEN
22772: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_CHARGE_NOT_NULL');
22773:
22774: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
22775: (ONLINE_REPORT_ID,
22776: LAST_UPDATE_LOGIN,
22777: LAST_UPDATED_BY,
22778: LAST_UPDATE_DATE,
22819: p_doc_type => g_document_type_PO
22820: , p_org_id => NULL)) THEN
22821:
22822: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_ALL_NO_BUDGET_FLEX');
22823: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
22824: (ONLINE_REPORT_ID,
22825: LAST_UPDATE_LOGIN,
22826: LAST_UPDATED_BY,
22827: LAST_UPDATE_DATE,
22923:
22924: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_LINE_SHIP_UOM_MISMATCH');
22925: IF P_DOCUMENT_TYPE ='RELEASE' THEN
22926:
22927: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
22928: (ONLINE_REPORT_ID,
22929: LAST_UPDATE_LOGIN,
22930: LAST_UPDATED_BY,
22931: LAST_UPDATE_DATE,
22962: AND PLL.PO_RELEASE_ID = P_DOCUMENT_ID;
22963:
22964: ELSIF P_DOCUMENT_TYPE ='PO' THEN -- Bug 12760632 [Restricting UOM mismatch check for Agreements]
22965:
22966: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
22967: (ONLINE_REPORT_ID,
22968: LAST_UPDATE_LOGIN,
22969: LAST_UPDATED_BY,
22970: LAST_UPDATE_DATE,
23125:
23126: /*
23127:
23128: This query will find out the distinct Charge accounts and LOAs which are using same ACRN
23129: and will insert them into po_online_report_text_gt to display error message.
23130: Logic of the query is as shown below
23131: Data:
23132:
23133: CHARGE_ACC | LOA | ACRN
23150: ACRN | ERROR_MESSAGE
23151: AA CHARGE_ACC A,E and LOA B,A
23152:
23153: These two values will be pased to form the message PO_DUPLICATE_ACRN which
23154: will be inserted into the po_online_report_text_gt
23155: */
23156: --Extracting the names from the
23157: l_loas := PO_CORE_S.get_translated_text('PO_LOA_DISPLAY');
23158: l_charge_acc := PO_CORE_S.get_translated_text('PO_CHARGE_ACC_DISP');
23156: --Extracting the names from the
23157: l_loas := PO_CORE_S.get_translated_text('PO_LOA_DISPLAY');
23158: l_charge_acc := PO_CORE_S.get_translated_text('PO_CHARGE_ACC_DISP');
23159:
23160: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
23161: (ONLINE_REPORT_ID,
23162: LAST_UPDATE_LOGIN,
23163: LAST_UPDATED_BY,
23164: LAST_UPDATE_DATE,
23257: CHARGE_LOA | ACRNS
23258: Charge Account A AA,AK
23259: LOA D AB,AE
23260: These two values will be pased to form the message PO_DUPLICATE_ACRN which
23261: will be inserted into the po_online_report_text_gt
23262: */
23263:
23264: INSERT
23265: INTO PO_ONLINE_REPORT_TEXT_GT
23261: will be inserted into the po_online_report_text_gt
23262: */
23263:
23264: INSERT
23265: INTO PO_ONLINE_REPORT_TEXT_GT
23266: (
23267: ONLINE_REPORT_ID,
23268: LAST_UPDATE_LOGIN,
23269: LAST_UPDATED_BY,
23408: IF (p_document_type = g_document_type_REQUISITION) THEN
23409: l_progress := 10;
23410: --Why:To check whether passed document has its associated WIP JOB closed or not?
23411:
23412: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
23413: ( online_report_id
23414: , last_update_login
23415: , last_updated_by
23416: , last_update_date
23458: ELSIF p_document_type = g_document_type_RELEASE THEN
23459: --- Document type RELEASE
23460: l_progress := 20;
23461:
23462: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
23463: ( online_report_id
23464: , last_update_login
23465: , last_updated_by
23466: , last_update_date
23515:
23516: ELSE--Other than document type RELEASE,REQUISITION
23517:
23518: l_progress := 30;
23519: INSERT INTO PO_ONLINE_REPORT_TEXT_GT
23520: ( online_report_id
23521: , last_update_login
23522: , last_updated_by
23523: , last_update_date
23625: PO_DEBUG.DEBUG_STMT( G_LOG_HEAD ||'.' || L_API_NAME ||'.', L_PROGRESS, 'REQUISITION' );
23626: END IF;
23627:
23628: -- Validate Req Charge Account
23629: INSERT INTO PO_ONLINE_REPORT_TEXT_GT(
23630: ONLINE_REPORT_ID,
23631: LAST_UPDATE_LOGIN,
23632: LAST_UPDATED_BY,
23633: LAST_UPDATE_DATE,
23682:
23683:
23684: -- Validate Req Budget Account
23685: IF PO_CORE_S.is_encumbrance_on( p_doc_type => p_document_type, p_org_id => NULL ) THEN
23686: INSERT INTO PO_ONLINE_REPORT_TEXT_GT(
23687: ONLINE_REPORT_ID,
23688: LAST_UPDATE_LOGIN,
23689: LAST_UPDATED_BY,
23690: LAST_UPDATE_DATE,
23739: END IF; ---End iSEncumbranceOn Check
23740:
23741:
23742: -- Validate Req Variance Account
23743: INSERT INTO PO_ONLINE_REPORT_TEXT_GT(
23744: ONLINE_REPORT_ID,
23745: LAST_UPDATE_LOGIN,
23746: LAST_UPDATED_BY,
23747: LAST_UPDATE_DATE,
23795: p_sequence := p_sequence + SQL%ROWCOUNT;
23796:
23797:
23798: -- Validate Req Accrual Account
23799: INSERT INTO PO_ONLINE_REPORT_TEXT_GT(
23800: ONLINE_REPORT_ID,
23801: LAST_UPDATE_LOGIN,
23802: LAST_UPDATED_BY,
23803: LAST_UPDATE_DATE,
23862: END IF;
23863:
23864:
23865: -- Validate Release Charge Account for non cancelled, non finally closed, not approved shipments.
23866: INSERT INTO PO_ONLINE_REPORT_TEXT_GT(
23867: ONLINE_REPORT_ID,
23868: LAST_UPDATE_LOGIN,
23869: LAST_UPDATED_BY,
23870: LAST_UPDATE_DATE,
23922:
23923: -- Validate Release Budget Account for non cancelled, non finally closed, not approved shipments.
23924: IF PO_CORE_S.is_encumbrance_on( p_doc_type => 'PO', p_org_id => NULL ) THEN
23925:
23926: INSERT INTO PO_ONLINE_REPORT_TEXT_GT(
23927: ONLINE_REPORT_ID,
23928: LAST_UPDATE_LOGIN,
23929: LAST_UPDATED_BY,
23930: LAST_UPDATE_DATE,
23982: END IF; --- Enc on Check
23983:
23984:
23985: -- Validate Release Accrual Account for shipments which are not approved atleast once.
23986: INSERT INTO PO_ONLINE_REPORT_TEXT_GT(
23987: ONLINE_REPORT_ID,
23988: LAST_UPDATE_LOGIN,
23989: LAST_UPDATED_BY,
23990: LAST_UPDATE_DATE,
24040: p_sequence := p_sequence + SQL%ROWCOUNT;
24041:
24042:
24043: -- Validate Release Variance Account for shipments which are not approved atleast once.
24044: INSERT INTO PO_ONLINE_REPORT_TEXT_GT(
24045: ONLINE_REPORT_ID,
24046: LAST_UPDATE_LOGIN,
24047: LAST_UPDATED_BY,
24048: LAST_UPDATE_DATE,
24107: PO_DEBUG.DEBUG_STMT( G_LOG_HEAD ||'.'|| L_API_NAME ||'.', L_PROGRESS, 'PO or BPA' );
24108: END IF;
24109:
24110: -- Validate PO Charge Account
24111: INSERT INTO PO_ONLINE_REPORT_TEXT_GT(
24112: ONLINE_REPORT_ID,
24113: LAST_UPDATE_LOGIN,
24114: LAST_UPDATED_BY,
24115: LAST_UPDATE_DATE,
24170:
24171: -- Validate PO/BPA Budget Account
24172: IF PO_CORE_S.is_encumbrance_on( p_doc_type => 'PO', p_org_id => NULL ) THEN
24173: -- Validate PO/BPA Budget Account
24174: INSERT INTO PO_ONLINE_REPORT_TEXT_GT(
24175: ONLINE_REPORT_ID,
24176: LAST_UPDATE_LOGIN,
24177: LAST_UPDATED_BY,
24178: LAST_UPDATE_DATE,
24237: END IF; --- Enc on Check
24238:
24239:
24240: -- Validate PO Accrual Account on shipments which are not approved atleast once.
24241: INSERT INTO PO_ONLINE_REPORT_TEXT_GT(
24242: ONLINE_REPORT_ID,
24243: LAST_UPDATE_LOGIN,
24244: LAST_UPDATED_BY,
24245: LAST_UPDATE_DATE,
24299: p_sequence := p_sequence + SQL%ROWCOUNT;
24300:
24301:
24302: -- Validate PO Variance Account on shipments which are not approved atleast once.
24303: INSERT INTO PO_ONLINE_REPORT_TEXT_GT(
24304: ONLINE_REPORT_ID,
24305: LAST_UPDATE_LOGIN,
24306: LAST_UPDATED_BY,
24307: LAST_UPDATE_DATE,
24539: END IF;
24540:
24541: l_textline := FND_MESSAGE.get_string('PO', 'CLM_NO_DELIVERY_PERIOD');
24542:
24543: INSERT INTO po_online_report_text_gt
24544: (online_report_id,
24545: last_update_login,
24546: last_updated_by,
24547: last_update_date,
24679: END IF;
24680:
24681: l_textline := FND_MESSAGE.get_string('PO', 'PO_PAY_INSTR_SEQ_NOT_SPECIFIED');
24682:
24683: INSERT INTO po_online_report_text_gt(
24684: online_report_id,
24685: last_update_login,
24686: last_updated_by,
24687: last_update_date,
24741: -- Check 2 : Payment instruction is specified as "SINGLE_FUNDING", and there exists multiple
24742: -- ACRN'son distributions against same line.
24743: l_textline := FND_MESSAGE.get_string('PO', 'PO_PAYMENT_INSTR_SINGLE_FUND');
24744:
24745: INSERT INTO po_online_report_text_gt(
24746: online_report_id,
24747: last_update_login,
24748: last_updated_by,
24749: last_update_date,
24786:
24787: -- Check 3 : Warning if Payment isntruction sequence is blank
24788: l_textline := FND_MESSAGE.get_string('PO', 'PO_PAYMENT_INSTR_BLANK');
24789:
24790: INSERT INTO po_online_report_text_gt(
24791: online_report_id,
24792: last_update_login,
24793: last_updated_by,
24794: last_update_date,
24835:
24836: -- If payment isntrc was changed to Manual in Mod at header level, warning to reverify sequence
24837: -- at distribution level must be thrown
24838: l_textline := FND_MESSAGE.get_string('PO', 'PO_PAY_INSTR_CHANGED_TO_MANUAL');
24839: INSERT INTO po_online_report_text_gt(
24840: online_report_id,
24841: last_update_login,
24842: last_updated_by,
24843: last_update_date,
24879: p_sequence := p_sequence + SQL%ROWCOUNT;
24880: l_textline := FND_MESSAGE.get_string('PO', 'PO_PAY_INSTR_CHANGED_TO_MANUAL');
24881: -- If payment instruction was changed to Manual in Mod at line level, warning to reverify sequence
24882: -- at distribution level must be thrown
24883: INSERT INTO po_online_report_text_gt(
24884: online_report_id,
24885: last_update_login,
24886: last_updated_by,
24887: last_update_date,
25000: -- then difference between earliset POP start date and latest POP end date
25001: -- cannot be beyond 12 months
25002: l_textline := FND_MESSAGE.get_string('PO', 'CLM_POP_BEYOND_12');
25003:
25004: INSERT INTO po_online_report_text_gt
25005: (online_report_id,
25006: last_update_login,
25007: last_updated_by,
25008: last_update_date,
25061: -- and fiscal year end date.
25062:
25063: l_textline := FND_MESSAGE.get_string('PO', 'CLM_POP_BEYOND_FISCAL_END');
25064:
25065: INSERT INTO po_online_report_text_gt
25066: (online_report_id,
25067: last_update_login,
25068: last_updated_by,
25069: last_update_date,
25148: -- Check 3 If Line type is Severable and delivery event is used
25149: -- then POP Duration cannot be beyond 12 months
25150: l_textline := FND_MESSAGE.get_string('PO', 'CLM_POP_DURATION_BEYOND_12');
25151:
25152: INSERT INTO po_online_report_text_gt
25153: (online_report_id,
25154: last_update_login,
25155: last_updated_by,
25156: last_update_date,
25272:
25273: ---UCA Check 1 for Undef Lines PDD should be greater than Sysdate
25274: l_progress := '000';
25275:
25276: INSERT INTO po_online_report_text_gt
25277: (online_report_id,
25278: last_update_login,
25279: last_updated_by,
25280: last_update_date,
25322: --and Undefinitization Description - and clicks on Submit
25323: l_progress := '001';
25324:
25325:
25326: INSERT INTO po_online_report_text_gt
25327: (online_report_id,
25328: last_update_login,
25329: last_updated_by,
25330: last_update_date,
25377: ---for a description based UCA and clicks on Submit
25378: l_progress := '002';
25379:
25380:
25381: INSERT INTO po_online_report_text_gt
25382: (online_report_id,
25383: last_update_login,
25384: last_updated_by,
25385: last_update_date,
25436: -------------------------------------------------------------------------------
25437: l_progress := '003';
25438:
25439:
25440: INSERT INTO po_online_report_text_gt
25441: (online_report_id,
25442: last_update_login,
25443: last_updated_by,
25444: last_update_date,
25497: --UCA Line level validation on PO Lines Find out
25498: --whether def is actually done or not.
25499: l_progress := '004';
25500:
25501: INSERT INTO po_online_report_text_gt
25502: (online_report_id,
25503: last_update_login,
25504: last_updated_by,
25505: last_update_date,
25611: PO_LOG.proc_begin(d_module, 'p_draft_id', p_draft_id);
25612: END IF;
25613:
25614:
25615: INSERT INTO po_online_report_text_gt
25616: (online_report_id,
25617: last_update_login,
25618: last_updated_by,
25619: last_update_date,
25654: PO_LOG.stmt(d_module, d_progress, 'p_sequence', p_sequence);
25655: END IF;
25656:
25657: -- Check for Invalid line-elin reference. Priced - Nsp and vice versa valid. No P-P or NSP-NSP
25658: INSERT INTO po_online_report_text_gt
25659: (online_report_id,
25660: last_update_login,
25661: last_updated_by,
25662: last_update_date,
25903: d_progress := 40;
25904: -- Check 1: If the award has MIPR own reference, FPDS reporting method should be 'Exempt'
25905: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_MIPR_CAR_EXEMPT');
25906:
25907: INSERT INTO po_online_report_text_gt(
25908: online_report_id,
25909: last_update_login,
25910: last_updated_by,
25911: last_update_date,
25936: d_progress := 50;
25937: -- Check 2: If award has MIPR own reference, Supplier communication method must be set to none.
25938: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_MIPR_COMM_METHOD_NONE');
25939:
25940: INSERT INTO po_online_report_text_gt(
25941: online_report_id,
25942: last_update_login,
25943: last_updated_by,
25944: last_update_date,
25965: d_progress := 60;
25966: -- Check 3: If award has MIPR own reference, Bilateral Indicator must be set to None
25967: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_MIPR_BILATERAL_IND_NONE');
25968:
25969: INSERT INTO po_online_report_text_gt(
25970: online_report_id,
25971: last_update_login,
25972: last_updated_by,
25973: last_update_date,
25994: d_progress := 70;
25995: -- Check 4: Multiple MIPR-Own are being referenced in the same award (Warning)
25996: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_MIPR_MULTI_OWN_REF');
25997:
25998: INSERT INTO po_online_report_text_gt(
25999: online_report_id,
26000: last_update_login,
26001: last_updated_by,
26002: last_update_date,
26029: d_progress := 80;
26030: -- Check 5: Dist is referencing MIPR-Own, and the award also references MIPR-Own of other Assisting agency
26031: -- l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_MIPR_MULTI_ASST_OFF_REF');
26032:
26033: INSERT INTO po_online_report_text_gt(
26034: online_report_id,
26035: last_update_login,
26036: last_updated_by,
26037: last_update_date,
26074: d_progress := 90;
26075: -- Check 6: Dist is referencing MIPR-Own, and the award also references PR/PAR/MIPR-Others
26076: -- l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_MIPR_OWN_AND_PR_REF');
26077:
26078: INSERT INTO po_online_report_text_gt(
26079: online_report_id,
26080: last_update_login,
26081: last_updated_by,
26082: last_update_date,
26114: d_progress := 100;
26115: -- Check 7: Dist is referencing MIPR-Own Direct Cite, and the award also references MIPR-Own Reimbursement
26116: -- l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_MIPR_MULTI_OBLIG_REF');
26117:
26118: INSERT INTO po_online_report_text_gt(
26119: online_report_id,
26120: last_update_login,
26121: last_updated_by,
26122: last_update_date,
26166: d_progress := 110;
26167: -- Check 8: PR/PAR and MIPR-Others are being referenced in the same award (Warning)
26168: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_MIPR_OTHERS_AND_PR_REF');
26169:
26170: INSERT INTO po_online_report_text_gt(
26171: online_report_id,
26172: last_update_login,
26173: last_updated_by,
26174: last_update_date,
26196: d_progress := 120;
26197: -- Check 9: MIPR-Others of different requesting agency are being referenced in the same award (Warning)
26198: l_textline := FND_MESSAGE.GET_STRING('PO', 'PO_MIPR_MULTI_REQ_OFF_REF');
26199:
26200: INSERT INTO po_online_report_text_gt(
26201: online_report_id,
26202: last_update_login,
26203: last_updated_by,
26204: last_update_date,
26287: END IF;
26288:
26289: IF ( P_DOCUMENT_TYPE = 'PO') THEN
26290:
26291: INSERT INTO PO_ONLINE_REPORT_TEXT_GT(
26292: ONLINE_REPORT_ID,
26293: LAST_UPDATE_LOGIN,
26294: LAST_UPDATED_BY,
26295: LAST_UPDATE_DATE,
26338: AND POH.PCARD_ID IS NULL;
26339:
26340: ELSIF ( P_DOCUMENT_TYPE = 'RELEASE') THEN
26341:
26342: INSERT INTO PO_ONLINE_REPORT_TEXT_GT(
26343: ONLINE_REPORT_ID,
26344: LAST_UPDATE_LOGIN,
26345: LAST_UPDATED_BY,
26346: LAST_UPDATE_DATE,
26598: (p_contract_rec.contract_id is NULL)
26599: )THEN
26600: l_user_currency := FND_PROFILE.VALUE_SPECIFIC('ICX_PREFERRED_CURRENCY', p_user_id);
26601: l_limit_amount := TO_CHAR(l_doc_threshold_amount, FND_CURRENCY.GET_FORMAT_MASK(l_user_currency ,60)) || ' ' || l_user_currency;
26602: INSERT INTO po_online_report_text_gt
26603: (online_report_id
26604: ,last_updated_by
26605: ,last_update_date
26606: ,created_by
26629:
26630: ELSIF( p_contract_rec.contract_id IS NOT NULL
26631: AND Nvl(p_contract_rec.contract_status_code,'X') <> 'SIGNED')THEN
26632:
26633: INSERT INTO po_online_report_text_gt
26634: (online_report_id
26635: ,last_updated_by
26636: ,last_update_date
26637: ,created_by