DBA Data[Home] [Help]

APPS.PO_DRAFT_APPR_STATUS_PVT dependencies on FND_API

Line 99: IF (p_draft_info.new_document = FND_API.G_TRUE) THEN

95: IF (PO_LOG.d_proc) THEN
96: PO_LOG.proc_begin(d_module);
97: END IF;
98:
99: IF (p_draft_info.new_document = FND_API.G_TRUE) THEN
100: RETURN;
101: END IF;
102:
103: d_position := 10;

Line 221: p_unlock_current => FND_API.G_FALSE

217: PO_DRAFTS_PVT.lock_document
218: ( p_po_header_id => p_draft_info.po_header_id,
219: p_role => PO_GLOBAL.g_ROLE_BUYER,
220: p_role_user_id => FND_GLOBAL.user_id,
221: p_unlock_current => FND_API.G_FALSE
222: );
223: --
224: END IF;
225: END IF;

Line 244: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

240: PO_MESSAGE_S.add_exc_msg
241: ( p_pkg_name => d_pkg_name,
242: p_procedure_name => d_api_name || '.' || d_position
243: );
244: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
245: END update_approval_status;
246:
247: -------------------------------------------------------
248: -------------- PRIVATE PROCEDURES ---------------------

Line 363: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

359: PO_MESSAGE_S.add_exc_msg
360: ( p_pkg_name => d_pkg_name,
361: p_procedure_name => d_api_name || '.' || d_position
362: );
363: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
364: END handle_shipment_approved_flag;
365:
366: -----------------------------------------------------------------------
367: --Start of Comments

Line 407: IF (p_draft_info.headers_changed = FND_API.G_FALSE) THEN

403: IF (PO_LOG.d_proc) THEN
404: PO_LOG.proc_begin(d_module);
405: END IF;
406:
407: IF (p_draft_info.headers_changed = FND_API.G_FALSE) THEN
408: RETURN;
409: END IF;
410:
411: d_position := 10;

Line 416: SELECT MAX(FND_API.G_TRUE)

412: --SQL What: Compare attributes of the transaction and draft record. Return 'Y'
413: -- if any of the attributes is different
414: --SQL Why: Need to figure out if the change triggers a change to approval
415: -- status
416: SELECT MAX(FND_API.G_TRUE)
417: INTO l_different
418: FROM dual
419: WHERE EXISTS
420: ( SELECT NULL

Line 452: IF (l_different = FND_API.G_TRUE) THEN

448: )
449: );
450:
451: d_position := 20;
452: IF (l_different = FND_API.G_TRUE) THEN
453:
454: IF (PO_LOG.d_stmt) THEN
455: PO_LOG.stmt(d_module, d_position, 'header causes approval change');
456: END IF;

Line 467: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

463: PO_MESSAGE_S.add_exc_msg
464: ( p_pkg_name => d_pkg_name,
465: p_procedure_name => d_api_name || '.' || d_position
466: );
467: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
468: END val_auth_status_header;
469:
470: -----------------------------------------------------------------------
471: --Start of Comments

Line 512: IF (p_draft_info.lines_changed = FND_API.G_FALSE) THEN

508: IF (PO_LOG.d_proc) THEN
509: PO_LOG.proc_begin(d_module);
510: END IF;
511:
512: IF (p_draft_info.lines_changed = FND_API.G_FALSE) THEN
513: RETURN;
514: END IF;
515:
516: d_position := 10;

Line 518: SELECT MAX(FND_API.G_TRUE)

514: END IF;
515:
516: d_position := 10;
517: -- Change auth status if there is a new line
518: SELECT MAX(FND_API.G_TRUE)
519: INTO l_has_new_records
520: FROM dual
521: WHERE EXISTS
522: ( SELECT NULL

Line 532: IF (l_has_new_records = FND_API.G_TRUE) THEN

528: ( SELECT NULL
529: FROM po_lines_all PL
530: WHERE PLD.po_line_id = PL.po_line_id));
531:
532: IF (l_has_new_records = FND_API.G_TRUE) THEN
533: IF (PO_LOG.d_stmt) THEN
534: PO_LOG.stmt(d_module, d_position, 'new reocrds at line - approval change');
535: END IF;
536:

Line 549: SELECT MAX(FND_API.G_TRUE)

545: --SQL What: Compare attributes of the transaction and draft record. Return 'Y'
546: -- if any of the attributes is different
547: --SQL Why: Need to figure out if the change triggers a change to approval
548: -- status
549: SELECT MAX(FND_API.G_TRUE)
550: INTO l_different
551: FROM dual
552: WHERE EXISTS
553: ( SELECT NULL

Line 595: IF (l_different = FND_API.G_TRUE) THEN

591: )
592: );
593:
594: d_position := 20;
595: IF (l_different = FND_API.G_TRUE) THEN
596: IF (PO_LOG.d_stmt) THEN
597: PO_LOG.stmt(d_module, d_position, 'Line causes approval change');
598: END IF;
599:

