[Home] [Help]
95: l_tests_rec GMD_QC_TESTS%ROWTYPE;
96: l_samples_rec GMD_SAMPLES%ROWTYPE;
97: l_spec_results_row_in GMD_SPEC_RESULTS%ROWTYPE;
98: l_spec_results_row GMD_SPEC_RESULTS%ROWTYPE;
99: l_spec_tests_in GMD_SPEC_TESTS%ROWTYPE;
100: l_spec_tests GMD_SPEC_TESTS%ROWTYPE;
101: l_results_row_in GMD_RESULTS%ROWTYPE;
102: l_results_row GMD_RESULTS%ROWTYPE;
103: l_user_id NUMBER(15);
96: l_samples_rec GMD_SAMPLES%ROWTYPE;
97: l_spec_results_row_in GMD_SPEC_RESULTS%ROWTYPE;
98: l_spec_results_row GMD_SPEC_RESULTS%ROWTYPE;
99: l_spec_tests_in GMD_SPEC_TESTS%ROWTYPE;
100: l_spec_tests GMD_SPEC_TESTS%ROWTYPE;
101: l_results_row_in GMD_RESULTS%ROWTYPE;
102: l_results_row GMD_RESULTS%ROWTYPE;
103: l_user_id NUMBER(15);
104: l_assign_type NUMBER;
145: -- 14635099 start
146: -- new cursor
147: CURSOR c_spec_test (p_spec_id NUMBER, p_test_id NUMBER) IS
148: SELECT out_of_spec_action
149: FROM gmd_spec_tests_b
150: WHERE spec_id = p_spec_id
151: AND test_id = p_test_id;
152: -- 14635099 new cursor
153: CURSOR get_config IS
462:
463: l_spec_tests_in.test_id := l_tests_rec.test_id;
464: l_spec_tests_in.spec_id := l_spec_id;
465:
466: IF NOT GMD_SPEC_TESTS_PVT.fetch_row
467: ( p_spec_tests => l_spec_tests_in,
468: x_spec_tests => l_spec_tests
469: ) THEN
470: -- Assume that this is an additional test