825: l_num_terms_to_compare CONSTANT NUMBER := 10;
826:
827: BEGIN
828: IF (p_ref_doc_type = 'CONTRACT') THEN
829: FND_MESSAGE.set_name('PO', 'PO_CONTRACT_AGREEMENT');
830: l_doc_type_token := FND_MESSAGE.get;
831: ELSIF (p_ref_doc_type IN ('QUOTATION', 'GA')) THEN
832: PO_CORE_S.get_displayed_value
833: ( x_lookup_type => 'PO SOURCE DOCUMENT TYPE',
826:
827: BEGIN
828: IF (p_ref_doc_type = 'CONTRACT') THEN
829: FND_MESSAGE.set_name('PO', 'PO_CONTRACT_AGREEMENT');
830: l_doc_type_token := FND_MESSAGE.get;
831: ELSIF (p_ref_doc_type IN ('QUOTATION', 'GA')) THEN
832: PO_CORE_S.get_displayed_value
833: ( x_lookup_type => 'PO SOURCE DOCUMENT TYPE',
834: x_lookup_code => p_ref_doc_type,
835: x_disp_value => l_doc_type_token
836: );
837: END IF;
838:
839: FND_MESSAGE.set_name('PO', 'PO_PO_AND_REF_TERMS_MISMATCH');
840:
841: FND_MESSAGE.set_token('DOC_TYPE', l_doc_type_token);
842:
843: IF (p_comparison_scope IN (G_COMPARISON_SCOPE_GLOBAL,
837: END IF;
838:
839: FND_MESSAGE.set_name('PO', 'PO_PO_AND_REF_TERMS_MISMATCH');
840:
841: FND_MESSAGE.set_token('DOC_TYPE', l_doc_type_token);
842:
843: IF (p_comparison_scope IN (G_COMPARISON_SCOPE_GLOBAL,
844: G_COMPARISON_SCOPE_ALL)) THEN
845:
843: IF (p_comparison_scope IN (G_COMPARISON_SCOPE_GLOBAL,
844: G_COMPARISON_SCOPE_ALL)) THEN
845:
846: IF (p_comparison_result.terms_id_eq = 'N') THEN
847: l_prompt := FND_MESSAGE.get_string('PO', 'POS_PAYMENT_TERMS');
848:
849: l_po_terms_val :=
850: PO_VENDORS_SV.get_terms_dsp(p_terms_rec1.terms_id);
851: l_ref_terms_val :=
858: x_ref_terms_list => l_ref_terms_list);
859: END IF;
860:
861: IF (p_comparison_result.fob_lookup_code_eq = 'N') THEN
862: l_prompt := FND_MESSAGE.get_string('PO', 'POS_FOB');
863:
864: PO_CORE_S.get_displayed_value
865: ( x_lookup_type => 'FOB',
866: x_lookup_code => p_terms_rec1.fob_lookup_code,
880: x_ref_terms_list => l_ref_terms_list);
881: END IF;
882:
883: IF (p_comparison_result.freight_terms_lookup_code_eq = 'N') THEN
884: l_prompt := FND_MESSAGE.get_string('PO', 'POS_FREIGHT_TERMS');
885:
886: PO_CORE_S.get_displayed_value
887: ( x_lookup_type => 'FREIGHT TERMS',
888: x_lookup_code => p_terms_rec1.freight_terms_lookup_code,
902: x_ref_terms_list => l_ref_terms_list);
903: END IF;
904:
905: IF (p_comparison_result.note_to_vendor_eq = 'N') THEN
906: l_prompt := FND_MESSAGE.get_string('PO', 'POS_NOTE_TO_VENDOR');
907:
908: l_po_terms_val := SUBSTRB(p_terms_rec1.note_to_vendor, 1, 200);
909: l_ref_terms_val := SUBSTRB(p_terms_rec2.note_to_vendor, 1, 200);
910:
915: x_ref_terms_list => l_ref_terms_list);
916: END IF;
917:
918: IF (p_comparison_result.note_to_receiver_eq = 'N') THEN
919: l_prompt := FND_MESSAGE.get_string('PO', 'POS_NOTE_TO_RECEIVER');
920:
921: l_po_terms_val := SUBSTRB(p_terms_rec1.note_to_receiver, 1, 200);
922: l_ref_terms_val := SUBSTRB(p_terms_rec2.note_to_receiver, 1, 200);
923:
928: x_ref_terms_list => l_ref_terms_list);
929: END IF;
930:
931: IF (p_comparison_result.shipping_control_eq = 'N') THEN
932: l_prompt := FND_MESSAGE.get_string('PO', 'POS_SHIPPING_CONTROL');
933:
934: PO_CORE_S.get_displayed_value
935: ( x_lookup_type => 'SHIPPING CONTROL',
936: x_lookup_code => p_terms_rec1.shipping_control,
954: IF (p_comparison_scope IN (G_COMPARISON_SCOPE_LOCAL,
955: G_COMPARISON_SCOPE_ALL)) THEN
956:
957: IF (p_comparison_result.pay_on_code_eq = 'N') THEN
958: l_prompt := FND_MESSAGE.get_string('PO', 'POS_PAY_ON');
959:
960: PO_CORE_S.get_displayed_value
961: ( x_lookup_type => 'PAY ON CODE',
962: x_lookup_code => p_terms_rec1.pay_on_code,
976: x_ref_terms_list => l_ref_terms_list);
977: END IF;
978:
979: IF (p_comparison_result.bill_to_location_id_eq = 'N') THEN
980: l_prompt := FND_MESSAGE.get_string('PO', 'POS_BILL_TO');
981:
982: l_po_terms_val :=
983: PO_LOCATIONS_S.get_location_code
984: ( p_location_id => p_terms_rec1.bill_to_location_id
996: x_ref_terms_list => l_ref_terms_list);
997: END IF;
998:
999: IF (p_comparison_result.ship_to_location_id_eq = 'N') THEN
1000: l_prompt := FND_MESSAGE.get_string('PO', 'POS_SHIP_TO');
1001:
1002: l_po_terms_val :=
1003: PO_LOCATIONS_S.get_location_code
1004: ( p_location_id => p_terms_rec1.ship_to_location_id
1016: x_ref_terms_list => l_ref_terms_list);
1017: END IF;
1018:
1019: IF (p_comparison_result.ship_via_lookup_code_eq = 'N') THEN
1020: l_prompt := FND_MESSAGE.get_string('PO', 'POS_SHIP_VIA');
1021:
1022: l_po_terms_val := p_terms_rec1.ship_via_lookup_code;
1023: l_ref_terms_val := p_terms_rec2.ship_via_lookup_code;
1024:
1030: END IF;
1031:
1032: END IF; -- scope IN ('LOCAL', 'ALL')
1033:
1034: FND_MESSAGE.set_name('PO', 'PO_PO_AND_REF_TERMS_MISMATCH');
1035:
1036: FND_MESSAGE.set_token('DOC_TYPE', l_doc_type_token);
1037: FND_MESSAGE.set_token('PO_TERMS', l_po_terms_list);
1038: FND_MESSAGE.set_token('REF_DOC_TERMS', l_ref_terms_list);
1032: END IF; -- scope IN ('LOCAL', 'ALL')
1033:
1034: FND_MESSAGE.set_name('PO', 'PO_PO_AND_REF_TERMS_MISMATCH');
1035:
1036: FND_MESSAGE.set_token('DOC_TYPE', l_doc_type_token);
1037: FND_MESSAGE.set_token('PO_TERMS', l_po_terms_list);
1038: FND_MESSAGE.set_token('REF_DOC_TERMS', l_ref_terms_list);
1039:
1040: EXCEPTION
1033:
1034: FND_MESSAGE.set_name('PO', 'PO_PO_AND_REF_TERMS_MISMATCH');
1035:
1036: FND_MESSAGE.set_token('DOC_TYPE', l_doc_type_token);
1037: FND_MESSAGE.set_token('PO_TERMS', l_po_terms_list);
1038: FND_MESSAGE.set_token('REF_DOC_TERMS', l_ref_terms_list);
1039:
1040: EXCEPTION
1041: WHEN OTHERS THEN
1034: FND_MESSAGE.set_name('PO', 'PO_PO_AND_REF_TERMS_MISMATCH');
1035:
1036: FND_MESSAGE.set_token('DOC_TYPE', l_doc_type_token);
1037: FND_MESSAGE.set_token('PO_TERMS', l_po_terms_list);
1038: FND_MESSAGE.set_token('REF_DOC_TERMS', l_ref_terms_list);
1039:
1040: EXCEPTION
1041: WHEN OTHERS THEN
1042: PO_MESSAGE_S.sql_error(l_api_name, '000', sqlcode);
1084: l_colon VARCHAR2(3);
1085: l_line_break VARCHAR2(1);
1086: BEGIN
1087:
1088: FND_MESSAGE.set_name ('PO', 'PO_ATTR_PROMPT_AND_VALUE');
1089: FND_MESSAGE.set_token ('ATTRIBUTE', p_prompt);
1090: FND_MESSAGE.set_token ('VALUE', p_po_terms_val);
1091: x_po_terms_list := x_po_terms_list || FND_MESSAGE.get;
1092:
1085: l_line_break VARCHAR2(1);
1086: BEGIN
1087:
1088: FND_MESSAGE.set_name ('PO', 'PO_ATTR_PROMPT_AND_VALUE');
1089: FND_MESSAGE.set_token ('ATTRIBUTE', p_prompt);
1090: FND_MESSAGE.set_token ('VALUE', p_po_terms_val);
1091: x_po_terms_list := x_po_terms_list || FND_MESSAGE.get;
1092:
1093: FND_MESSAGE.set_name ('PO', 'PO_ATTR_PROMPT_AND_VALUE');
1086: BEGIN
1087:
1088: FND_MESSAGE.set_name ('PO', 'PO_ATTR_PROMPT_AND_VALUE');
1089: FND_MESSAGE.set_token ('ATTRIBUTE', p_prompt);
1090: FND_MESSAGE.set_token ('VALUE', p_po_terms_val);
1091: x_po_terms_list := x_po_terms_list || FND_MESSAGE.get;
1092:
1093: FND_MESSAGE.set_name ('PO', 'PO_ATTR_PROMPT_AND_VALUE');
1094: FND_MESSAGE.set_token ('ATTRIBUTE', p_prompt);
1087:
1088: FND_MESSAGE.set_name ('PO', 'PO_ATTR_PROMPT_AND_VALUE');
1089: FND_MESSAGE.set_token ('ATTRIBUTE', p_prompt);
1090: FND_MESSAGE.set_token ('VALUE', p_po_terms_val);
1091: x_po_terms_list := x_po_terms_list || FND_MESSAGE.get;
1092:
1093: FND_MESSAGE.set_name ('PO', 'PO_ATTR_PROMPT_AND_VALUE');
1094: FND_MESSAGE.set_token ('ATTRIBUTE', p_prompt);
1095: FND_MESSAGE.set_token ('VALUE', p_ref_terms_val);
1089: FND_MESSAGE.set_token ('ATTRIBUTE', p_prompt);
1090: FND_MESSAGE.set_token ('VALUE', p_po_terms_val);
1091: x_po_terms_list := x_po_terms_list || FND_MESSAGE.get;
1092:
1093: FND_MESSAGE.set_name ('PO', 'PO_ATTR_PROMPT_AND_VALUE');
1094: FND_MESSAGE.set_token ('ATTRIBUTE', p_prompt);
1095: FND_MESSAGE.set_token ('VALUE', p_ref_terms_val);
1096: x_ref_terms_list := x_ref_terms_list || FND_MESSAGE.get;
1097:
1090: FND_MESSAGE.set_token ('VALUE', p_po_terms_val);
1091: x_po_terms_list := x_po_terms_list || FND_MESSAGE.get;
1092:
1093: FND_MESSAGE.set_name ('PO', 'PO_ATTR_PROMPT_AND_VALUE');
1094: FND_MESSAGE.set_token ('ATTRIBUTE', p_prompt);
1095: FND_MESSAGE.set_token ('VALUE', p_ref_terms_val);
1096: x_ref_terms_list := x_ref_terms_list || FND_MESSAGE.get;
1097:
1098: EXCEPTION
1091: x_po_terms_list := x_po_terms_list || FND_MESSAGE.get;
1092:
1093: FND_MESSAGE.set_name ('PO', 'PO_ATTR_PROMPT_AND_VALUE');
1094: FND_MESSAGE.set_token ('ATTRIBUTE', p_prompt);
1095: FND_MESSAGE.set_token ('VALUE', p_ref_terms_val);
1096: x_ref_terms_list := x_ref_terms_list || FND_MESSAGE.get;
1097:
1098: EXCEPTION
1099: WHEN OTHERS THEN
1092:
1093: FND_MESSAGE.set_name ('PO', 'PO_ATTR_PROMPT_AND_VALUE');
1094: FND_MESSAGE.set_token ('ATTRIBUTE', p_prompt);
1095: FND_MESSAGE.set_token ('VALUE', p_ref_terms_val);
1096: x_ref_terms_list := x_ref_terms_list || FND_MESSAGE.get;
1097:
1098: EXCEPTION
1099: WHEN OTHERS THEN
1100: PO_MESSAGE_S.sql_error(l_api_name, '000', sqlcode);