DBA Data[Home] [Help]

APPS.GMD_QC_TEST_VALUES_PVT dependencies on GMD_QC_TEST_VALUES

Line 1: package body GMD_QC_TEST_VALUES_PVT as

1: package body GMD_QC_TEST_VALUES_PVT as
2: /* $Header: GMDVTVLB.pls 115.4 2002/12/03 17:13:24 cnagarba noship $ */
3: procedure INSERT_ROW (
4: X_ROWID in out nocopy ROWID,
5: X_TEST_VALUE_ID in out nocopy NUMBER,

Line 52: cursor C is select ROWID from GMD_QC_TEST_VALUES_B

48: X_LAST_UPDATE_DATE in DATE ,
49: X_LAST_UPDATED_BY in NUMBER ,
50: X_LAST_UPDATE_LOGIN in NUMBER
51: ) is
52: cursor C is select ROWID from GMD_QC_TEST_VALUES_B
53: where TEST_VALUE_ID = X_TEST_VALUE_ID
54: ;
55: begin
56:

Line 61: insert into GMD_QC_TEST_VALUES_B (

57: IF X_TEST_VALUE_ID IS NULL THEN
58: SELECT GMD_QC_TEST_VALUE_ID_S.NEXTVAL INTO X_TEST_VALUE_ID FROM DUAL;
59: END IF;
60:
61: insert into GMD_QC_TEST_VALUES_B (
62: TEST_VALUE_ID,
63: TEST_ID,
64: MIN_NUM,
65: MAX_NUM,

Line 153: insert into GMD_QC_TEST_VALUES_TL (

149: NVL(X_LAST_UPDATED_BY,FND_GLOBAL.USER_ID),
150: NVL(X_LAST_UPDATE_LOGIN,FND_GLOBAL.LOGIN_ID)
151: );
152:
153: insert into GMD_QC_TEST_VALUES_TL (
154: TEST_VALUE_ID,
155: DISPLAY_LABEL_NUMERIC_RANGE,
156: TEST_VALUE_DESC,
157: CREATION_DATE,

Line 179: from GMD_QC_TEST_VALUES_TL T

175: from FND_LANGUAGES L
176: where L.INSTALLED_FLAG in ('I', 'B')
177: and not exists
178: (select NULL
179: from GMD_QC_TEST_VALUES_TL T
180: where T.TEST_VALUE_ID = X_TEST_VALUE_ID
181: and T.LANGUAGE = L.LANGUAGE_CODE);
182:
183: open c;

Line 193: FUNCTION INSERT_ROW(p_qc_test_values_rec IN OUT NOCOPY GMD_QC_TEST_VALUES%ROWTYPE) RETURN BOOLEAN IS

189: close c;
190:
191: end INSERT_ROW;
192:
193: FUNCTION INSERT_ROW(p_qc_test_values_rec IN OUT NOCOPY GMD_QC_TEST_VALUES%ROWTYPE) RETURN BOOLEAN IS
194: l_rowid ROWID;
195: BEGIN
196: GMD_QC_TEST_VALUES_PVT.INSERT_ROW(
197: X_ROWID => l_rowid,

Line 196: GMD_QC_TEST_VALUES_PVT.INSERT_ROW(

192:
193: FUNCTION INSERT_ROW(p_qc_test_values_rec IN OUT NOCOPY GMD_QC_TEST_VALUES%ROWTYPE) RETURN BOOLEAN IS
194: l_rowid ROWID;
195: BEGIN
196: GMD_QC_TEST_VALUES_PVT.INSERT_ROW(
197: X_ROWID => l_rowid,
198: X_TEST_VALUE_ID => p_qc_test_values_rec.TEST_VALUE_ID,
199: X_TEST_ID => p_qc_test_values_rec.TEST_ID,
200: X_MIN_NUM => p_qc_test_values_rec.MIN_NUM,

Line 248: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_QC_TEST_VALUES_PVT.INSERT_ROW','ERROR',SUBSTR(SQLERRM,1,100),'POSITION','010');

244:
245: RETURN TRUE;
246:
247: EXCEPTION WHEN OTHERS THEN
248: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_QC_TEST_VALUES_PVT.INSERT_ROW','ERROR',SUBSTR(SQLERRM,1,100),'POSITION','010');
249: RETURN FALSE;
250: end INSERT_ROW;
251:
252:

Line 335: from GMD_QC_TEST_VALUES_B

331: ATTRIBUTE27,
332: ATTRIBUTE28,
333: ATTRIBUTE29,
334: ATTRIBUTE30
335: from GMD_QC_TEST_VALUES_B
336: where TEST_VALUE_ID = X_TEST_VALUE_ID
337: for update of TEST_VALUE_ID nowait;
338: recinfo c%rowtype;
339:

Line 344: from GMD_QC_TEST_VALUES_TL

340: cursor c1 is select
341: DISPLAY_LABEL_NUMERIC_RANGE,
342: TEST_VALUE_DESC,
343: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
344: from GMD_QC_TEST_VALUES_TL
345: where TEST_VALUE_ID = X_TEST_VALUE_ID
346: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
347: for update of TEST_VALUE_ID nowait;
348: begin

Line 504: update GMD_QC_TEST_VALUES_B set

500: X_LAST_UPDATED_BY in NUMBER,
501: X_LAST_UPDATE_LOGIN in NUMBER
502: ) is
503: begin
504: update GMD_QC_TEST_VALUES_B set
505: TEST_ID = X_TEST_ID,
506: MIN_NUM = X_MIN_NUM,
507: MAX_NUM = X_MAX_NUM,
508: VALUE_CHAR = X_VALUE_CHAR,

Line 552: update GMD_QC_TEST_VALUES_TL set

548: if (sql%notfound) then
549: raise no_data_found;
550: end if;
551:
552: update GMD_QC_TEST_VALUES_TL set
553: DISPLAY_LABEL_NUMERIC_RANGE = X_DISPLAY_LABEL_NUMERIC_RANGE,
554: TEST_VALUE_DESC = X_TEST_VALUE_DESC,
555: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
556: LAST_UPDATED_BY = X_LAST_UPDATED_BY,

Line 570: DELETE from GMD_QC_TEST_VALUES_TL

566:
567: FUNCTION DELETE_ROW (p_test_value_id in NUMBER) RETURN BOOLEAN IS
568: begin
569: IF p_test_value_id IS NOT NULL THEN
570: DELETE from GMD_QC_TEST_VALUES_TL
571: where TEST_VALUE_ID = p_test_value_id ;
572:
573: if (sql%notfound) then
574: raise no_data_found;

Line 577: delete from GMD_QC_TEST_VALUES_B

573: if (sql%notfound) then
574: raise no_data_found;
575: end if;
576:
577: delete from GMD_QC_TEST_VALUES_B
578: where TEST_VALUE_ID = p_test_value_id;
579:
580: if (sql%notfound) then
581: raise no_data_found;

Line 584: gmd_api_pub.log_message('GMD_NO_KEYS','TABLE_NAME', 'GMD_QC_TEST_VALUES');

580: if (sql%notfound) then
581: raise no_data_found;
582: end if;
583: ELSE
584: gmd_api_pub.log_message('GMD_NO_KEYS','TABLE_NAME', 'GMD_QC_TEST_VALUES');
585: RETURN FALSE;
586: END IF;
587:
588: RETURN TRUE;

Line 593: gmd_api_pub.log_message('GMD_NO_DATA_FOUND','TABLE_NAME', 'GMD_QC_TEST_VALUES');

589:
590: EXCEPTION
591: WHEN NO_DATA_FOUND
592: THEN
593: gmd_api_pub.log_message('GMD_NO_DATA_FOUND','TABLE_NAME', 'GMD_QC_TEST_VALUES');
594: RETURN FALSE;
595: WHEN OTHERS
596: THEN
597: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_QC_TEST_VALUES_PVT.DELETE_ROW','ERROR',SUBSTR(SQLERRM,1,100),'POSITION','010');

Line 597: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_QC_TEST_VALUES_PVT.DELETE_ROW','ERROR',SUBSTR(SQLERRM,1,100),'POSITION','010');

593: gmd_api_pub.log_message('GMD_NO_DATA_FOUND','TABLE_NAME', 'GMD_QC_TEST_VALUES');
594: RETURN FALSE;
595: WHEN OTHERS
596: THEN
597: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_QC_TEST_VALUES_PVT.DELETE_ROW','ERROR',SUBSTR(SQLERRM,1,100),'POSITION','010');
598: RETURN FALSE;
599: end DELETE_ROW;
600:
601: procedure ADD_LANGUAGE

Line 604: delete from GMD_QC_TEST_VALUES_TL T

600:
601: procedure ADD_LANGUAGE
602: is
603: begin
604: delete from GMD_QC_TEST_VALUES_TL T
605: where not exists
606: (select NULL
607: from GMD_QC_TEST_VALUES_B B
608: where B.TEST_VALUE_ID = T.TEST_VALUE_ID

Line 607: from GMD_QC_TEST_VALUES_B B

603: begin
604: delete from GMD_QC_TEST_VALUES_TL T
605: where not exists
606: (select NULL
607: from GMD_QC_TEST_VALUES_B B
608: where B.TEST_VALUE_ID = T.TEST_VALUE_ID
609: );
610:
611: update GMD_QC_TEST_VALUES_TL T set (

Line 611: update GMD_QC_TEST_VALUES_TL T set (

607: from GMD_QC_TEST_VALUES_B B
608: where B.TEST_VALUE_ID = T.TEST_VALUE_ID
609: );
610:
611: update GMD_QC_TEST_VALUES_TL T set (
612: DISPLAY_LABEL_NUMERIC_RANGE,
613: TEST_VALUE_DESC
614: ) = (select
615: B.DISPLAY_LABEL_NUMERIC_RANGE,

Line 617: from GMD_QC_TEST_VALUES_TL B

613: TEST_VALUE_DESC
614: ) = (select
615: B.DISPLAY_LABEL_NUMERIC_RANGE,
616: B.TEST_VALUE_DESC
617: from GMD_QC_TEST_VALUES_TL B
618: where B.TEST_VALUE_ID = T.TEST_VALUE_ID
619: and B.LANGUAGE = T.SOURCE_LANG)
620: where (
621: T.TEST_VALUE_ID,

Line 626: from GMD_QC_TEST_VALUES_TL SUBB, GMD_QC_TEST_VALUES_TL SUBT

622: T.LANGUAGE
623: ) in (select
624: SUBT.TEST_VALUE_ID,
625: SUBT.LANGUAGE
626: from GMD_QC_TEST_VALUES_TL SUBB, GMD_QC_TEST_VALUES_TL SUBT
627: where SUBB.TEST_VALUE_ID = SUBT.TEST_VALUE_ID
628: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
629: and (SUBB.DISPLAY_LABEL_NUMERIC_RANGE <> SUBT.DISPLAY_LABEL_NUMERIC_RANGE
630: or (SUBB.DISPLAY_LABEL_NUMERIC_RANGE is null and SUBT.DISPLAY_LABEL_NUMERIC_RANGE is not null)

Line 637: insert into GMD_QC_TEST_VALUES_TL (

633: or (SUBB.TEST_VALUE_DESC is null and SUBT.TEST_VALUE_DESC is not null)
634: or (SUBB.TEST_VALUE_DESC is not null and SUBT.TEST_VALUE_DESC is null)
635: ));
636:
637: insert into GMD_QC_TEST_VALUES_TL (
638: TEST_VALUE_ID,
639: DISPLAY_LABEL_NUMERIC_RANGE,
640: TEST_VALUE_DESC,
641: CREATION_DATE,

Line 659: from GMD_QC_TEST_VALUES_TL B, FND_LANGUAGES L

655: B.LAST_UPDATE_DATE,
656: B.LAST_UPDATE_LOGIN,
657: L.LANGUAGE_CODE,
658: B.SOURCE_LANG
659: from GMD_QC_TEST_VALUES_TL B, FND_LANGUAGES L
660: where L.INSTALLED_FLAG in ('I', 'B')
661: and B.LANGUAGE = userenv('LANG')
662: and not exists
663: (select NULL

Line 664: from GMD_QC_TEST_VALUES_TL T

660: where L.INSTALLED_FLAG in ('I', 'B')
661: and B.LANGUAGE = userenv('LANG')
662: and not exists
663: (select NULL
664: from GMD_QC_TEST_VALUES_TL T
665: where T.TEST_VALUE_ID = B.TEST_VALUE_ID
666: and T.LANGUAGE = L.LANGUAGE_CODE);
667: end ADD_LANGUAGE;
668:

Line 679: FROM gmd_qc_test_values_b

675:
676: IF (p_test_value_id IS NOT NULL) THEN
677: SELECT test_value_id
678: INTO dummy
679: FROM gmd_qc_test_values_b
680: WHERE test_value_id = p_test_value_id
681: FOR UPDATE OF test_value_id NOWAIT ;
682: ELSE
683: gmd_api_pub.log_message('GMD_NO_KEYS','TABLE_NAME', 'GMD_QC_TEST_VALUES');

Line 683: gmd_api_pub.log_message('GMD_NO_KEYS','TABLE_NAME', 'GMD_QC_TEST_VALUES');

679: FROM gmd_qc_test_values_b
680: WHERE test_value_id = p_test_value_id
681: FOR UPDATE OF test_value_id NOWAIT ;
682: ELSE
683: gmd_api_pub.log_message('GMD_NO_KEYS','TABLE_NAME', 'GMD_QC_TEST_VALUES');
684: RETURN FALSE;
685: END IF;
686:
687: RETURN TRUE;

Line 692: gmd_api_pub.log_message('GMD_NO_DATA_FOUND','TABLE_NAME', 'GMD_QC_TEST_VALUES');

688:
689: EXCEPTION
690: WHEN NO_DATA_FOUND
691: THEN
692: gmd_api_pub.log_message('GMD_NO_DATA_FOUND','TABLE_NAME', 'GMD_QC_TEST_VALUES');
693: RETURN FALSE;
694: WHEN OTHERS
695: THEN
696: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_QC_TEST_VALUES_PVT.LOCK_ROW','ERROR',SUBSTR(SQLERRM,1,100),'POSITION','010');

Line 696: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_QC_TEST_VALUES_PVT.LOCK_ROW','ERROR',SUBSTR(SQLERRM,1,100),'POSITION','010');

692: gmd_api_pub.log_message('GMD_NO_DATA_FOUND','TABLE_NAME', 'GMD_QC_TEST_VALUES');
693: RETURN FALSE;
694: WHEN OTHERS
695: THEN
696: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_QC_TEST_VALUES_PVT.LOCK_ROW','ERROR',SUBSTR(SQLERRM,1,100),'POSITION','010');
697: RETURN FALSE;
698: END lock_row;
699:
700:

Line 701: end GMD_QC_TEST_VALUES_PVT;

697: RETURN FALSE;
698: END lock_row;
699:
700:
701: end GMD_QC_TEST_VALUES_PVT;