60: WHEN OTHERS THEN
61: IF c%ISOPEN THEN
62: CLOSE c;
63: END IF;
64: htp.p('Exception in private function qa_ss_core.get_char_prompt');
65: htp.p(SQLERRM);
66:
67: END get_char_prompt;
68: -----------------------------------------------------------------
61: IF c%ISOPEN THEN
62: CLOSE c;
63: END IF;
64: htp.p('Exception in private function qa_ss_core.get_char_prompt');
65: htp.p(SQLERRM);
66:
67: END get_char_prompt;
68: -----------------------------------------------------------------
69: function Is_Job_Valid (X_Po_Dist_Id IN NUMBER,
116: END IF;
117: IF wdj_open_val_cur%ISOPEN THEN
118: CLOSE wdj_open_val_cur;
119: END IF;
120: htp.p('Exception in private function qa_ss_core.Is_Job_Valid');
121: htp.p(SQLERRM);
122:
123: END Is_Job_Valid;
124:
117: IF wdj_open_val_cur%ISOPEN THEN
118: CLOSE wdj_open_val_cur;
119: END IF;
120: htp.p('Exception in private function qa_ss_core.Is_Job_Valid');
121: htp.p(SQLERRM);
122:
123: END Is_Job_Valid;
124:
125:
409:
410: BEGIN
411: if (icx_sec.validatesession) then
412:
413: htp.p('');
414:
415: htp.p('
411: if (icx_sec.validatesession) then
412:
413: htp.p('');
414:
415: htp.p('');
416: js.ScriptOpen;
417: htp.p('function set_clear_var(inval)
418: {
419: if (inval = "N")
413: htp.p('');
414:
415: htp.p('
422: // alert("value set to " + parent.buttonsFrame.document.buttonHiddenF.clear_var.value);
423: }
424: }');
425: js.ScriptClose;
426: htp.p('');
427:
428: htp.p('
424: }');
425: js.ScriptClose;
426: htp.p('');
427:
428: htp.p('');
429:
430: -- BELOW WORKFLOWDOC added for Bug 998381
431: htp.p('
429:
430: -- BELOW WORKFLOWDOC added for Bug 998381
431: htp.p('
430: -- BELOW WORKFLOWDOC added for Bug 998381
431: htp.p('
431: htp.p('
432: htp.formHidden('x_buyer_id', po_agent_id);
433: htp.formHidden('x_source_id', x_source_id);
434: htp.formHidden('x_plan_id', hid_planid);
435: htp.formHidden('x_item_id', x_item_id);
436: htp.formHidden('x_po_header_id', x_po_header_id);
437: htp.p('');
438:
439:
440: -- if orgz_id is null, then raise an exception here
433: htp.formHidden('x_source_id', x_source_id);
434: htp.formHidden('x_plan_id', hid_planid);
435: htp.formHidden('x_item_id', x_item_id);
436: htp.formHidden('x_po_header_id', x_po_header_id);
437: htp.p('');
438:
439:
440: -- if orgz_id is null, then raise an exception here
441: if (orgz_id is NULL) Then
486: -- for usability fix after Aug 11
487:
488: -- New code line below
489: -- If selectbox.Exists(K) Then
490: -- htp.p('value of selectbox('||selectbox(K)||') is: ' || selectbox(K));
491: -- htp.nl;
492: -- End If;
493:
494: if ( NOT selectbox.Exists(K) ) Then
487:
488: -- New code line below
489: -- If selectbox.Exists(K) Then
490: -- htp.p('value of selectbox('||selectbox(K)||') is: ' || selectbox(K));
491: -- htp.nl;
492: -- End If;
493:
494: if ( NOT selectbox.Exists(K) ) Then
495:
493:
494: if ( NOT selectbox.Exists(K) ) Then
495:
496: -- if ( selectbox(K) = 'N') THEN
497: -- htp.p('row ' || to_char(K)|| 'top level filtered'); htp.nl;
498: NULL; -- definitely this is an empty row
499: -- else still have to check for empty row?? I dont think so
500: /*
501: elsif ( is_empty_row ( K,
662: p_col159,
663: p_col160,
664: hid_planid ) )
665: THEN
666: htp.p('row ' || to_char(K)|| 'second level filtered'); htp.nl;
667: NULL; -- empty row
668: */
669: ELSE
670: -- proceed with your calls
669: ELSE
670: -- proceed with your calls
671:
672: -- New code being added here
673: -- htp.p('===============================================================');
674: -- htp.nl;
675: r := to_number(selectbox(K));
676: -- r := K;
677: rows_selected := TRUE;
670: -- proceed with your calls
671:
672: -- New code being added here
673: -- htp.p('===============================================================');
674: -- htp.nl;
675: r := to_number(selectbox(K));
676: -- r := K;
677: rows_selected := TRUE;
678: -- New code above
837: values_tab(158) := p_col158(r);
838: values_tab(159) := p_col159(r);
839: values_tab(160) := p_col160(r);
840:
841: -- htp.p('Row:'|| r || ' Calling ob start import row');
842: qa_results_interface_pkg.start_import_row(1, orgz_id, hid_planid,
843: script, tailscript, qri_source_code,
844: qri_source_line_id, po_agent_id);
845:
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));
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));
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
872: -- Adding if statement, Sep 13, 1999 -- talked to mmpatel
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
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
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
887: l_prompt := qa_ss_core.get_char_prompt(charid_tab(c));
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
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
898:
898:
899: /* -- Introduced to report values entered for errored rows
900: -- Commented out after aug 11 frz for usability fix
901: if (no_problem = FALSE) then
902: htp.p('You entered the following values for this Row: ');
903: htp.nl;
904: FOR c in 1..col_count
905: LOOP
906: htp.p('column '||to_char(c)||' : '|| values_tab(c));
899: /* -- Introduced to report values entered for errored rows
900: -- Commented out after aug 11 frz for usability fix
901: if (no_problem = FALSE) then
902: htp.p('You entered the following values for this Row: ');
903: htp.nl;
904: FOR c in 1..col_count
905: LOOP
906: htp.p('column '||to_char(c)||' : '|| values_tab(c));
907: htp.nl;
902: htp.p('You entered the following values for this Row: ');
903: htp.nl;
904: FOR c in 1..col_count
905: LOOP
906: htp.p('column '||to_char(c)||' : '|| values_tab(c));
907: htp.nl;
908: END LOOP;
909: htp.nl;
910: else
903: htp.nl;
904: FOR c in 1..col_count
905: LOOP
906: htp.p('column '||to_char(c)||' : '|| values_tab(c));
907: htp.nl;
908: END LOOP;
909: htp.nl;
910: else
911: NULL;
905: LOOP
906: htp.p('column '||to_char(c)||' : '|| values_tab(c));
907: htp.nl;
908: END LOOP;
909: htp.nl;
910: else
911: NULL;
912: end if;
913: */
910: else
911: NULL;
912: end if;
913: */
914: -- htp.p('Calling end import row for row : ' || to_char(r)); htp.nl;
915: qa_results_interface_pkg.end_import_row(script, tailscript, No_problem);
916:
917: /* -- commented out after aug 11 frz for usability fix
918: if (no_problem = TRUE) then
915: qa_results_interface_pkg.end_import_row(script, tailscript, No_problem);
916:
917: /* -- commented out after aug 11 frz for usability fix
918: if (no_problem = TRUE) then
919: htp.p('Row '||to_char(r) || ': Successfully submitted'); htp.nl;
920: -- Need new fnd seed data july 28, 1999
921: -- Commit done at end of all rows below
922: end if;
923: */
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');
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);
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
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;
951: js.ScriptClose;
952: htp.p('');
953: htp.p('');
948: if (No_problem=FALSE) THEN
949: htp.p('javascript:set_clear_var("N")');
950: end if;
951: js.ScriptClose;
952: htp.p('');
953: htp.p('');
954:
955: end if; -- end icx validate session
956: EXCEPTION
949: htp.p('javascript:set_clear_var("N")');
950: end if;
951: js.ScriptClose;
952: htp.p('');
953: htp.p('');
954:
955: end if; -- end icx validate session
956: EXCEPTION
957: WHEN orgz_ex THEN
954:
955: end if; -- end icx validate session
956: EXCEPTION
957: WHEN orgz_ex THEN
958: htp.p('Organization Id is Null which raised exception');
959:
960: WHEN plan_ex THEN
961: htp.p('Plan Id is Null which raised exception');
962: WHEN OTHERS THEN
957: WHEN orgz_ex THEN
958: htp.p('Organization Id is Null which raised exception');
959:
960: WHEN plan_ex THEN
961: htp.p('Plan Id is Null which raised exception');
962: WHEN OTHERS THEN
963: htp.p(''||SQLERRM||'');
964: END enter_results;
965: ------------------------------------------------------------------------
959:
960: WHEN plan_ex THEN
961: htp.p('Plan Id is Null which raised exception');
962: WHEN OTHERS THEN
963: htp.p(''||SQLERRM||'');
964: END enter_results;
965: ------------------------------------------------------------------------
966:
967:
1057: select qp.name into plan_name_i
1058: from qa_plans qp
1059: where qp.plan_id = plan_id_i;
1060:
1061: -- htp.p('Debug: Job = ' || job_i);
1062:
1063:
1064: htp.p('');
1065: htp.p('
1060:
1061: -- htp.p('Debug: Job = ' || job_i);
1062:
1063:
1064: htp.p('');
1065: htp.p('
1061: -- htp.p('Debug: Job = ' || job_i);
1062:
1063:
1064: htp.p('');
1065: htp.p('');
1066: htp.linkRel('STYLESHEET', '/OA_HTML/'||
1067: l_language_code||'/POSSTYLE.css');
1068:
1069: generate_eqr_javascript; -- this is a pl/sql procedure call. procedure is in this pkg
1062:
1063:
1064: htp.p('');
1065: htp.p('
1067: l_language_code||'/POSSTYLE.css');
1068:
1069: generate_eqr_javascript; -- this is a pl/sql procedure call. procedure is in this pkg
1070:
1071: htp.p('');
1072: -- htp.p('
1068:
1069: generate_eqr_javascript; -- this is a pl/sql procedure call. procedure is in this pkg
1070:
1071: htp.p('
1069: generate_eqr_javascript; -- this is a pl/sql procedure call. procedure is in this pkg
1070:
1071: htp.p('
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') );
1083: -- htp.p('User id is ' || fnd_profile.value('USER_ID') );
1084: -- htp.p('pvwebuserid: ' || icx_sec.getID(icx_sec.PV_WEB_USER_ID));
1085:
1086: --hidden_elems; -- CALL TO HIDDEN_ELEMS to set hidden fields
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') );
1083: -- htp.p('User id is ' || fnd_profile.value('USER_ID') );
1084: -- htp.p('pvwebuserid: ' || icx_sec.getID(icx_sec.PV_WEB_USER_ID));
1085:
1086: --hidden_elems; -- CALL TO HIDDEN_ELEMS to set hidden fields
1087: htp.p('
1080: icx_plug_utilities.plugbanner(plan_name_i);
1081: */
1082: -- htp.p('Org id is ' || fnd_profile.value('ORG_ID') );
1083: -- htp.p('User id is ' || fnd_profile.value('USER_ID') );
1084: -- htp.p('pvwebuserid: ' || icx_sec.getID(icx_sec.PV_WEB_USER_ID));
1085:
1086: --hidden_elems; -- CALL TO HIDDEN_ELEMS to set hidden fields
1087: htp.p('
1083: -- htp.p('User id is ' || fnd_profile.value('USER_ID') );
1084: -- htp.p('pvwebuserid: ' || icx_sec.getID(icx_sec.PV_WEB_USER_ID));
1085:
1086: --hidden_elems; -- CALL TO HIDDEN_ELEMS to set hidden fields
1087: htp.p('
1089: htp.formHidden('x_wip_entity_type', l_wip_entity_type);
1090: htp.formHidden('x_wip_rep_sch_id', l_wip_rep_sch_id);
1091: htp.formHidden('x_po_header_id', l_po_header_id);
1084: -- htp.p('pvwebuserid: ' || icx_sec.getID(icx_sec.PV_WEB_USER_ID));
1085:
1086: --hidden_elems; -- CALL TO HIDDEN_ELEMS to set hidden fields
1087: htp.p('
1085:
1086: --hidden_elems; -- CALL TO HIDDEN_ELEMS to set hidden fields
1087: htp.p('
1086: --hidden_elems; -- CALL TO HIDDEN_ELEMS to set hidden fields
1087: htp.p('
1087: htp.p('
1088: htp.formHidden('x_txn_num', txn_num);
1089: htp.formHidden('x_wip_entity_type', l_wip_entity_type);
1090: htp.formHidden('x_wip_rep_sch_id', l_wip_rep_sch_id);
1091: htp.formHidden('x_po_header_id', l_po_header_id);
1092: htp.formHidden('x_po_release_id', l_po_release_id);
1093: htp.formHidden('x_po_line_id', l_po_line_id);
1094: htp.formHidden('x_line_location_id', l_line_location_id);
1095: htp.formHidden('x_po_distribution_id', l_po_distribution_id);
1096: htp.formHidden('x_item_id', l_item_id);
1089: htp.formHidden('x_wip_entity_type', l_wip_entity_type);
1090: htp.formHidden('x_wip_rep_sch_id', l_wip_rep_sch_id);
1091: htp.formHidden('x_po_header_id', l_po_header_id);
1092: htp.formHidden('x_po_release_id', l_po_release_id);
1093: htp.formHidden('x_po_line_id', l_po_line_id);
1094: htp.formHidden('x_line_location_id', l_line_location_id);
1095: htp.formHidden('x_po_distribution_id', l_po_distribution_id);
1096: htp.formHidden('x_item_id', l_item_id);
1097: htp.formHidden('x_wip_entity_id', l_wip_entity_id);
1090: htp.formHidden('x_wip_rep_sch_id', l_wip_rep_sch_id);
1091: htp.formHidden('x_po_header_id', l_po_header_id);
1092: htp.formHidden('x_po_release_id', l_po_release_id);
1093: htp.formHidden('x_po_line_id', l_po_line_id);
1094: htp.formHidden('x_line_location_id', l_line_location_id);
1095: htp.formHidden('x_po_distribution_id', l_po_distribution_id);
1096: htp.formHidden('x_item_id', l_item_id);
1097: htp.formHidden('x_wip_entity_id', l_wip_entity_id);
1098: htp.formHidden('x_wip_line_id', l_wip_line_id);
1091: htp.formHidden('x_po_header_id', l_po_header_id);
1092: htp.formHidden('x_po_release_id', l_po_release_id);
1093: htp.formHidden('x_po_line_id', l_po_line_id);
1094: htp.formHidden('x_line_location_id', l_line_location_id);
1095: htp.formHidden('x_po_distribution_id', l_po_distribution_id);
1096: htp.formHidden('x_item_id', l_item_id);
1097: htp.formHidden('x_wip_entity_id', l_wip_entity_id);
1098: htp.formHidden('x_wip_line_id', l_wip_line_id);
1099: htp.formHidden('x_po_shipment_id', l_po_shipment_id);
1092: htp.formHidden('x_po_release_id', l_po_release_id);
1093: htp.formHidden('x_po_line_id', l_po_line_id);
1094: htp.formHidden('x_line_location_id', l_line_location_id);
1095: htp.formHidden('x_po_distribution_id', l_po_distribution_id);
1096: htp.formHidden('x_item_id', l_item_id);
1097: htp.formHidden('x_wip_entity_id', l_wip_entity_id);
1098: htp.formHidden('x_wip_line_id', l_wip_line_id);
1099: htp.formHidden('x_po_shipment_id', l_po_shipment_id);
1100: htp.p('
1093: htp.formHidden('x_po_line_id', l_po_line_id);
1094: htp.formHidden('x_line_location_id', l_line_location_id);
1095: htp.formHidden('x_po_distribution_id', l_po_distribution_id);
1096: htp.formHidden('x_item_id', l_item_id);
1097: htp.formHidden('x_wip_entity_id', l_wip_entity_id);
1098: htp.formHidden('x_wip_line_id', l_wip_line_id);
1099: htp.formHidden('x_po_shipment_id', l_po_shipment_id);
1100: htp.p('');
1101:
1094: htp.formHidden('x_line_location_id', l_line_location_id);
1095: htp.formHidden('x_po_distribution_id', l_po_distribution_id);
1096: htp.formHidden('x_item_id', l_item_id);
1097: htp.formHidden('x_wip_entity_id', l_wip_entity_id);
1098: htp.formHidden('x_wip_line_id', l_wip_line_id);
1099: htp.formHidden('x_po_shipment_id', l_po_shipment_id);
1100: htp.p('');
1101:
1102: htp.p('
1095: htp.formHidden('x_po_distribution_id', l_po_distribution_id);
1096: htp.formHidden('x_item_id', l_item_id);
1097: htp.formHidden('x_wip_entity_id', l_wip_entity_id);
1098: htp.formHidden('x_wip_line_id', l_wip_line_id);
1099: htp.formHidden('x_po_shipment_id', l_po_shipment_id);
1100: htp.p('
1096: htp.formHidden('x_item_id', l_item_id);
1097: htp.formHidden('x_wip_entity_id', l_wip_entity_id);
1098: htp.formHidden('x_wip_line_id', l_wip_line_id);
1099: htp.formHidden('x_po_shipment_id', l_po_shipment_id);
1100: htp.p('');
1101:
1102: htp.p('
1098: htp.formHidden('x_wip_line_id', l_wip_line_id);
1099: htp.formHidden('x_po_shipment_id', l_po_shipment_id);
1100: htp.p('
1099: htp.formHidden('x_po_shipment_id', l_po_shipment_id);
1100: htp.p('');
1101:
1102: htp.p('
1100: htp.p('
1101:
1102: htp.p('
1102: htp.p('
1103: htp.formHidden('x_buyer_id', l_po_agent_id);
1104: htp.formHidden('x_source_id', l_user_id);
1105: htp.formHidden('x_plan_id', plan_id_i);
1106: htp.formHidden('x_item_id', l_Item_Id);
1107: htp.formHidden('x_po_header_id', l_po_header_id);
1108: htp.p('
1104: htp.formHidden('x_source_id', l_user_id);
1105: htp.formHidden('x_plan_id', plan_id_i);
1106: htp.formHidden('x_item_id', l_Item_Id);
1107: htp.formHidden('x_po_header_id', l_po_header_id);
1108: htp.p('');
1109:
1110: htp.p('
1106: htp.formHidden('x_item_id', l_Item_Id);
1107: htp.formHidden('x_po_header_id', l_po_header_id);
1108: htp.p('
1107: htp.formHidden('x_po_header_id', l_po_header_id);
1108: htp.p('');
1109:
1110: htp.p('
1109:
1110: htp.p('
1111: -- htp.formHidden('No_Dependency','No_Dependency'); --This is no longer needed
1112:
1113: htp.tableOpen(cborder=>'BORDER=2',calign=>'CENTER', cattributes=>'CELLPADDING=2 cellspacing=1');
1114:
1115: -- htp.p('Language Code = ' || l_language_code);
1116: -- htp.br;
1117:
1118: -- htp.tableCaption(htf.bold(plan_name_i));
1119: -- htp.tableRowOpen(cattributes => 'BGCOLOR="#336699"');
1112:
1113: htp.tableOpen(cborder=>'BORDER=2',calign=>'CENTER', cattributes=>'CELLPADDING=2 cellspacing=1');
1114:
1115: -- htp.p('Language Code = ' || l_language_code);
1116: -- htp.br;
1117:
1118: -- htp.tableCaption(htf.bold(plan_name_i));
1119: -- htp.tableRowOpen(cattributes => 'BGCOLOR="#336699"');
1120: htp.tableRowOpen;
1114:
1115: -- htp.p('Language Code = ' || l_language_code);
1116: -- htp.br;
1117:
1118: -- htp.tableCaption(htf.bold(plan_name_i));
1119: -- htp.tableRowOpen(cattributes => 'BGCOLOR="#336699"');
1120: htp.tableRowOpen;
1121: -- htp.p('Got here 1');
1122:
1115: -- htp.p('Language Code = ' || l_language_code);
1116: -- htp.br;
1117:
1118: -- htp.tableCaption(htf.bold(plan_name_i));
1119: -- htp.tableRowOpen(cattributes => 'BGCOLOR="#336699"');
1120: htp.tableRowOpen;
1121: -- htp.p('Got here 1');
1122:
1123: htp.tableData(cvalue=>''||'Select'||'',
1116: -- htp.br;
1117:
1118: -- htp.tableCaption(htf.bold(plan_name_i));
1119: -- htp.tableRowOpen(cattributes => 'BGCOLOR="#336699"');
1120: htp.tableRowOpen;
1121: -- htp.p('Got here 1');
1122:
1123: htp.tableData(cvalue=>''||'Select'||'',
1124: calign=>'LEFT', cattributes=>'valign=bottom bgcolor="#336699"');
1117:
1118: -- htp.tableCaption(htf.bold(plan_name_i));
1119: -- htp.tableRowOpen(cattributes => 'BGCOLOR="#336699"');
1120: htp.tableRowOpen;
1121: -- htp.p('Got here 1');
1122:
1123: htp.tableData(cvalue=>''||'Select'||'',
1124: calign=>'LEFT', cattributes=>'valign=bottom bgcolor="#336699"');
1125:
1119: -- htp.tableRowOpen(cattributes => 'BGCOLOR="#336699"');
1120: htp.tableRowOpen;
1121: -- htp.p('Got here 1');
1122:
1123: htp.tableData(cvalue=>''||'Select'||'',
1124: calign=>'LEFT', cattributes=>'valign=bottom bgcolor="#336699"');
1125:
1126: FOR char_rec IN char_cur
1127: LOOP
1124: calign=>'LEFT', cattributes=>'valign=bottom bgcolor="#336699"');
1125:
1126: FOR char_rec IN char_cur
1127: LOOP
1128: -- htp.p(' Got here 2');
1129: no_of_cols := no_of_cols + 1;
1130:
1131:
1132: -- htp.p('enable_arr('||no_of_cols||') = ' || enable_arr(no_of_cols));
1128: -- htp.p(' Got here 2');
1129: no_of_cols := no_of_cols + 1;
1130:
1131:
1132: -- htp.p('enable_arr('||no_of_cols||') = ' || enable_arr(no_of_cols));
1133:
1134: IF (is_lov_needed(char_rec.char_id, Txn_Num) = FALSE)
1135: then
1136: -- if no lov is needed or if ctxt elmt
1133:
1134: IF (is_lov_needed(char_rec.char_id, Txn_Num) = FALSE)
1135: then
1136: -- if no lov is needed or if ctxt elmt
1137: htp.tableData(cvalue=>''||char_rec.prompt||'',
1138: calign=>'LEFT', cattributes=>'valign=bottom bgcolor="#336699"');
1139: lov_arr(no_of_cols) := FALSE;
1140: --span one column
1141: ELSE --span 2 cols
1138: calign=>'LEFT', cattributes=>'valign=bottom bgcolor="#336699"');
1139: lov_arr(no_of_cols) := FALSE;
1140: --span one column
1141: ELSE --span 2 cols
1142: htp.tableData(cvalue=>''||char_rec.prompt||'',
1143: calign=>'LEFT',
1144: ccolspan=>'2', cattributes=>'valign=bottom bgcolor="#336699"' );
1145: lov_arr(no_of_cols) := TRUE;
1146: -- this is an lov field
1157: ELSE
1158: dhint_tab(no_of_cols) := NULL;
1159: END IF; -- end if for data entry hint
1160:
1161: -- htp.p('column'||no_of_cols||' : char_name= '||char_rec.name);
1162: END LOOP;
1163: -- htp.p('Got here 3');
1164:
1165: htp.tableRowClose;
1159: END IF; -- end if for data entry hint
1160:
1161: -- htp.p('column'||no_of_cols||' : char_name= '||char_rec.name);
1162: END LOOP;
1163: -- htp.p('Got here 3');
1164:
1165: htp.tableRowClose;
1166: -- Below Line for UI Standards
1167: htp.p('
1161: -- htp.p('column'||no_of_cols||' : char_name= '||char_rec.name);
1162: END LOOP;
1163: -- htp.p('Got here 3');
1164:
1165: htp.tableRowClose;
1166: -- Below Line for UI Standards
1167: htp.p('
1163: -- htp.p('Got here 3');
1164:
1165: htp.tableRowClose;
1166: -- Below Line for UI Standards
1167: htp.p(''); -- DO NOT COMMENT THIS UI Standard
1168:
1169: -- htp.p('Got here 4'); htp.nl;
1170: -- htp.p('Number of cols = ' || no_of_cols); htp.nl;
1171: FOR rows IN 1..qa_ss_const.no_of_rows
1165: htp.tableRowClose;
1166: -- Below Line for UI Standards
1167: htp.p('
1166: -- Below Line for UI Standards
1167: htp.p('
1170: -- htp.p('Number of cols = ' || no_of_cols); htp.nl;
1171: FOR rows IN 1..qa_ss_const.no_of_rows
1172: LOOP
1173: if (row_color = 'BLUE') THEN
1174: htp.tableRowOpen(cattributes => 'BGCOLOR="#99CCFF"');
1175: row_color := 'WHITE';
1176: else
1177: htp.tableRowOpen(cattributes => 'BGCOLOR="#FFFFFF"');
1178: row_color := 'BLUE';
1173: if (row_color = 'BLUE') THEN
1174: htp.tableRowOpen(cattributes => 'BGCOLOR="#99CCFF"');
1175: row_color := 'WHITE';
1176: else
1177: htp.tableRowOpen(cattributes => 'BGCOLOR="#FFFFFF"');
1178: row_color := 'BLUE';
1179: end if; -- end if for row_color
1180: -- New code line for field below. Indicates if a row was modified
1181: -- Dont make this a table data hiddenfield
1178: row_color := 'BLUE';
1179: end if; -- end if for row_color
1180: -- New code line for field below. Indicates if a row was modified
1181: -- Dont make this a table data hiddenfield
1179: end if; -- end if for row_color
1180: -- New code line for field below. Indicates if a row was modified
1181: -- Dont make this a table data hiddenfield
1180: -- New code line for field below. Indicates if a row was modified
1181: -- Dont make this a table data hiddenfield
1186:
1187:
1188: FOR cols IN 1..no_of_cols
1189: LOOP
1190: -- htp.p('Got here 5');
1191: -- htp.p('col = ' || cols); htp.nl;
1192: item_name := 'p_col' || TO_CHAR(cols);
1193: -- htp.p('charid= ' || charid_array(cols) || ' txnnum= ' || Txn_Num);
1194: IF ( CxE(charid_array(cols), Txn_Num) ) Then
1187:
1188: FOR cols IN 1..no_of_cols
1189: LOOP
1190: -- htp.p('Got here 5');
1191: -- htp.p('col = ' || cols); htp.nl;
1192: item_name := 'p_col' || TO_CHAR(cols);
1193: -- htp.p('charid= ' || charid_array(cols) || ' txnnum= ' || Txn_Num);
1194: IF ( CxE(charid_array(cols), Txn_Num) ) Then
1195: -- this is a context element for this txn
1189: LOOP
1190: -- htp.p('Got here 5');
1191: -- htp.p('col = ' || cols); htp.nl;
1192: item_name := 'p_col' || TO_CHAR(cols);
1193: -- htp.p('charid= ' || charid_array(cols) || ' txnnum= ' || Txn_Num);
1194: IF ( CxE(charid_array(cols), Txn_Num) ) Then
1195: -- this is a context element for this txn
1196: -- so create a textual data and corresponding hidden field value
1197:
1194: IF ( CxE(charid_array(cols), Txn_Num) ) Then
1195: -- this is a context element for this txn
1196: -- so create a textual data and corresponding hidden field value
1197:
1198: -- htp.p('Is a context element'); htp.nl;
1199: htp.tableData( NVL(Ctx(charid_array(cols)), ' '), calign=>'LEFT',
1200: crowspan=>'1',
1201: cattributes=>'VALIGN="CENTER"');
1202: htp.formHidden(item_name, Ctx(charid_array(cols)));
1195: -- this is a context element for this txn
1196: -- so create a textual data and corresponding hidden field value
1197:
1198: -- htp.p('Is a context element'); htp.nl;
1199: htp.tableData( NVL(Ctx(charid_array(cols)), ' '), calign=>'LEFT',
1200: crowspan=>'1',
1201: cattributes=>'VALIGN="CENTER"');
1202: htp.formHidden(item_name, Ctx(charid_array(cols)));
1203:
1198: -- htp.p('Is a context element'); htp.nl;
1199: htp.tableData( NVL(Ctx(charid_array(cols)), ' '), calign=>'LEFT',
1200: crowspan=>'1',
1201: cattributes=>'VALIGN="CENTER"');
1202: htp.formHidden(item_name, Ctx(charid_array(cols)));
1203:
1204: else -- Not a default context element
1205: -- htp.p('Not context element'); htp.nl;
1206: -- New code, the whole onchange piece is new july28,1999
1201: cattributes=>'VALIGN="CENTER"');
1202: htp.formHidden(item_name, Ctx(charid_array(cols)));
1203:
1204: else -- Not a default context element
1205: -- htp.p('Not context element'); htp.nl;
1206: -- New code, the whole onchange piece is new july28,1999
1207: -- Onfocus added on Aug 03, 1999
1208:
1209: /*
1206: -- New code, the whole onchange piece is new july28,1999
1207: -- Onfocus added on Aug 03, 1999
1208:
1209: /*
1210: htp.tableData(htf.formText(item_name,disp_len_arr(cols),150,
1211: dv_arr(cols),'onChange="document.RSMDF.selectbox['
1212: || to_char(rows-1) || '].value=''Y''" onFocus="window.status='''||dhint_tab(cols)||'''"' ),
1213: calign=>'CENTER',
1214: crowspan=>'1',
1215: cattributes=>'VALIGN="CENTER"');
1216: */
1217: -- Above commented out on Aug 13, 1999 to try the below checkbox instead of hidden field
1218: -- changing .value=''Y'' to .checked=true
1219: htp.tableData(htf.formText(item_name,disp_len_arr(cols),150,
1220: dv_arr(cols),'onChange="document.RSMDF.selectbox['
1221: || to_char(rows-1) || '].checked=true" onFocus="window.status='''||dhint_tab(cols)||'''"' ),
1222: calign=>'CENTER',
1223: crowspan=>'1',
1238:
1239:
1240: item_name := NULL;
1241:
1242: -- htp.p('Got here 8'); htp.nl;
1243:
1244: END LOOP; -- end col loop
1245: -- htp.p('got here 9');
1246:
1241:
1242: -- htp.p('Got here 8'); htp.nl;
1243:
1244: END LOOP; -- end col loop
1245: -- htp.p('got here 9');
1246:
1247: -- Hidden columns
1248: FOR cols IN no_of_cols+1..qa_ss_const.max_cols
1249: LOOP
1246:
1247: -- Hidden columns
1248: FOR cols IN no_of_cols+1..qa_ss_const.max_cols
1249: LOOP
1250: -- htp.p('got here 10');
1251: item_name := 'p_col' || TO_CHAR(cols);
1252: htp.formHidden(item_name);
1253: item_name := NULL;
1254: END LOOP; -- end hidden column loop
1248: FOR cols IN no_of_cols+1..qa_ss_const.max_cols
1249: LOOP
1250: -- htp.p('got here 10');
1251: item_name := 'p_col' || TO_CHAR(cols);
1252: htp.formHidden(item_name);
1253: item_name := NULL;
1254: END LOOP; -- end hidden column loop
1255:
1256:
1253: item_name := NULL;
1254: END LOOP; -- end hidden column loop
1255:
1256:
1257: htp.tableRowClose;
1258: -- htp.p('got here 11'||htf.br);
1259: END LOOP; /* end rows loop */
1260: -- htp.p('got here 12');
1261:
1254: END LOOP; -- end hidden column loop
1255:
1256:
1257: htp.tableRowClose;
1258: -- htp.p('got here 11'||htf.br);
1259: END LOOP; /* end rows loop */
1260: -- htp.p('got here 12');
1261:
1262: /* -- commenting out becos no longer need bottom table header acc to new UI
1256:
1257: htp.tableRowClose;
1258: -- htp.p('got here 11'||htf.br);
1259: END LOOP; /* end rows loop */
1260: -- htp.p('got here 12');
1261:
1262: /* -- commenting out becos no longer need bottom table header acc to new UI
1263: htp.p('
1259: END LOOP; /* end rows loop */
1260: -- htp.p('got here 12');
1261:
1262: /* -- commenting out becos no longer need bottom table header acc to new UI
1263: htp.p('');
1264: htp.tableRowOpen(cattributes => 'BGCOLOR="#83C1C1"');
1265: FOR i in 1..no_of_cols
1266: LOOP
1267: -- htp.p('got here 13');
1260: -- htp.p('got here 12');
1261:
1262: /* -- commenting out becos no longer need bottom table header acc to new UI
1263: htp.p('
1263: htp.p('
1267: -- htp.p('got here 13');
1268:
1269: IF ( lov_arr(i) = FALSE)
1270: then
1271: htp.tableHeader(cvalue=>Prompt_Arr(i),
1272: calign=>'CENTER');
1273: else
1274: htp.tableHeader(cvalue=>Prompt_Arr(i),
1275: calign=>'CENTER',
1270: then
1271: htp.tableHeader(cvalue=>Prompt_Arr(i),
1272: calign=>'CENTER');
1273: else
1274: htp.tableHeader(cvalue=>Prompt_Arr(i),
1275: calign=>'CENTER',
1276: ccolspan=>'2');
1277: END IF;
1278: END LOOP;
1277: END IF;
1278: END LOOP;
1279: -- where is tablerowclose? is this omitted by mistake?
1280: */
1281: -- htp.p('got here 14');
1282: htp.tableClose;
1283: htp.formHidden('hid_planid', plan_id_i);
1284: htp.formHidden('orgz_id', orgz_id);
1285: htp.formHidden('txn_num', Txn_Num);
1278: END LOOP;
1279: -- where is tablerowclose? is this omitted by mistake?
1280: */
1281: -- htp.p('got here 14');
1282: htp.tableClose;
1283: htp.formHidden('hid_planid', plan_id_i);
1284: htp.formHidden('orgz_id', orgz_id);
1285: htp.formHidden('txn_num', Txn_Num);
1286: htp.formHidden('po_agent_id', l_Po_Agent_Id);
1279: -- where is tablerowclose? is this omitted by mistake?
1280: */
1281: -- htp.p('got here 14');
1282: htp.tableClose;
1283: htp.formHidden('hid_planid', plan_id_i);
1284: htp.formHidden('orgz_id', orgz_id);
1285: htp.formHidden('txn_num', Txn_Num);
1286: htp.formHidden('po_agent_id', l_Po_Agent_Id);
1287: -- Just like ur having the above hiddenfield for planid
1280: */
1281: -- htp.p('got here 14');
1282: htp.tableClose;
1283: htp.formHidden('hid_planid', plan_id_i);
1284: htp.formHidden('orgz_id', orgz_id);
1285: htp.formHidden('txn_num', Txn_Num);
1286: htp.formHidden('po_agent_id', l_Po_Agent_Id);
1287: -- Just like ur having the above hiddenfield for planid
1288: -- have a couple of hidden fields called orgz_id and txn_num
1281: -- htp.p('got here 14');
1282: htp.tableClose;
1283: htp.formHidden('hid_planid', plan_id_i);
1284: htp.formHidden('orgz_id', orgz_id);
1285: htp.formHidden('txn_num', Txn_Num);
1286: htp.formHidden('po_agent_id', l_Po_Agent_Id);
1287: -- Just like ur having the above hiddenfield for planid
1288: -- have a couple of hidden fields called orgz_id and txn_num
1289: -- so they can also be passed to the enter_results procedure
1282: htp.tableClose;
1283: htp.formHidden('hid_planid', plan_id_i);
1284: htp.formHidden('orgz_id', orgz_id);
1285: htp.formHidden('txn_num', Txn_Num);
1286: htp.formHidden('po_agent_id', l_Po_Agent_Id);
1287: -- Just like ur having the above hiddenfield for planid
1288: -- have a couple of hidden fields called orgz_id and txn_num
1289: -- so they can also be passed to the enter_results procedure
1290: htp.formHidden('x_source_id', l_user_id);
1286: htp.formHidden('po_agent_id', l_Po_Agent_Id);
1287: -- Just like ur having the above hiddenfield for planid
1288: -- have a couple of hidden fields called orgz_id and txn_num
1289: -- so they can also be passed to the enter_results procedure
1290: htp.formHidden('x_source_id', l_user_id);
1291: htp.formHidden('x_item_id', l_Item_Id);
1292: htp.formHidden('x_po_header_id', l_po_header_id);
1293: -- The above hidden fields added for BUG 998381
1294: -- so they are part of RSMDF in addition to WORKFLOWDOC
1287: -- Just like ur having the above hiddenfield for planid
1288: -- have a couple of hidden fields called orgz_id and txn_num
1289: -- so they can also be passed to the enter_results procedure
1290: htp.formHidden('x_source_id', l_user_id);
1291: htp.formHidden('x_item_id', l_Item_Id);
1292: htp.formHidden('x_po_header_id', l_po_header_id);
1293: -- The above hidden fields added for BUG 998381
1294: -- so they are part of RSMDF in addition to WORKFLOWDOC
1295: -- htp.formSubmit(NULL, 'Enter Results');
1288: -- have a couple of hidden fields called orgz_id and txn_num
1289: -- so they can also be passed to the enter_results procedure
1290: htp.formHidden('x_source_id', l_user_id);
1291: htp.formHidden('x_item_id', l_Item_Id);
1292: htp.formHidden('x_po_header_id', l_po_header_id);
1293: -- The above hidden fields added for BUG 998381
1294: -- so they are part of RSMDF in addition to WORKFLOWDOC
1295: -- htp.formSubmit(NULL, 'Enter Results');
1296:
1291: htp.formHidden('x_item_id', l_Item_Id);
1292: htp.formHidden('x_po_header_id', l_po_header_id);
1293: -- The above hidden fields added for BUG 998381
1294: -- so they are part of RSMDF in addition to WORKFLOWDOC
1295: -- htp.formSubmit(NULL, 'Enter Results');
1296:
1297: htp.br;
1298:
1299: htp.p('
1293: -- The above hidden fields added for BUG 998381
1294: -- so they are part of RSMDF in addition to WORKFLOWDOC
1295: -- htp.formSubmit(NULL, 'Enter Results');
1296:
1297: htp.br;
1298:
1299: htp.p('');
1300:
1301: htp.p('');
1295: -- htp.formSubmit(NULL, 'Enter Results');
1296:
1297: htp.br;
1298:
1299: htp.p('');
1300:
1301: htp.p('');
1302: htp.p('');
1303:
1297: htp.br;
1298:
1299: htp.p('');
1300:
1301: htp.p('');
1302: htp.p('');
1303:
1304:
1305: end if; -- end icx validatesession
1298:
1299: htp.p('');
1300:
1301: htp.p('');
1302: htp.p('');
1303:
1304:
1305: end if; -- end icx validatesession
1306:
1305: end if; -- end icx validatesession
1306:
1307: EXCEPTION
1308: WHEN job_pline_ex THEN
1309: htp.p('Job and Production Line Exception thrown in draw_table');
1310:
1311: WHEN OTHERS THEN
1312: htp.p('Exception in procedure draw_table');
1313: htp.p(''||SQLERRM||'');
1308: WHEN job_pline_ex THEN
1309: htp.p('Job and Production Line Exception thrown in draw_table');
1310:
1311: WHEN OTHERS THEN
1312: htp.p('Exception in procedure draw_table');
1313: htp.p(''||SQLERRM||'');
1314: END draw_table;
1315: ------------------------------------------------------------------------------------
1316:
1309: htp.p('Job and Production Line Exception thrown in draw_table');
1310:
1311: WHEN OTHERS THEN
1312: htp.p('Exception in procedure draw_table');
1313: htp.p(''||SQLERRM||'');
1314: END draw_table;
1315: ------------------------------------------------------------------------------------
1316:
1317: function CxE(cid IN Number, txnumber IN NUMBER DEFAULT NULL)
1336: END IF; -- endif for coll_trigg comparison
1337:
1338: EXCEPTION
1339: WHEN coll_seed_ex THEN
1340: htp.p('Exception in function CxE - Collection Trigger');
1341: WHEN OTHERS THEN
1342: htp.p('Exception in function CxE');
1343: htp.p(''||SQLERRM||'');
1344: END CxE;
1338: EXCEPTION
1339: WHEN coll_seed_ex THEN
1340: htp.p('Exception in function CxE - Collection Trigger');
1341: WHEN OTHERS THEN
1342: htp.p('Exception in function CxE');
1343: htp.p(''||SQLERRM||'');
1344: END CxE;
1345: --------------------------------------------------------------------------------------
1346:
1339: WHEN coll_seed_ex THEN
1340: htp.p('Exception in function CxE - Collection Trigger');
1341: WHEN OTHERS THEN
1342: htp.p('Exception in function CxE');
1343: htp.p(''||SQLERRM||'');
1344: END CxE;
1345: --------------------------------------------------------------------------------------
1346:
1347:
1409: end if;
1410:
1411: EXCEPTION
1412: WHEN OTHERS THEN
1413: htp.p('Exception in function is_lov_needed');
1414: htp.p(''||SQLERRM||'');
1415: END is_lov_needed;
1416:
1417: ------------------------------------------------------------------------------------------
1410:
1411: EXCEPTION
1412: WHEN OTHERS THEN
1413: htp.p('Exception in function is_lov_needed');
1414: htp.p(''||SQLERRM||'');
1415: END is_lov_needed;
1416:
1417: ------------------------------------------------------------------------------------------
1418:
1462: || '&' || 'pk7=' || pk7
1463: || '&' || 'pk8=' || pk8
1464: || '&' || 'pk9=' || pk9
1465: || '&' || 'pk10=' || pk10;
1466: htp.p('');
1467: htp.p('
1463: || '&' || 'pk8=' || pk8
1464: || '&' || 'pk9=' || pk9
1465: || '&' || 'pk10=' || pk10;
1466: htp.p('');
1467: htp.p('');
1468: htp.p('');
1470:
1471:
1469: ||l_language_code||'/POSSTYLE.css">');
1470:
1471:
1472: htp.p('');
1474: htp.p('');
1476: htp.p('');
1471:
1472: htp.p('');
1474: htp.p('');
1476: htp.p('');
1478:
1479: js.scriptOpen;
1473: htp.p('');
1474: htp.p('');
1476: htp.p('');
1478:
1479: js.scriptOpen;
1480: pos_global_vars_sv.InitializeMessageArray;
1481: js.scriptClose;
1518: // reset the value so as to submit again
1519: }
1520: }');
1521:
1522: htp.p('');
1523: htp.p('');
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('
1562: name=borderRight
1563: marginwidth=0
1564: marginheight=0
1565: scrolling=no>');
1566: htp.p('');
1567: htp.p('
1568: name=buttonsFrame
1569: marginwidth=0
1570: marginheight=0
1563: marginwidth=0
1564: marginheight=0
1565: scrolling=no>');
1566: htp.p('');
1567: htp.p('
1568: name=buttonsFrame
1569: marginwidth=0
1570: marginheight=0
1571: scrolling=no>');
1570: marginheight=0
1571: scrolling=no>');
1572:
1573:
1574: htp.p('');
1575: htp.p('');
1576:
1577: end if; -- end icx session
1578: EXCEPTION
1571: scrolling=no>');
1572:
1573:
1574: htp.p('');
1575: htp.p('');
1576:
1577: end if; -- end icx session
1578: EXCEPTION
1579: WHEN OTHERS THEN
1579: WHEN OTHERS THEN
1580: IF plan_name_cur%ISOPEN THEN
1581: CLOSE plan_name_cur;
1582: END IF;
1583: htp.p('Exception in procedure draw_frames');
1584: htp.p(''||SQLERRM||'');
1585: END draw_frames;
1586: -------------------------------------------------------------------------------
1587:
1580: IF plan_name_cur%ISOPEN THEN
1581: CLOSE plan_name_cur;
1582: END IF;
1583: htp.p('Exception in procedure draw_frames');
1584: htp.p(''||SQLERRM||'');
1585: END draw_frames;
1586: -------------------------------------------------------------------------------
1587:
1588: procedure qlt_buttons
1605: msg := fnd_message.get;
1606: msg := substr(msg, 1, 20);
1607:
1608: l_profile_val := FND_PROFILE.VALUE('QA_SS_RECEIVE_NOTIFICATIONS');
1609: -- htp.p('l_profile_val = ' || l_profile_val); htp.nl;
1610:
1611: htp.p('');
1612: htp.p('
1607:
1608: l_profile_val := FND_PROFILE.VALUE('QA_SS_RECEIVE_NOTIFICATIONS');
1609: -- htp.p('l_profile_val = ' || l_profile_val); htp.nl;
1610:
1611: htp.p('');
1612: htp.p('
1608: l_profile_val := FND_PROFILE.VALUE('QA_SS_RECEIVE_NOTIFICATIONS');
1609: -- htp.p('l_profile_val = ' || l_profile_val); htp.nl;
1610:
1611: htp.p('');
1612: htp.p('');
1613:
1614: htp.p('
1610:
1611: htp.p('');
1612: htp.p('
1611: htp.p('');
1612: htp.p('
1612: htp.p('
');'); 1629: 1630: qa_ss_core.draw_html_button('javascript:parent.eqr_submit()', msg); Line 1627: htp.p('
1623: P_LanguageCode => l_language_code,
1670: 1671: 1672: htp.p(''); Line 1669: htp.p(' |
1665: htp.p('');
1666: END IF; -- end check for l_profile_val
1667:
1668: htp.p('');
1669: htp.p('
1668: htp.p('');
1669: htp.p('');
1670:
1671:
1672: htp.p('');
1673: htp.p('');
1674:
1675: end if; -- end icx session
1676:
1669: htp.p('');
1670:
1671:
1672: htp.p('');
1673: htp.p('');
1674:
1675: end if; -- end icx session
1676:
1677: EXCEPTION
1675: end if; -- end icx session
1676:
1677: EXCEPTION
1678: WHEN OTHERS THEN
1679: htp.p('Exception in procedure qlt_buttons');
1680: htp.p(''||SQLERRM||'');
1681: END qlt_buttons;
1682: ---------------------------------------------------------------------------------
1683:
1676:
1677: EXCEPTION
1678: WHEN OTHERS THEN
1679: htp.p('Exception in procedure qlt_buttons');
1680: htp.p(''||SQLERRM||'');
1681: END qlt_buttons;
1682: ---------------------------------------------------------------------------------
1683:
1684: procedure Default_In_Values (Ctx IN OUT NOCOPY qa_ss_const.Ctx_Table,
1736:
1737:
1738: EXCEPTION
1739: WHEN not_selfserve Then
1740: htp.p('Exception in procedure Default_In_Values');
1741: htp.p('This is NOT A self-service Transaction! Alert!!!');
1742: WHEN OTHERS THEN
1743: htp.p('Exception in procedure Default_In_Values');
1744: htp.p(''||SQLERRM||'');
1737:
1738: EXCEPTION
1739: WHEN not_selfserve Then
1740: htp.p('Exception in procedure Default_In_Values');
1741: htp.p('This is NOT A self-service Transaction! Alert!!!');
1742: WHEN OTHERS THEN
1743: htp.p('Exception in procedure Default_In_Values');
1744: htp.p(''||SQLERRM||'');
1745:
1739: WHEN not_selfserve Then
1740: htp.p('Exception in procedure Default_In_Values');
1741: htp.p('This is NOT A self-service Transaction! Alert!!!');
1742: WHEN OTHERS THEN
1743: htp.p('Exception in procedure Default_In_Values');
1744: htp.p(''||SQLERRM||'');
1745:
1746: END Default_In_Values;
1747:
1740: htp.p('Exception in procedure Default_In_Values');
1741: htp.p('This is NOT A self-service Transaction! Alert!!!');
1742: WHEN OTHERS THEN
1743: htp.p('Exception in procedure Default_In_Values');
1744: htp.p(''||SQLERRM||'');
1745:
1746: END Default_In_Values;
1747:
1748: ------------------------------------------------------------------------------------
1787: AND qpc.enabled_flag = 1
1788: ORDER BY qpc.prompt_sequence;
1789:
1790: BEGIN
1791: -- htp.p('vqr procedure entered');
1792: if (icx_sec.validatesession) then
1793:
1794: fnd_message.clear;
1795: l_language_code := icx_sec.getID(icx_sec.PV_LANGUAGE_CODE);
1794: fnd_message.clear;
1795: l_language_code := icx_sec.getID(icx_sec.PV_LANGUAGE_CODE);
1796:
1797:
1798: -- htp.p('after lang code: ' || l_language_code);
1799: -- htp.p('ss_where='||ss_where_clause); htp.nl;
1800: if (ss_where_clause is not null) then
1801: ss_w_c := wfa_html.conv_special_url_chars(ss_where_clause);
1802: end if;
1795: l_language_code := icx_sec.getID(icx_sec.PV_LANGUAGE_CODE);
1796:
1797:
1798: -- htp.p('after lang code: ' || l_language_code);
1799: -- htp.p('ss_where='||ss_where_clause); htp.nl;
1800: if (ss_where_clause is not null) then
1801: ss_w_c := wfa_html.conv_special_url_chars(ss_where_clause);
1802: end if;
1803: num_of_col := 0;
1808:
1809: vname := 'Q_' || replace(substr(plan_name_i,1,25),' ','_') || '_V';
1810: vname := UPPER(vname);
1811:
1812: htp.p('');
1813: htp.p('
1809: vname := 'Q_' || replace(substr(plan_name_i,1,25),' ','_') || '_V';
1810: vname := UPPER(vname);
1811:
1812: htp.p('');
1813: htp.p('');
1814: htp.p('');
1815: htp.p('
1810: vname := UPPER(vname);
1811:
1812: htp.p('');
1813: htp.p('
1811:
1812: htp.p('');
1813: htp.p('
1822: p_disp_help=>'Y',p_disp_exit=>'Y');
1823: icx_plug_utilities.plugbanner(plan_name_i);
1824: */
1825:
1826: htp.p('Records ' || to_char(start_row) || ' to ' || to_char(end_row));
1827:
1828: htp.tableOpen(calign=>'CENTER', cborder=>'BORDER=2', cattributes=>'CELLPADDING=2');
1829: htp.tableRowOpen(cattributes=>'BGCOLOR="#336699"');
1830:
1824: */
1825:
1826: htp.p('Records ' || to_char(start_row) || ' to ' || to_char(end_row));
1827:
1828: htp.tableOpen(calign=>'CENTER', cborder=>'BORDER=2', cattributes=>'CELLPADDING=2');
1829: htp.tableRowOpen(cattributes=>'BGCOLOR="#336699"');
1830:
1831: -- htp.p('Before cursor loop. msg = '||msg);
1832:
1825:
1826: htp.p('Records ' || to_char(start_row) || ' to ' || to_char(end_row));
1827:
1828: htp.tableOpen(calign=>'CENTER', cborder=>'BORDER=2', cattributes=>'CELLPADDING=2');
1829: htp.tableRowOpen(cattributes=>'BGCOLOR="#336699"');
1830:
1831: -- htp.p('Before cursor loop. msg = '||msg);
1832:
1833:
1827:
1828: htp.tableOpen(calign=>'CENTER', cborder=>'BORDER=2', cattributes=>'CELLPADDING=2');
1829: htp.tableRowOpen(cattributes=>'BGCOLOR="#336699"');
1830:
1831: -- htp.p('Before cursor loop. msg = '||msg);
1832:
1833:
1834: FOR char_rec IN char_cur
1835: LOOP
1833:
1834: FOR char_rec IN char_cur
1835: LOOP
1836: num_of_col := num_of_col + 1;
1837: htp.tableHeader(cvalue=>''||char_rec.prompt||'', calign=>'CENTER');
1838: Prompt_Arr(num_of_col) := char_rec.prompt;
1839: charname(num_of_col) := replace(UPPER(char_rec.name),' ','_');
1840: charid(num_of_col) := char_rec.char_id;
1841: END LOOP; -- end char_rec loop
1838: Prompt_Arr(num_of_col) := char_rec.prompt;
1839: charname(num_of_col) := replace(UPPER(char_rec.name),' ','_');
1840: charid(num_of_col) := char_rec.char_id;
1841: END LOOP; -- end char_rec loop
1842: -- htp.p('after cur loop');
1843:
1844: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_CREATED_BY')||'', calign=>'CENTER');
1845: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_COLLECTION')||'', calign=>'CENTER');
1846: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_ENTRY_DATE')||'', calign=>'CENTER');
1840: charid(num_of_col) := char_rec.char_id;
1841: END LOOP; -- end char_rec loop
1842: -- htp.p('after cur loop');
1843:
1844: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_CREATED_BY')||'', calign=>'CENTER');
1845: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_COLLECTION')||'', calign=>'CENTER');
1846: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_ENTRY_DATE')||'', calign=>'CENTER');
1847: htp.tableRowClose;
1848: htp.p('
1841: END LOOP; -- end char_rec loop
1842: -- htp.p('after cur loop');
1843:
1844: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_CREATED_BY')||'', calign=>'CENTER');
1845: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_COLLECTION')||'', calign=>'CENTER');
1846: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_ENTRY_DATE')||'', calign=>'CENTER');
1847: htp.tableRowClose;
1848: htp.p('
1842: -- htp.p('after cur loop');
1843:
1844: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_CREATED_BY')||'', calign=>'CENTER');
1845: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_COLLECTION')||'', calign=>'CENTER');
1846: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_ENTRY_DATE')||'', calign=>'CENTER');
1847: htp.tableRowClose;
1848: htp.p('
1843:
1844: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_CREATED_BY')||'', calign=>'CENTER');
1845: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_COLLECTION')||'', calign=>'CENTER');
1846: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_ENTRY_DATE')||'', calign=>'CENTER');
1847: htp.tableRowClose;
1848: htp.p('
1844: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_CREATED_BY')||'', calign=>'CENTER');
1845: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_COLLECTION')||'', calign=>'CENTER');
1846: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_ENTRY_DATE')||'', calign=>'CENTER');
1847: htp.tableRowClose;
1848: htp.p(''); -- This is for UI Standard
1849:
1850: -- htp.p('Before call to build vqr sql');
1851:
1852:
1846: htp.tableHeader(cvalue=>''||fnd_message.get_string('QA','QA_SS_ENTRY_DATE')||'', calign=>'CENTER');
1847: htp.tableRowClose;
1848: htp.p('
1852:
1853: -- Call OB's pkg
1854: sql_st := qa_results_interface_pkg.BUILD_VQR_SQL(plan_id_i,
1855: ss_where_clause);
1856: -- htp.p('Sql stmt returned is: ' || sql_st);
1857:
1858:
1859: dyn_cur := dbms_sql.open_cursor;
1860: dbms_sql.parse(dyn_cur, sql_st, dbms_sql.v7);
1877: end if;
1878:
1879: if (r_cnt >= start_row) then
1880: if (row_color = 'BLUE') Then
1881: htp.tableRowOpen(cattributes=>'BGCOLOR="#99ccff"');
1882: row_color := 'WHITE';
1883: else
1884: htp.tableRowOpen(cattributes=>'BGCOLOR="#ffffff"');
1885: row_color := 'BLUE';
1880: if (row_color = 'BLUE') Then
1881: htp.tableRowOpen(cattributes=>'BGCOLOR="#99ccff"');
1882: row_color := 'WHITE';
1883: else
1884: htp.tableRowOpen(cattributes=>'BGCOLOR="#ffffff"');
1885: row_color := 'BLUE';
1886: end if; -- end if for row_color
1887: FOR i IN 1..num_of_col+3
1888: Loop
1886: end if; -- end if for row_color
1887: FOR i IN 1..num_of_col+3
1888: Loop
1889: Dbms_Sql.column_value(dyn_cur, i, tempstr);
1890: htp.tableData(NVL(tempstr, ' '));
1891: End Loop; -- End for loop inside of dyn cursor loop
1892: htp.tableRowClose;
1893:
1894: end if; -- end r_cnt check
1888: Loop
1889: Dbms_Sql.column_value(dyn_cur, i, tempstr);
1890: htp.tableData(NVL(tempstr, ' '));
1891: End Loop; -- End for loop inside of dyn cursor loop
1892: htp.tableRowClose;
1893:
1894: end if; -- end r_cnt check
1895: ELSE
1896: -- no more row to process
1901:
1902: END LOOP;
1903:
1904: /* -- commenting out becos bottom table header not part of new UI
1905: htp.p('');
1906: htp.tableRowOpen(cattributes=>'BGCOLOR="#83C1C1"');
1907: FOR i IN 1..num_of_col
1908: LOOP
1909: htp.tableHeader(cvalue=>Prompt_Arr(i), calign=>'CENTER');
1902: END LOOP;
1903:
1904: /* -- commenting out becos bottom table header not part of new UI
1905: htp.p('
1905: htp.p('
1907: FOR i IN 1..num_of_col
1908: LOOP
1909: htp.tableHeader(cvalue=>Prompt_Arr(i), calign=>'CENTER');
1910: END LOOP;
1911: htp.tableHeader(cvalue=>'Created By', calign=>'CENTER');
1912: htp.tableHeader(cvalue=>'Collection', calign=>'CENTER');
1913: htp.tableHeader(cvalue=>'Entry Date', calign=>'CENTER');
1914: htp.tableRowClose;
1915: */
1908: LOOP
1909: htp.tableHeader(cvalue=>Prompt_Arr(i), calign=>'CENTER');
1910: END LOOP;
1911: htp.tableHeader(cvalue=>'Created By', calign=>'CENTER');
1912: htp.tableHeader(cvalue=>'Collection', calign=>'CENTER');
1913: htp.tableHeader(cvalue=>'Entry Date', calign=>'CENTER');
1914: htp.tableRowClose;
1915: */
1916:
1909: htp.tableHeader(cvalue=>Prompt_Arr(i), calign=>'CENTER');
1910: END LOOP;
1911: htp.tableHeader(cvalue=>'Created By', calign=>'CENTER');
1912: htp.tableHeader(cvalue=>'Collection', calign=>'CENTER');
1913: htp.tableHeader(cvalue=>'Entry Date', calign=>'CENTER');
1914: htp.tableRowClose;
1915: */
1916:
1917: htp.tableClose;
1910: END LOOP;
1911: htp.tableHeader(cvalue=>'Created By', calign=>'CENTER');
1912: htp.tableHeader(cvalue=>'Collection', calign=>'CENTER');
1913: htp.tableHeader(cvalue=>'Entry Date', calign=>'CENTER');
1914: htp.tableRowClose;
1915: */
1916:
1917: htp.tableClose;
1918:
1913: htp.tableHeader(cvalue=>'Entry Date', calign=>'CENTER');
1914: htp.tableRowClose;
1915: */
1916:
1917: htp.tableClose;
1918:
1919: srow_st := 'qa_ss_core.VQR?plan_id_i='|| plan_id_i
1920: || '&' || 'start_row=' || to_char(start_row-l_query_size)
1921: || '&' || 'end_row=' || to_char(start_row-1)
1929:
1930:
1931:
1932: if (start_row > 1) then
1933: htp.anchor(srow_st, fnd_message.get_string('QA','QA_SS_PREVIOUS'));
1934: end if;
1935:
1936: htp.p(' -------- ');
1937:
1932: if (start_row > 1) then
1933: htp.anchor(srow_st, fnd_message.get_string('QA','QA_SS_PREVIOUS'));
1934: end if;
1935:
1936: htp.p(' -------- ');
1937:
1938: if (more_records = TRUE) then
1939: htp.anchor(erow_st, fnd_message.get_string('QA','QA_SS_NEXT'));
1940: end if;
1935:
1936: htp.p(' -------- ');
1937:
1938: if (more_records = TRUE) then
1939: htp.anchor(erow_st, fnd_message.get_string('QA','QA_SS_NEXT'));
1940: end if;
1941:
1942: htp.p('');
1943: htp.p('');
1938: if (more_records = TRUE) then
1939: htp.anchor(erow_st, fnd_message.get_string('QA','QA_SS_NEXT'));
1940: end if;
1941:
1942: htp.p('');
1943: htp.p('');
1944:
1945: DBMS_SQL.Close_Cursor(dyn_cur);
1946:
1939: htp.anchor(erow_st, fnd_message.get_string('QA','QA_SS_NEXT'));
1940: end if;
1941:
1942: htp.p('');
1943: htp.p('');
1944:
1945: DBMS_SQL.Close_Cursor(dyn_cur);
1946:
1947:
1954: IF DBMS_SQL.IS_OPEN(dyn_cur) Then
1955: DBMS_SQL.CLOSE_CURSOR(dyn_cur);
1956: END IF;
1957: Raise;
1958: htp.p('Exception in procedure VQR');
1959: htp.p(''||SQLERRM||'');
1960:
1961: END VQR;
1962: -------------------------------------------------------------------------------------
1955: DBMS_SQL.CLOSE_CURSOR(dyn_cur);
1956: END IF;
1957: Raise;
1958: htp.p('Exception in procedure VQR');
1959: htp.p(''||SQLERRM||'');
1960:
1961: END VQR;
1962: -------------------------------------------------------------------------------------
1963:
1968: NULL;
1969:
1970: EXCEPTION
1971: WHEN OTHERS THEN
1972: htp.p('Exception in procedure draw_display_field');
1973: htp.p(''||SQLERRM||'');
1974:
1975: END draw_display_field;
1976: ---------------------------------------------------------------
1969:
1970: EXCEPTION
1971: WHEN OTHERS THEN
1972: htp.p('Exception in procedure draw_display_field');
1973: htp.p(''||SQLERRM||'');
1974:
1975: END draw_display_field;
1976: ---------------------------------------------------------------
1977:
1983: NULL;
1984:
1985: EXCEPTION
1986: WHEN OTHERS THEN
1987: htp.p('Exception in procedure draw_input_field');
1988: htp.p(''||SQLERRM||'');
1989:
1990: END draw_input_field;
1991: -------------------------------------------------------------------------------
1984:
1985: EXCEPTION
1986: WHEN OTHERS THEN
1987: htp.p('Exception in procedure draw_input_field');
1988: htp.p(''||SQLERRM||'');
1989:
1990: END draw_input_field;
1991: -------------------------------------------------------------------------------
1992:
1997: BEGIN
1998:
1999: EXCEPTION
2000: WHEN OTHERS THEN
2001: htp.p('Exception in procedure draw_lov_button');
2002: htp.p(''||SQLERRM||'');
2003: END draw_lov_button;
2004: */
2005: ------------------------------------------------------------------------------
1998:
1999: EXCEPTION
2000: WHEN OTHERS THEN
2001: htp.p('Exception in procedure draw_lov_button');
2002: htp.p(''||SQLERRM||'');
2003: END draw_lov_button;
2004: */
2005: ------------------------------------------------------------------------------
2006:
2011: NULL;
2012:
2013: EXCEPTION
2014: WHEN OTHERS THEN
2015: htp.p('Exception in procedure draw_prompt');
2016: htp.p(''||SQLERRM||'');
2017:
2018: END draw_prompt;
2019: ---------------------------------------------------------------------------------
2012:
2013: EXCEPTION
2014: WHEN OTHERS THEN
2015: htp.p('Exception in procedure draw_prompt');
2016: htp.p(''||SQLERRM||'');
2017:
2018: END draw_prompt;
2019: ---------------------------------------------------------------------------------
2020:
3314:
3315: Return TRUE; -- If all failed, return TRUE to signal empty row
3316: EXCEPTION
3317: WHEN OTHERS THEN
3318: htp.p('Exception in function is_empty_row');
3319: htp.p(''||SQLERRM||'');
3320: END is_empty_row;
3321: ------------------------------------------------------------------------------------
3322:
3315: Return TRUE; -- If all failed, return TRUE to signal empty row
3316: EXCEPTION
3317: WHEN OTHERS THEN
3318: htp.p('Exception in function is_empty_row');
3319: htp.p(''||SQLERRM||'');
3320: END is_empty_row;
3321: ------------------------------------------------------------------------------------
3322:
3323:
3347:
3348:
3349: EXCEPTION
3350: WHEN OTHERS THEN
3351: htp.p('Exception in function any_applicable_plans');
3352: htp.p(''||SQLERRM||'');
3353: -- anagarwa Thu Nov 8 11:24:34 PST 2001
3354: -- Following return added to handle following problem (Bug #2101177) :
3355: -- ORA-06503: PL/SQL: Function returned without value
3348:
3349: EXCEPTION
3350: WHEN OTHERS THEN
3351: htp.p('Exception in function any_applicable_plans');
3352: htp.p(''||SQLERRM||'');
3353: -- anagarwa Thu Nov 8 11:24:34 PST 2001
3354: -- Following return added to handle following problem (Bug #2101177) :
3355: -- ORA-06503: PL/SQL: Function returned without value
3356: -- ORA-06512: at "APPS.QA_SS_CORE", line 3327
3394: end if; -- end icx session
3395:
3396: EXCEPTION
3397: WHEN OTHERS THEN
3398: htp.p('Exception in procedure all_applicable_plans');
3399: htp.p(''||SQLERRM||'');
3400: END all_applicable_plans;
3401: -------------------------------------------------------------------------------------------
3402:
3395:
3396: EXCEPTION
3397: WHEN OTHERS THEN
3398: htp.p('Exception in procedure all_applicable_plans');
3399: htp.p(''||SQLERRM||'');
3400: END all_applicable_plans;
3401: -------------------------------------------------------------------------------------------
3402:
3403: function Evaluate_Triggers ( Ctx IN qa_ss_const.Ctx_Table,
3548: RETURN atleast_one;
3549:
3550: EXCEPTION
3551: WHEN OTHERS THEN
3552: htp.p('Exception in function Evaluate_Triggers');
3553: htp.p(''||SQLERRM||'');
3554: -- anagarwa Thu Nov 8 11:24:34 PST 2001
3555: -- Following return added to handle following problem (Bug #2101177) :
3556: -- ORA-06503: PL/SQL: Function returned without value
3549:
3550: EXCEPTION
3551: WHEN OTHERS THEN
3552: htp.p('Exception in function Evaluate_Triggers');
3553: htp.p(''||SQLERRM||'');
3554: -- anagarwa Thu Nov 8 11:24:34 PST 2001
3555: -- Following return added to handle following problem (Bug #2101177) :
3556: -- ORA-06503: PL/SQL: Function returned without value
3557: -- ORA-06512: at "APPS.QA_SS_CORE", line 3327
3589:
3590: lov_win.opener = self;
3591: }');
3592:
3593: htp.p('');
3594:
3595: EXCEPTION
3596:
3597: WHEN OTHERS THEN
3594:
3595: EXCEPTION
3596:
3597: WHEN OTHERS THEN
3598: htp.p('Exception in procedure generate_eqr_javascript');
3599: htp.p(''||SQLERRM||'');
3600: END generate_eqr_javascript;
3601: -------------------------------------------------------------------------------------------------
3602: procedure List_Plans ( Pid_tab IN qa_ss_const.num_table,
3595: EXCEPTION
3596:
3597: WHEN OTHERS THEN
3598: htp.p('Exception in procedure generate_eqr_javascript');
3599: htp.p(''||SQLERRM||'');
3600: END generate_eqr_javascript;
3601: -------------------------------------------------------------------------------------------------
3602: procedure List_Plans ( Pid_tab IN qa_ss_const.num_table,
3603: txn_num IN NUMBER DEFAULT NULL,
3658: -- and pk2 is wip_entity_id
3659: END IF;
3660: END IF;
3661:
3662: htp.p('');
3663: htp.p('
3659: END IF;
3660: END IF;
3661:
3662: htp.p('');
3663: htp.p('');
3664:
3665: /* -- Javascript COMMENTED OUT
3666: htp.p('');
3664:
3665: /* -- Javascript COMMENTED OUT
3666: htp.p('');
3664:
3665: /* -- Javascript COMMENTED OUT
3666: htp.p('');
3684: || '&' || 'pk9="+p9+"'
3685: || '&' || 'pk10="+p10;
3686: }');
3687:
3688: htp.p('');
3689: */ -- COMMENTED OUT ABOVE
3690:
3691: htp.p('');
3692: htp.p('
3687:
3688: htp.p('');
3689: */ -- COMMENTED OUT ABOVE
3690:
3691: htp.p('');
3692: htp.p('
3688: htp.p('');
3689: */ -- COMMENTED OUT ABOVE
3690:
3691: htp.p('');
3692: htp.p('');
3693:
3694: -- icx_admin_sig.toolbar(language_code => l_language_code);
3695: -- icx_plug_utilities.plugbanner(fnd_message.get_string('QA', 'QA_SS_COLL_PLANS'));
3696: if (NOT osp_job_ok) THEN
3693:
3694: -- icx_admin_sig.toolbar(language_code => l_language_code);
3695: -- icx_plug_utilities.plugbanner(fnd_message.get_string('QA', 'QA_SS_COLL_PLANS'));
3696: if (NOT osp_job_ok) THEN
3697: htp.p(fnd_message.get_string('QA', 'QA_SS_INVALID_JOB'));
3698: end if;
3699: htp.formOpen('');
3700: htp.br;
3701: htp.tableOpen(cborder=>'BORDER=2', cattributes=>'CELLPADDING=2');
3695: -- icx_plug_utilities.plugbanner(fnd_message.get_string('QA', 'QA_SS_COLL_PLANS'));
3696: if (NOT osp_job_ok) THEN
3697: htp.p(fnd_message.get_string('QA', 'QA_SS_INVALID_JOB'));
3698: end if;
3699: htp.formOpen('');
3700: htp.br;
3701: htp.tableOpen(cborder=>'BORDER=2', cattributes=>'CELLPADDING=2');
3702: htp.tableRowOpen (cattributes=>'BGCOLOR="#336699"');
3703: htp.tableHeader(cvalue=>''||
3696: if (NOT osp_job_ok) THEN
3697: htp.p(fnd_message.get_string('QA', 'QA_SS_INVALID_JOB'));
3698: end if;
3699: htp.formOpen('');
3700: htp.br;
3701: htp.tableOpen(cborder=>'BORDER=2', cattributes=>'CELLPADDING=2');
3702: htp.tableRowOpen (cattributes=>'BGCOLOR="#336699"');
3703: htp.tableHeader(cvalue=>''||
3704: fnd_message.get_string('QA', 'QA_SS_CP_HEADING')
3697: htp.p(fnd_message.get_string('QA', 'QA_SS_INVALID_JOB'));
3698: end if;
3699: htp.formOpen('');
3700: htp.br;
3701: htp.tableOpen(cborder=>'BORDER=2', cattributes=>'CELLPADDING=2');
3702: htp.tableRowOpen (cattributes=>'BGCOLOR="#336699"');
3703: htp.tableHeader(cvalue=>''||
3704: fnd_message.get_string('QA', 'QA_SS_CP_HEADING')
3705: || '', calign=>'CENTER');
3698: end if;
3699: htp.formOpen('');
3700: htp.br;
3701: htp.tableOpen(cborder=>'BORDER=2', cattributes=>'CELLPADDING=2');
3702: htp.tableRowOpen (cattributes=>'BGCOLOR="#336699"');
3703: htp.tableHeader(cvalue=>''||
3704: fnd_message.get_string('QA', 'QA_SS_CP_HEADING')
3705: || '', calign=>'CENTER');
3706: htp.tableHeader(cvalue=>''||
3699: htp.formOpen('');
3700: htp.br;
3701: htp.tableOpen(cborder=>'BORDER=2', cattributes=>'CELLPADDING=2');
3702: htp.tableRowOpen (cattributes=>'BGCOLOR="#336699"');
3703: htp.tableHeader(cvalue=>''||
3704: fnd_message.get_string('QA', 'QA_SS_CP_HEADING')
3705: || '', calign=>'CENTER');
3706: htp.tableHeader(cvalue=>''||
3707: fnd_message.get_string('QA', 'QA_SS_DESC'), calign=>'CENTER');
3702: htp.tableRowOpen (cattributes=>'BGCOLOR="#336699"');
3703: htp.tableHeader(cvalue=>''||
3704: fnd_message.get_string('QA', 'QA_SS_CP_HEADING')
3705: || '', calign=>'CENTER');
3706: htp.tableHeader(cvalue=>''||
3707: fnd_message.get_string('QA', 'QA_SS_DESC'), calign=>'CENTER');
3708: htp.tableHeader(cvalue=>''||
3709: 'Type'|| '', calign=>'CENTER');
3710: if (show_eqr) THEN
3704: fnd_message.get_string('QA', 'QA_SS_CP_HEADING')
3705: || '', calign=>'CENTER');
3706: htp.tableHeader(cvalue=>''||
3707: fnd_message.get_string('QA', 'QA_SS_DESC'), calign=>'CENTER');
3708: htp.tableHeader(cvalue=>''||
3709: 'Type'|| '', calign=>'CENTER');
3710: if (show_eqr) THEN
3711: htp.tableHeader(cvalue=>''||
3712: fnd_message.get_string('QA', 'QA_SS_ENTER_BUTTON')|| '', calign=>'CENTER');
3707: fnd_message.get_string('QA', 'QA_SS_DESC'), calign=>'CENTER');
3708: htp.tableHeader(cvalue=>''||
3709: 'Type'|| '', calign=>'CENTER');
3710: if (show_eqr) THEN
3711: htp.tableHeader(cvalue=>''||
3712: fnd_message.get_string('QA', 'QA_SS_ENTER_BUTTON')|| '', calign=>'CENTER');
3713: END IF;
3714: htp.tableHeader(cvalue=>''||
3715: fnd_message.get_string('QA', 'QA_SS_VIEW_BUTTON')|| '', calign=>'CENTER');
3710: if (show_eqr) THEN
3711: htp.tableHeader(cvalue=>''||
3712: fnd_message.get_string('QA', 'QA_SS_ENTER_BUTTON')|| '', calign=>'CENTER');
3713: END IF;
3714: htp.tableHeader(cvalue=>''||
3715: fnd_message.get_string('QA', 'QA_SS_VIEW_BUTTON')|| '', calign=>'CENTER');
3716: htp.tableHeader(cvalue=>''||
3717: fnd_message.get_string('QA', 'QA_SS_ATTACH_BUTTON')|| '', calign=>'CENTER');
3718: htp.tableRowClose;
3712: fnd_message.get_string('QA', 'QA_SS_ENTER_BUTTON')|| '', calign=>'CENTER');
3713: END IF;
3714: htp.tableHeader(cvalue=>''||
3715: fnd_message.get_string('QA', 'QA_SS_VIEW_BUTTON')|| '', calign=>'CENTER');
3716: htp.tableHeader(cvalue=>''||
3717: fnd_message.get_string('QA', 'QA_SS_ATTACH_BUTTON')|| '', calign=>'CENTER');
3718: htp.tableRowClose;
3719: htp.p('
3714: htp.tableHeader(cvalue=>''||
3715: fnd_message.get_string('QA', 'QA_SS_VIEW_BUTTON')|| '', calign=>'CENTER');
3716: htp.tableHeader(cvalue=>''||
3717: fnd_message.get_string('QA', 'QA_SS_ATTACH_BUTTON')|| '', calign=>'CENTER');
3718: htp.tableRowClose;
3719: htp.p('
3715: fnd_message.get_string('QA', 'QA_SS_VIEW_BUTTON')|| '', calign=>'CENTER');
3716: htp.tableHeader(cvalue=>''||
3717: fnd_message.get_string('QA', 'QA_SS_ATTACH_BUTTON')|| '', calign=>'CENTER');
3718: htp.tableRowClose;
3719: htp.p('');
3720:
3721: -- Loop goes in here
3722: no_of_plans := Pid_tab.count;
3723: For i in 1..no_of_plans
3752: pdesc := NVL(substr(plan_rec.description,1,20), ' ');
3753: ptype := NVL(substr(plan_rec.meaning,1,20), ' ');
3754:
3755: IF (row_color = 'BLUE') THEN
3756: htp.tableRowOpen(cattributes=>'BGCOLOR="#99CCFF"');
3757: row_color := 'WHITE';
3758: ELSE
3759: htp.tableRowOpen(cattributes=>'BGCOLOR="#FFFFFF"');
3760: row_color := 'BLUE';
3755: IF (row_color = 'BLUE') THEN
3756: htp.tableRowOpen(cattributes=>'BGCOLOR="#99CCFF"');
3757: row_color := 'WHITE';
3758: ELSE
3759: htp.tableRowOpen(cattributes=>'BGCOLOR="#FFFFFF"');
3760: row_color := 'BLUE';
3761: END IF; -- end if for row color
3762:
3763: htp.tableData(pname);
3759: htp.tableRowOpen(cattributes=>'BGCOLOR="#FFFFFF"');
3760: row_color := 'BLUE';
3761: END IF; -- end if for row color
3762:
3763: htp.tableData(pname);
3764: htp.tableData(pdesc);
3765: htp.tableData(ptype);
3766: IF (show_eqr) THEN
3767: htp.tableData(htf.anchor(enterurl, fnd_message.get_string('QA','QA_SS_ENTER_BUTTON'), cattributes=>'TARGET="enterwin"'));
3760: row_color := 'BLUE';
3761: END IF; -- end if for row color
3762:
3763: htp.tableData(pname);
3764: htp.tableData(pdesc);
3765: htp.tableData(ptype);
3766: IF (show_eqr) THEN
3767: htp.tableData(htf.anchor(enterurl, fnd_message.get_string('QA','QA_SS_ENTER_BUTTON'), cattributes=>'TARGET="enterwin"'));
3768: END IF;
3761: END IF; -- end if for row color
3762:
3763: htp.tableData(pname);
3764: htp.tableData(pdesc);
3765: htp.tableData(ptype);
3766: IF (show_eqr) THEN
3767: htp.tableData(htf.anchor(enterurl, fnd_message.get_string('QA','QA_SS_ENTER_BUTTON'), cattributes=>'TARGET="enterwin"'));
3768: END IF;
3769: htp.tableData(htf.anchor(viewurl, fnd_message.get_string('QA','QA_SS_VIEW_BUTTON'), cattributes=>'TARGET="viewwin"'));
3763: htp.tableData(pname);
3764: htp.tableData(pdesc);
3765: htp.tableData(ptype);
3766: IF (show_eqr) THEN
3767: htp.tableData(htf.anchor(enterurl, fnd_message.get_string('QA','QA_SS_ENTER_BUTTON'), cattributes=>'TARGET="enterwin"'));
3768: END IF;
3769: htp.tableData(htf.anchor(viewurl, fnd_message.get_string('QA','QA_SS_VIEW_BUTTON'), cattributes=>'TARGET="viewwin"'));
3770: if (atchmt = 'FULL') then
3771: htp.tableData(htf.anchor(attachurl,
3765: htp.tableData(ptype);
3766: IF (show_eqr) THEN
3767: htp.tableData(htf.anchor(enterurl, fnd_message.get_string('QA','QA_SS_ENTER_BUTTON'), cattributes=>'TARGET="enterwin"'));
3768: END IF;
3769: htp.tableData(htf.anchor(viewurl, fnd_message.get_string('QA','QA_SS_VIEW_BUTTON'), cattributes=>'TARGET="viewwin"'));
3770: if (atchmt = 'FULL') then
3771: htp.tableData(htf.anchor(attachurl,
3772: fnd_message.get_string('QA','QA_SS_AVAILABLE'),
3773: cattributes=>'TARGET="attwin"'));
3767: htp.tableData(htf.anchor(enterurl, fnd_message.get_string('QA','QA_SS_ENTER_BUTTON'), cattributes=>'TARGET="enterwin"'));
3768: END IF;
3769: htp.tableData(htf.anchor(viewurl, fnd_message.get_string('QA','QA_SS_VIEW_BUTTON'), cattributes=>'TARGET="viewwin"'));
3770: if (atchmt = 'FULL') then
3771: htp.tableData(htf.anchor(attachurl,
3772: fnd_message.get_string('QA','QA_SS_AVAILABLE'),
3773: cattributes=>'TARGET="attwin"'));
3774: else
3775: htp.tableData('&'||'nbsp');
3771: htp.tableData(htf.anchor(attachurl,
3772: fnd_message.get_string('QA','QA_SS_AVAILABLE'),
3773: cattributes=>'TARGET="attwin"'));
3774: else
3775: htp.tableData('&'||'nbsp');
3776: end if;
3777:
3778: CLOSE plan_cur;
3779: End Loop; -- end of forloop for all rows in list of plans
3779: End Loop; -- end of forloop for all rows in list of plans
3780:
3781: -- Bottom header is below
3782: /*
3783: htp.p('');
3784: htp.tableRowOpen (cattributes=>'BGCOLOR="#83C1C1"');
3785: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_CP_HEADING'), calign=>'CENTER');
3786: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_DESC'), calign=>'CENTER');
3787: htp.tableHeader(cvalue=>'Type', calign=>'CENTER');
3780:
3781: -- Bottom header is below
3782: /*
3783: htp.p('
3781: -- Bottom header is below
3782: /*
3783: htp.p('
3782: /*
3783: htp.p('
3783: htp.p('
3785: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_CP_HEADING'), calign=>'CENTER');
3786: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_DESC'), calign=>'CENTER');
3787: htp.tableHeader(cvalue=>'Type', calign=>'CENTER');
3788: IF (show_eqr) THEN
3789: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_ENTER_BUTTON'), calign=>'CENTER');
3790: END IF;
3791: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_VIEW_BUTTON'), calign=>'CENTER');
3792: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_ATTACH_BUTTON'), calign=>'CENTER');
3793: htp.tableRowClose;
3787: htp.tableHeader(cvalue=>'Type', calign=>'CENTER');
3788: IF (show_eqr) THEN
3789: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_ENTER_BUTTON'), calign=>'CENTER');
3790: END IF;
3791: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_VIEW_BUTTON'), calign=>'CENTER');
3792: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_ATTACH_BUTTON'), calign=>'CENTER');
3793: htp.tableRowClose;
3794: */
3795: htp.tableClose;
3788: IF (show_eqr) THEN
3789: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_ENTER_BUTTON'), calign=>'CENTER');
3790: END IF;
3791: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_VIEW_BUTTON'), calign=>'CENTER');
3792: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_ATTACH_BUTTON'), calign=>'CENTER');
3793: htp.tableRowClose;
3794: */
3795: htp.tableClose;
3796: htp.formClose;
3789: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_ENTER_BUTTON'), calign=>'CENTER');
3790: END IF;
3791: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_VIEW_BUTTON'), calign=>'CENTER');
3792: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_ATTACH_BUTTON'), calign=>'CENTER');
3793: htp.tableRowClose;
3794: */
3795: htp.tableClose;
3796: htp.formClose;
3797:
3791: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_VIEW_BUTTON'), calign=>'CENTER');
3792: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_ATTACH_BUTTON'), calign=>'CENTER');
3793: htp.tableRowClose;
3794: */
3795: htp.tableClose;
3796: htp.formClose;
3797:
3798:
3799: htp.p('');
3792: htp.tableHeader(cvalue=>fnd_message.get_string('QA', 'QA_SS_ATTACH_BUTTON'), calign=>'CENTER');
3793: htp.tableRowClose;
3794: */
3795: htp.tableClose;
3796: htp.formClose;
3797:
3798:
3799: htp.p('');
3800:
3795: htp.tableClose;
3796: htp.formClose;
3797:
3798:
3799: htp.p('');
3800:
3801: htp.p('');
3802:
3803: NULL;
3797:
3798:
3799: htp.p('');
3800:
3801: htp.p('');
3802:
3803: NULL;
3804: end if; -- end icx session
3805:
3809: If plan_cur%ISOPEN Then
3810: CLOSE plan_cur;
3811: End if;
3812:
3813: htp.p('Exception in QA_SS_CORE.List_Plans');
3814: htp.p(''||SQLERRM||'');
3815: END List_Plans;
3816:
3817: ---------------------------------------------------------------------------------------------------
3810: CLOSE plan_cur;
3811: End if;
3812:
3813: htp.p('Exception in QA_SS_CORE.List_Plans');
3814: htp.p(''||SQLERRM||'');
3815: END List_Plans;
3816:
3817: ---------------------------------------------------------------------------------------------------
3818: procedure Plan_List_Frames (
3840: ELSIF (txn_num=110) then
3841: url_str := 'qa_ss_ship.shipping_plans';
3842: END IF;
3843:
3844: htp.p('');
3845: htp.p('
3841: url_str := 'qa_ss_ship.shipping_plans';
3842: END IF;
3843:
3844: htp.p('');
3845: htp.p('
3846: htp.p('
3842: END IF;
3843:
3844: htp.p('');
3845: htp.p('
3848: ||l_language_code||'/POSSTYLE.css">');
3849:
3850:
3851: htp.p('');
3853: htp.p('');
3855: htp.p('');
3850:
3851: htp.p('');
3853: htp.p('');
3855: htp.p('');
3857:
3858: js.scriptOpen;
3852: htp.p('');
3853: htp.p('');
3855: htp.p('');
3857:
3858: js.scriptOpen;
3859: pos_global_vars_sv.InitializeMessageArray;
3860: js.scriptClose;
3857:
3858: js.scriptOpen;
3859: pos_global_vars_sv.InitializeMessageArray;
3860: js.scriptClose;
3861: htp.p('');
3862:
3863: toolbar_heading := fnd_message.get_string('QA', 'QA_SS_COLL_PLANS');
3864: toolbar_heading := wfa_html.conv_special_url_chars(toolbar_heading);
3865: htp.p('
3861: htp.p('');
3862:
3863: toolbar_heading := fnd_message.get_string('QA', 'QA_SS_COLL_PLANS');
3864: toolbar_heading := wfa_html.conv_special_url_chars(toolbar_heading);
3865: htp.p('
3868: marginwidth=6
3869: marginheight=2
3862:
3863: toolbar_heading := fnd_message.get_string('QA', 'QA_SS_COLL_PLANS');
3864: toolbar_heading := wfa_html.conv_special_url_chars(toolbar_heading);
3865: htp.p('
3867: name=toolbar
3868: marginwidth=6
3869: marginheight=2
3870: scrolling=no>');
3871: htp.p('
3874: marginwidth=0
3875: marginheight=0
3868: marginwidth=6
3869: marginheight=2
3870: scrolling=no>');
3871: htp.p('
3873: name=borderLeft
3874: marginwidth=0
3875: marginheight=0
3876: scrolling=no>');
3877: htp.p('
3880: marginwidth=0
3881: marginheight=0
3874: marginwidth=0
3875: marginheight=0
3876: scrolling=no>');
3877: htp.p('
3901:
3902:
3903:
3904: /* -- BELOW ONLY FOR DEBUG
3905: htp.p('
3906: name=content
3907: marginwidth=0
3908: marginheight=0
3909: scrolling=yes>');
3907: marginwidth=0
3908: marginheight=0
3909: scrolling=yes>');
3910: */
3911: htp.p('
3912: name=lowerbanner
3913: marginwidth=0
3914: marginheight=0
3915: scrolling=no>');
3913: marginwidth=0
3914: marginheight=0
3915: scrolling=no>');
3916:
3917: htp.p('
3914: marginheight=0
3915: scrolling=no>');
3916:
3917: htp.p('
3919: name=borderRight
3920: marginwidth=0
3921: marginheight=0
3922: scrolling=no>');
3923: htp.p('');
3924: htp.p('
3925: name=bottomregion
3926: marginwidth=0
3927: marginheight=0
3920: marginwidth=0
3921: marginheight=0
3922: scrolling=no>');
3923: htp.p('');
3924: htp.p('
3925: name=bottomregion
3926: marginwidth=0
3927: marginheight=0
3928: scrolling=no>');
3925: name=bottomregion
3926: marginwidth=0
3927: marginheight=0
3928: scrolling=no>');
3929: htp.p('');
3930: htp.p('');
3931:
3932: EXCEPTION
3933: WHEN OTHERS THEN
3926: marginwidth=0
3927: marginheight=0
3928: scrolling=no>');
3929: htp.p('');
3930: htp.p('');
3931:
3932: EXCEPTION
3933: WHEN OTHERS THEN
3934: htp.p('Exception in QA_SS_CORE.Plan_List_Frames');
3930: htp.p('');
3931:
3932: EXCEPTION
3933: WHEN OTHERS THEN
3934: htp.p('Exception in QA_SS_CORE.Plan_List_Frames');
3935: htp.p(''||SQLERRM||'');
3936: END Plan_List_Frames;
3937: ----------------------------------------------------------------------------------------------------
3938: procedure VQR_Frames(plan_id_i IN qa_plans.plan_id%TYPE,
3931:
3932: EXCEPTION
3933: WHEN OTHERS THEN
3934: htp.p('Exception in QA_SS_CORE.Plan_List_Frames');
3935: htp.p(''||SQLERRM||'');
3936: END Plan_List_Frames;
3937: ----------------------------------------------------------------------------------------------------
3938: procedure VQR_Frames(plan_id_i IN qa_plans.plan_id%TYPE,
3939: ss_where_clause in varchar2 default null)
3956: OPEN plan_name_cur;
3957: FETCH plan_name_cur INTO l_plan_name;
3958: CLOSE plan_name_cur;
3959:
3960: htp.p('');
3961: htp.p('
3957: FETCH plan_name_cur INTO l_plan_name;
3958: CLOSE plan_name_cur;
3959:
3960: htp.p('');
3961: htp.p('
3962: htp.p('
3958: CLOSE plan_name_cur;
3959:
3960: htp.p('');
3961: htp.p('
3964: ||l_language_code||'/POSSTYLE.css">');
3965:
3966:
3967: htp.p('');
3969: htp.p('');
3971: htp.p('');
3966:
3967: htp.p('');
3969: htp.p('');
3971: htp.p('');
3973:
3974: js.scriptOpen;
3968: htp.p('');
3969: htp.p('');
3971: htp.p('');
3973:
3974: js.scriptOpen;
3975: pos_global_vars_sv.InitializeMessageArray;
3976: js.scriptClose;
3973:
3974: js.scriptOpen;
3975: pos_global_vars_sv.InitializeMessageArray;
3976: js.scriptClose;
3977: htp.p('');
3978:
3979: toolbar_heading := fnd_message.get_string('QA', 'QA_SS_VQR');
3980: toolbar_heading := wfa_html.conv_special_url_chars(toolbar_heading);
3981:
3978:
3979: toolbar_heading := fnd_message.get_string('QA', 'QA_SS_VQR');
3980: toolbar_heading := wfa_html.conv_special_url_chars(toolbar_heading);
3981:
3982: htp.p('
3985: marginwidth=6
3986: marginheight=2
3979: toolbar_heading := fnd_message.get_string('QA', 'QA_SS_VQR');
3980: toolbar_heading := wfa_html.conv_special_url_chars(toolbar_heading);
3981:
3982: htp.p('
3984: name=toolbar
3985: marginwidth=6
3986: marginheight=2
3987: scrolling=no>');
3988: htp.p('
3991: marginwidth=0
3992: marginheight=0
3985: marginwidth=6
3986: marginheight=2
3987: scrolling=no>');
3988: htp.p('
3992: marginheight=0
3993: scrolling=no>');
3994:
3995: l_plan_name := wfa_html.conv_special_url_chars(l_plan_name);
3996: htp.p('
4000: marginwidth=0
4012: marginwidth=0
4013: marginheight=0
4014: scrolling=yes>');
4015:
4016: htp.p('
4017: name=lowerbanner
4018: marginwidth=0
4019: marginheight=0
4020: scrolling=no>');
4018: marginwidth=0
4019: marginheight=0
4020: scrolling=no>');
4021:
4022: htp.p('
4019: marginheight=0
4020: scrolling=no>');
4021:
4022: htp.p('');
4023: htp.p('
4024: name=borderRight
4025: marginwidth=0
4026: marginheight=0
4027: scrolling=no>');
4024: name=borderRight
4025: marginwidth=0
4026: marginheight=0
4027: scrolling=no>');
4028: htp.p('');
4029: htp.p('
4030: name=bottomregion
4031: marginwidth=0
4032: marginheight=0
4025: marginwidth=0
4026: marginheight=0
4027: scrolling=no>');
4028: htp.p('');
4029: htp.p('
4030: name=bottomregion
4031: marginwidth=0
4032: marginheight=0
4033: scrolling=no>');
4030: name=bottomregion
4031: marginwidth=0
4032: marginheight=0
4033: scrolling=no>');
4034: htp.p('');
4035: htp.p('');
4036:
4037:
4038:
4031: marginwidth=0
4032: marginheight=0
4033: scrolling=no>');
4034: htp.p('');
4035: htp.p('');
4036:
4037:
4038:
4039: end if; -- end icx validate session
4042: WHEN OTHERS THEN
4043: IF plan_name_cur%ISOPEN THEN
4044: CLOSE plan_name_cur;
4045: END IF;
4046: htp.p('Exception in QA_SS_CORE.VQR_Frames');
4047: htp.p(''||SQLERRM||'');
4048: END Vqr_Frames;
4049: -----------------------------------------------------------------------------------------------------
4050: procedure draw_html_button(src IN VARCHAR2 DEFAULT NULL,
4043: IF plan_name_cur%ISOPEN THEN
4044: CLOSE plan_name_cur;
4045: END IF;
4046: htp.p('Exception in QA_SS_CORE.VQR_Frames');
4047: htp.p(''||SQLERRM||'');
4048: END Vqr_Frames;
4049: -----------------------------------------------------------------------------------------------------
4050: procedure draw_html_button(src IN VARCHAR2 DEFAULT NULL,
4051: txt IN VARCHAR2 DEFAULT NULL)
4055: -- written by david chan (dfkchan) of PO team
4056: IS
4057:
4058: BEGIN
4059: htp.p('
4060: