[Home] [Help]
618: FUNCTION normalized (element_id IN NUMBER)
619: RETURN BOOLEAN IS
620: BEGIN
621: RETURN (NOT keyflex(element_id))
622: AND (qa_chars_api.hardcoded_column(element_id) IS NOT NULL)
623: AND (qa_chars_api.fk_meaning(element_id) IS NOT NULL)
624: AND (qa_chars_api.fk_lookup_type(element_id) <> 2);
625: END normalized;
626:
619: RETURN BOOLEAN IS
620: BEGIN
621: RETURN (NOT keyflex(element_id))
622: AND (qa_chars_api.hardcoded_column(element_id) IS NOT NULL)
623: AND (qa_chars_api.fk_meaning(element_id) IS NOT NULL)
624: AND (qa_chars_api.fk_lookup_type(element_id) <> 2);
625: END normalized;
626:
627:
620: BEGIN
621: RETURN (NOT keyflex(element_id))
622: AND (qa_chars_api.hardcoded_column(element_id) IS NOT NULL)
623: AND (qa_chars_api.fk_meaning(element_id) IS NOT NULL)
624: AND (qa_chars_api.fk_lookup_type(element_id) <> 2);
625: END normalized;
626:
627:
628: FUNCTION derived (element_id IN NUMBER)
638:
639: FUNCTION primitive (element_id IN NUMBER)
640: RETURN BOOLEAN IS
641: BEGIN
642: RETURN (qa_chars_api.hardcoded_column(element_id) IS NOT NULL)
643: AND NOT (normalized(element_id));
644: END primitive;
645:
646:
648: RETURN BOOLEAN IS
649:
650: BEGIN
651:
652: RETURN qa_chars_api.hardcoded_column(element_id) IS NOT NULL;
653:
654: END hardcoded;
655:
656:
658: RETURN NUMBER IS
659:
660: BEGIN
661:
662: RETURN qa_chars_api.datatype(element_id);
663:
664: END get_element_datatype;
665:
666:
682: -- shkalyan Tue Jun 22 2004
683: -- If spec_id is present but, element is not in spec, then,
684: -- element spec should not be used.
685: IF ( NVL(spec_id, 0) <= 0 ) THEN
686: lower_limit := qa_chars_api.lower_reasonable_limit(element_id);
687: upper_limit := qa_chars_api.upper_reasonable_limit(element_id);
688: ELSE
689: lower_limit := NULL;
690: upper_limit := NULL;
683: -- If spec_id is present but, element is not in spec, then,
684: -- element spec should not be used.
685: IF ( NVL(spec_id, 0) <= 0 ) THEN
686: lower_limit := qa_chars_api.lower_reasonable_limit(element_id);
687: upper_limit := qa_chars_api.upper_reasonable_limit(element_id);
688: ELSE
689: lower_limit := NULL;
690: upper_limit := NULL;
691: END IF;
712: -- Cursor to read the UOM defined on element Level
713: --
714: Cursor char_uom is
715: select uom_code
716: from qa_chars
717: where char_id = p_element_id;
718:
719:
720: l_plan_char_uom qa_plan_chars.uom_code%TYPE;
780: FETCH char_uom into l_spec_char_uom;
781: CLOSE char_uom;
782:
783: -- Get the spec limits defined on the elemnt level
784: lower_limit := qa_chars_api.lower_reasonable_limit(p_element_id);
785: upper_limit := qa_chars_api.upper_reasonable_limit(p_element_id);
786:
787: -- Check if the UOM on the plan level is different that that on the
788: -- element level in which case perform the conversion
781: CLOSE char_uom;
782:
783: -- Get the spec limits defined on the elemnt level
784: lower_limit := qa_chars_api.lower_reasonable_limit(p_element_id);
785: upper_limit := qa_chars_api.upper_reasonable_limit(p_element_id);
786:
787: -- Check if the UOM on the plan level is different that that on the
788: -- element level in which case perform the conversion
789: IF l_plan_char_uom <> l_spec_char_uom THEN
877: nvl(QscQs.uom_code, qc.uom_code) SPEC_CHAR_UOM,
878: nvl(qpc.uom_code, qc.uom_code) PLAN_CHAR_UOM,
879: nvl(qpc.decimal_precision, qc.decimal_precision) DECIMAL_PRECISION
880: FROM
881: qa_chars qc,
882: qa_plan_chars qpc,
883: (select
884: qsc.CHAR_ID,
885: qsc.ENABLED_FLAG,
963: RETURN BOOLEAN IS
964:
965: BEGIN
966:
967: RETURN qa_chars_api.sql_validation_string(element_id) IS NOT NULL;
968:
969: END sql_validation_exists;
970:
971:
1002: ELSIF NOT primitive(element_id) THEN
1003: RETURN qa_ss_const.number_datatype;
1004:
1005: ELSE
1006: RETURN qa_chars_api.datatype(element_id);
1007:
1008: END IF;
1009:
1010: END get_actual_datatype;
2529:
2530: FUNCTION get_sql_validation_string (element_id IN NUMBER)
2531: RETURN VARCHAR2 IS
2532: BEGIN
2533: RETURN qa_chars_api.sql_validation_string(element_id);
2534: END get_sql_validation_string;
2535:
2536:
2537: FUNCTION get_result_column_name (plan_id IN NUMBER, element_id IN NUMBER)
2545: name VARCHAR2(30);
2546:
2547: BEGIN
2548:
2549: name := qa_chars_api.hardcoded_column(element_id);
2550:
2551: IF (name IS NULL) THEN
2552: name := qpc_result_column_name(plan_id, element_id);
2553: END IF;
2585:
2586: ELSIF sql_validation_exists(x_char_id) THEN
2587:
2588: sql_string := get_sql_validation_string(x_char_id);
2589: sql_string := qa_chars_api.format_sql_for_lov(sql_string,
2590: org_id, user_id);
2591:
2592: --
2593: -- Bug 1474995. Adding filter to the user-defined SQL.
4820: x_element_name OUT NOCOPY VARCHAR2) IS
4821:
4822: CURSOR c IS
4823: SELECT name
4824: FROM qa_chars
4825: WHERE char_id =
4826: ( SELECT char_id
4827: FROM qa_specs
4828: WHERE spec_id = x_spec_id );
5066: AND lookup_code = p_value;
5067:
5068: l_temp NUMBER;
5069: result BOOLEAN;
5070: sql_string QA_CHARS.SQL_VALIDATION_STRING%TYPE;
5071:
5072: BEGIN
5073: IF p_transaction_number = qa_ss_const.wip_completion_txn THEN
5074: OPEN C4;
5103:
5104: sql_string := get_sql_validation_string(qa_ss_const.transaction_type);
5105:
5106:
5107: sql_string := qa_chars_api.format_sql_for_validation (sql_string,
5108: p_org_id, p_user_id);
5109:
5110: IF value_in_sql (sql_string, p_value) THEN
5111: result := TRUE;
5173: p_child_char_id = qa_ss_const.locator OR
5174: p_child_char_id = qa_ss_const.comp_locator OR
5175: p_child_char_id = qa_ss_const.to_locator OR
5176: p_child_char_id = qa_ss_const.rma_number ) THEN
5177: str := 'Select '|| qa_chars_api.hardcoded_column(p_child_char_id)||
5178: ' from qa_results '||
5179: ' where plan_id = :p_plan_id '||
5180: ' and collection_id = :p_collection_id '||
5181: ' and occurrence = :p_occurrence';
6043: FOR cntr IN 1 .. hardcoded_char_tab.COUNT
6044: LOOP
6045: -- get the column name to select from view
6046: Select upper(translate(name,' ''*{}','_____')) into char_name
6047: from qa_chars
6048: where char_id = hardcoded_char_tab(cntr);
6049:
6050: -- build a list of columns to select from the
6051: -- plan view