19:
20: 4. Fixing Bug 995239. Modify procedure VQR_Frames and draw_frames
21: Add a local variable l_plan_name. Use a cursor to fetch this
22: and use it in the call to pos_upper_banner_sv.PaintUpperBanner
23: (Minor performance issue: dont query fnd_messages in pos pkg if not needed.
24: Ayeung is the PO contact for the above).
25:
26: 5. Bug 999521 fix: Procedure list_plans modified
27: Private func Is_Job_Valid added
474: -- col_count has the no.of cols in the plan
475:
476: fnd_date.initialize(l_date_format); -- to set user mask
477: -- fnd_number.initialize( );
478: fnd_message.clear;
479:
480: No_problem := TRUE; -- initialize this to true
481:
482: SAVEPOINT start_inserting;
849: values_tab(c), script, tailscript);
850:
851: if (flg1 = 2) then
852: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
853: fnd_message.set_name('QA', 'QA_SS_INVALID_NUM');
854: fnd_message.set_token('ROWNUMBER', r);
855: fnd_message.set_token('COLNUMBER', c);
856: fnd_message.set_token('ELEMENT', l_prompt);
857: -- icx_util.add_error(fnd_message.get);
850:
851: if (flg1 = 2) then
852: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
853: fnd_message.set_name('QA', 'QA_SS_INVALID_NUM');
854: fnd_message.set_token('ROWNUMBER', r);
855: fnd_message.set_token('COLNUMBER', c);
856: fnd_message.set_token('ELEMENT', l_prompt);
857: -- icx_util.add_error(fnd_message.get);
858: htp.p(''||fnd_message.get||'');
851: if (flg1 = 2) then
852: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
853: fnd_message.set_name('QA', 'QA_SS_INVALID_NUM');
854: fnd_message.set_token('ROWNUMBER', r);
855: fnd_message.set_token('COLNUMBER', c);
856: fnd_message.set_token('ELEMENT', l_prompt);
857: -- icx_util.add_error(fnd_message.get);
858: htp.p(''||fnd_message.get||'');
859: htp.nl;
852: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
853: fnd_message.set_name('QA', 'QA_SS_INVALID_NUM');
854: fnd_message.set_token('ROWNUMBER', r);
855: fnd_message.set_token('COLNUMBER', c);
856: fnd_message.set_token('ELEMENT', l_prompt);
857: -- icx_util.add_error(fnd_message.get);
858: htp.p(''||fnd_message.get||'');
859: htp.nl;
860: No_problem := FALSE; -- this means, there is some error
853: fnd_message.set_name('QA', 'QA_SS_INVALID_NUM');
854: fnd_message.set_token('ROWNUMBER', r);
855: fnd_message.set_token('COLNUMBER', c);
856: fnd_message.set_token('ELEMENT', l_prompt);
857: -- icx_util.add_error(fnd_message.get);
858: htp.p(''||fnd_message.get||'');
859: htp.nl;
860: No_problem := FALSE; -- this means, there is some error
861: elsif (flg1 = 3) then
854: fnd_message.set_token('ROWNUMBER', r);
855: fnd_message.set_token('COLNUMBER', c);
856: fnd_message.set_token('ELEMENT', l_prompt);
857: -- icx_util.add_error(fnd_message.get);
858: htp.p(''||fnd_message.get||'');
859: htp.nl;
860: No_problem := FALSE; -- this means, there is some error
861: elsif (flg1 = 3) then
862: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
859: htp.nl;
860: No_problem := FALSE; -- this means, there is some error
861: elsif (flg1 = 3) then
862: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
863: fnd_message.set_name('QA', 'QA_SS_INVALID_DATE');
864: fnd_message.set_token('ROWNUMBER', r);
865: fnd_message.set_token('COLNUMBER', c);
866: fnd_message.set_token('ELEMENT', l_prompt);
867: -- icx_util.add_error(fnd_message.get);
860: No_problem := FALSE; -- this means, there is some error
861: elsif (flg1 = 3) then
862: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
863: fnd_message.set_name('QA', 'QA_SS_INVALID_DATE');
864: fnd_message.set_token('ROWNUMBER', r);
865: fnd_message.set_token('COLNUMBER', c);
866: fnd_message.set_token('ELEMENT', l_prompt);
867: -- icx_util.add_error(fnd_message.get);
868: htp.p(''||fnd_message.get||'');
861: elsif (flg1 = 3) then
862: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
863: fnd_message.set_name('QA', 'QA_SS_INVALID_DATE');
864: fnd_message.set_token('ROWNUMBER', r);
865: fnd_message.set_token('COLNUMBER', c);
866: fnd_message.set_token('ELEMENT', l_prompt);
867: -- icx_util.add_error(fnd_message.get);
868: htp.p(''||fnd_message.get||'');
869: htp.nl;
862: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
863: fnd_message.set_name('QA', 'QA_SS_INVALID_DATE');
864: fnd_message.set_token('ROWNUMBER', r);
865: fnd_message.set_token('COLNUMBER', c);
866: fnd_message.set_token('ELEMENT', l_prompt);
867: -- icx_util.add_error(fnd_message.get);
868: htp.p(''||fnd_message.get||'');
869: htp.nl;
870: No_problem := FALSE; -- this means, there is some error
863: fnd_message.set_name('QA', 'QA_SS_INVALID_DATE');
864: fnd_message.set_token('ROWNUMBER', r);
865: fnd_message.set_token('COLNUMBER', c);
866: fnd_message.set_token('ELEMENT', l_prompt);
867: -- icx_util.add_error(fnd_message.get);
868: htp.p(''||fnd_message.get||'');
869: htp.nl;
870: No_problem := FALSE; -- this means, there is some error
871: elsif (flg1 = 4) then
864: fnd_message.set_token('ROWNUMBER', r);
865: fnd_message.set_token('COLNUMBER', c);
866: fnd_message.set_token('ELEMENT', l_prompt);
867: -- icx_util.add_error(fnd_message.get);
868: htp.p(''||fnd_message.get||'');
869: htp.nl;
870: No_problem := FALSE; -- this means, there is some error
871: elsif (flg1 = 4) then
872: -- Adding if statement, Sep 13, 1999 -- talked to mmpatel
873: -- accept null context elems even if they r mandatory BUG 998445
874: if (NOT CxE(charid_tab(c), txn_num)) -- if not a ctx elem, then process
875: then
876: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
877: fnd_message.set_name('QA', 'QA_SS_MAND_VALUE');
878: fnd_message.set_token('ROWNUMBER', r);
879: fnd_message.set_token('COLNUMBER', c);
880: fnd_message.set_token('ELEMENT', l_prompt);
881: -- icx_util.add_error(fnd_message.get);
874: if (NOT CxE(charid_tab(c), txn_num)) -- if not a ctx elem, then process
875: then
876: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
877: fnd_message.set_name('QA', 'QA_SS_MAND_VALUE');
878: fnd_message.set_token('ROWNUMBER', r);
879: fnd_message.set_token('COLNUMBER', c);
880: fnd_message.set_token('ELEMENT', l_prompt);
881: -- icx_util.add_error(fnd_message.get);
882: htp.p(''||fnd_message.get||'');
875: then
876: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
877: fnd_message.set_name('QA', 'QA_SS_MAND_VALUE');
878: fnd_message.set_token('ROWNUMBER', r);
879: fnd_message.set_token('COLNUMBER', c);
880: fnd_message.set_token('ELEMENT', l_prompt);
881: -- icx_util.add_error(fnd_message.get);
882: htp.p(''||fnd_message.get||'');
883: htp.nl;
876: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
877: fnd_message.set_name('QA', 'QA_SS_MAND_VALUE');
878: fnd_message.set_token('ROWNUMBER', r);
879: fnd_message.set_token('COLNUMBER', c);
880: fnd_message.set_token('ELEMENT', l_prompt);
881: -- icx_util.add_error(fnd_message.get);
882: htp.p(''||fnd_message.get||'');
883: htp.nl;
884: No_problem := FALSE; -- this means, there is some error
877: fnd_message.set_name('QA', 'QA_SS_MAND_VALUE');
878: fnd_message.set_token('ROWNUMBER', r);
879: fnd_message.set_token('COLNUMBER', c);
880: fnd_message.set_token('ELEMENT', l_prompt);
881: -- icx_util.add_error(fnd_message.get);
882: htp.p(''||fnd_message.get||'');
883: htp.nl;
884: No_problem := FALSE; -- this means, there is some error
885: end if;
878: fnd_message.set_token('ROWNUMBER', r);
879: fnd_message.set_token('COLNUMBER', c);
880: fnd_message.set_token('ELEMENT', l_prompt);
881: -- icx_util.add_error(fnd_message.get);
882: htp.p(''||fnd_message.get||'');
883: htp.nl;
884: No_problem := FALSE; -- this means, there is some error
885: end if;
886: elsif (flg1 = 1) then
884: No_problem := FALSE; -- this means, there is some error
885: end if;
886: elsif (flg1 = 1) then
887: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
888: fnd_message.set_name('QA', 'QA_SS_GENERIC_INVALID');
889: fnd_message.set_token('ROWNUMBER', r);
890: fnd_message.set_token('COLNUMBER', c);
891: fnd_message.set_token('ELEMENT', l_prompt);
892: -- icx_util.add_error(fnd_message.get);
885: end if;
886: elsif (flg1 = 1) then
887: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
888: fnd_message.set_name('QA', 'QA_SS_GENERIC_INVALID');
889: fnd_message.set_token('ROWNUMBER', r);
890: fnd_message.set_token('COLNUMBER', c);
891: fnd_message.set_token('ELEMENT', l_prompt);
892: -- icx_util.add_error(fnd_message.get);
893: htp.p(''||fnd_message.get||'');
886: elsif (flg1 = 1) then
887: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
888: fnd_message.set_name('QA', 'QA_SS_GENERIC_INVALID');
889: fnd_message.set_token('ROWNUMBER', r);
890: fnd_message.set_token('COLNUMBER', c);
891: fnd_message.set_token('ELEMENT', l_prompt);
892: -- icx_util.add_error(fnd_message.get);
893: htp.p(''||fnd_message.get||'');
894: htp.nl;
887: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
888: fnd_message.set_name('QA', 'QA_SS_GENERIC_INVALID');
889: fnd_message.set_token('ROWNUMBER', r);
890: fnd_message.set_token('COLNUMBER', c);
891: fnd_message.set_token('ELEMENT', l_prompt);
892: -- icx_util.add_error(fnd_message.get);
893: htp.p(''||fnd_message.get||'');
894: htp.nl;
895: No_problem := FALSE; -- this means, there is some error
888: fnd_message.set_name('QA', 'QA_SS_GENERIC_INVALID');
889: fnd_message.set_token('ROWNUMBER', r);
890: fnd_message.set_token('COLNUMBER', c);
891: fnd_message.set_token('ELEMENT', l_prompt);
892: -- icx_util.add_error(fnd_message.get);
893: htp.p(''||fnd_message.get||'');
894: htp.nl;
895: No_problem := FALSE; -- this means, there is some error
896: end if; -- end flg1 check
889: fnd_message.set_token('ROWNUMBER', r);
890: fnd_message.set_token('COLNUMBER', c);
891: fnd_message.set_token('ELEMENT', l_prompt);
892: -- icx_util.add_error(fnd_message.get);
893: htp.p(''||fnd_message.get||'');
894: htp.nl;
895: No_problem := FALSE; -- this means, there is some error
896: end if; -- end flg1 check
897: end loop; -- columns loop
926:
927: -- COMMIT; -- commented out after aug 11 frz for usability fix
928:
929: If (rows_selected = FALSE) Then
930: htp.p(fnd_message.get_string('QA', 'QA_SS_NO_CHANGES')); -- New code
931: -- Need new fnd seed data july 28, 1999
932:
933: Elsif (No_problem = TRUE) Then
934: fnd_message.set_name('QA', 'QA_SS_INSERT_OK');
930: htp.p(fnd_message.get_string('QA', 'QA_SS_NO_CHANGES')); -- New code
931: -- Need new fnd seed data july 28, 1999
932:
933: Elsif (No_problem = TRUE) Then
934: fnd_message.set_name('QA', 'QA_SS_INSERT_OK');
935: htp.p(fnd_message.get);
936: Commit; -- there was no problem so we can commit
937:
938: Else
931: -- Need new fnd seed data july 28, 1999
932:
933: Elsif (No_problem = TRUE) Then
934: fnd_message.set_name('QA', 'QA_SS_INSERT_OK');
935: htp.p(fnd_message.get);
936: Commit; -- there was no problem so we can commit
937:
938: Else
939: -- icx_admin_sig.error_screen(fnd_message.get);
935: htp.p(fnd_message.get);
936: Commit; -- there was no problem so we can commit
937:
938: Else
939: -- icx_admin_sig.error_screen(fnd_message.get);
940: -- commented out after aug 11 frz for usability fix
941: htp.p(fnd_message.get_string('QA', 'QA_SS_INSERT_NOT_OK'));
942: Rollback to start_inserting; -- rollback any inserts issued
943:
937:
938: Else
939: -- icx_admin_sig.error_screen(fnd_message.get);
940: -- commented out after aug 11 frz for usability fix
941: htp.p(fnd_message.get_string('QA', 'QA_SS_INSERT_NOT_OK'));
942: Rollback to start_inserting; -- rollback any inserts issued
943:
944:
945: End If; -- end checking value of No_problem
942: Rollback to start_inserting; -- rollback any inserts issued
943:
944:
945: End If; -- end checking value of No_problem
946: fnd_message.clear;
947: js.ScriptOpen;
948: if (No_problem=FALSE) THEN
949: htp.p('javascript:set_clear_var("N")');
950: end if;
1035: -- to fix bug 1276799
1036: BEGIN
1037: if (icx_sec.validatesession) then
1038:
1039: fnd_message.clear;
1040:
1041: Default_In_Values(Ctx, Txn_Num, PK1, PK2, PK3, PK4,
1042: PK5, PK6, PK7, PK8, PK9, PK10, l_Po_Agent_Id, l_Item_Id, l_Po_Header_Id,
1043: l_Wip_Entity_Type, l_Wip_Rep_Sch_Id, l_Po_Release_Id, l_Po_Line_Id,
1072: -- htp.p('
');
1074: -- icx_admin_sig.toolbar(language_code => c_language_code, disp_help => 'N');
1075:
1076: fnd_message.set_name('QA', 'QA_SS_EQR');
1077: /*
1078: icx_plug_utilities.toolbar(substr(fnd_message.get,1,40), p_language_code=>l_language_code,
1079: p_disp_help=>'Y',p_disp_exit=>'Y');
1080: icx_plug_utilities.plugbanner(plan_name_i);
1081: */
1082: -- htp.p('Org id is ' || fnd_profile.value('ORG_ID') );
1524: -- NEW made the border=0 in the frameset. This prevents accidental reloading
1525: -- when frame is resized. Now that can be prevented
1526: htp.p('