Line 610: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

606: PO_MESSAGE_S.add_exc_msg
607: ( p_pkg_name => d_pkg_name,
608: p_procedure_name => d_api_name || '.' || d_position
609: );
610: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
611: END val_auth_status_line;
612:
613:
614: -----------------------------------------------------------------------

Line 660: IF (p_draft_info.line_locations_changed = FND_API.G_FALSE) THEN

656: IF (PO_LOG.d_proc) THEN
657: PO_LOG.proc_begin(d_module);
658: END IF;
659:
660: IF (p_draft_info.line_locations_changed = FND_API.G_FALSE) THEN
661: RETURN;
662: END IF;
663:
664: d_position := 10;

Line 666: SELECT MAX(FND_API.G_TRUE)

662: END IF;
663:
664: d_position := 10;
665: -- Change auth status if there is a new line
666: SELECT MAX(FND_API.G_TRUE)
667: INTO l_has_new_records
668: FROM dual
669: WHERE EXISTS
670: ( SELECT NULL

Line 680: IF (l_has_new_records = FND_API.G_TRUE) THEN

676: ( SELECT NULL
677: FROM po_line_locations_all PLL
678: WHERE PLLD.line_location_id = PLL.line_location_id));
679:
680: IF (l_has_new_records = FND_API.G_TRUE) THEN
681: IF (PO_LOG.d_stmt) THEN
682: PO_LOG.stmt(d_module, d_position, 'New shipments - approval change');
683: END IF;
684:

Line 734: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

730: PO_MESSAGE_S.add_exc_msg
731: ( p_pkg_name => d_pkg_name,
732: p_procedure_name => d_api_name || '.' || d_position
733: );
734: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
735: END val_auth_status_line_loc;
736:
737: -----------------------------------------------------------------------
738: --Start of Comments

Line 783: IF (p_draft_info.distributions_changed = FND_API.G_FALSE) THEN

779: IF (PO_LOG.d_proc) THEN
780: PO_LOG.proc_begin(d_module);
781: END IF;
782:
783: IF (p_draft_info.distributions_changed = FND_API.G_FALSE) THEN
784: RETURN;
785: END IF;
786:
787: d_position := 10;

Line 789: SELECT MAX(FND_API.G_TRUE)

785: END IF;
786:
787: d_position := 10;
788: -- Change auth status if there is a new line
789: SELECT MAX(FND_API.G_TRUE)
790: INTO l_has_new_records
791: FROM dual
792: WHERE EXISTS
793: ( SELECT NULL

Line 803: IF (l_has_new_records = FND_API.G_TRUE) THEN

799: ( SELECT NULL
800: FROM po_distributions_all PD
801: WHERE PDD.po_distribution_id = PD.po_distribution_id));
802:
803: IF (l_has_new_records = FND_API.G_TRUE) THEN
804: IF (PO_LOG.d_stmt) THEN
805: PO_LOG.stmt(d_module, d_position, 'New distribution: approval change');
806: END IF;
807:

Line 853: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

849: PO_MESSAGE_S.add_exc_msg
850: ( p_pkg_name => d_pkg_name,
851: p_procedure_name => d_api_name || '.' || d_position
852: );
853: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
854: END val_auth_status_dist;
855:
856: -----------------------------------------------------------------------
857: --Start of Comments

Line 896: IF (p_draft_info.ga_org_assign_changed = FND_API.G_TRUE) THEN

892: IF (PO_LOG.d_proc) THEN
893: PO_LOG.proc_begin(d_module);
894: END IF;
895:
896: IF (p_draft_info.ga_org_assign_changed = FND_API.G_TRUE) THEN
897: IF (PO_LOG.d_stmt) THEN
898: PO_LOG.stmt(d_module, d_position, 'Org assign change - approval changes');
899: END IF;
900:

Line 910: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

906: PO_MESSAGE_S.add_exc_msg
907: ( p_pkg_name => d_pkg_name,
908: p_procedure_name => d_api_name || '.' || d_position
909: );
910: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
911: END val_auth_status_org_assign;
912:
913: -----------------------------------------------------------------------
914: --Start of Comments

Line 953: IF (p_draft_info.price_diff_changed = FND_API.G_TRUE) THEN

949: IF (PO_LOG.d_proc) THEN
950: PO_LOG.proc_begin(d_module);
951: END IF;
952:
953: IF (p_draft_info.price_diff_changed = FND_API.G_TRUE) THEN
954: IF (PO_LOG.d_stmt) THEN
955: PO_LOG.stmt(d_module, d_position,
956: 'price diff changes cause approval change');
957: END IF;

Line 968: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

964: PO_MESSAGE_S.add_exc_msg
965: ( p_pkg_name => d_pkg_name,
966: p_procedure_name => d_api_name || '.' || d_position
967: );
968: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
969: END val_auth_status_price_diff;
970:
971: END PO_DRAFT_APPR_STATUS_PVT;