1: package body GMD_SPEC_TESTS_PVT as
2: /* $Header: GMDVSPTB.pls 120.0 2005/05/25 19:16:49 appldev noship $ */
3: procedure INSERT_ROW (
4: X_ROWID in out NOCOPY VARCHAR2,
5: X_SPEC_ID in NUMBER,
850: gmd_api_pub.log_message('GMD_NO_DATA_FOUND','TABLE_NAME', 'GMD_SPEC_TESTS');
851: RETURN FALSE;
852: WHEN OTHERS
853: THEN
854: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_SPEC_TESTS_PVT.DELETE_ROW','ERROR',SUBSTR(SQLERRM,1,100),'POSITION','010');
855: RETURN FALSE;
856: end DELETE_ROW;
857:
858:
949: gmd_api_pub.log_message('GMD_NO_DATA_FOUND','TABLE_NAME', 'GMD_SPEC_TESTS');
950: RETURN FALSE;
951: WHEN OTHERS
952: THEN
953: fnd_msg_pub.add_exc_msg ('GMD_SPEC_TESTS_PVT', 'FETCH_ROW');
954: RETURN FALSE;
955:
956: END fetch_row;
957:
984: gmd_api_pub.log_message('GMD_NO_DATA_FOUND','TABLE_NAME', 'GMD_SPEC_TESTS');
985: RETURN FALSE;
986: WHEN OTHERS
987: THEN
988: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_SPEC_TESTS_PVT.LOCK_ROW','ERROR',SUBSTR(SQLERRM,1,100),'POSITION','010');
989: RETURN FALSE;
990: END lock_row;
991:
992: FUNCTION INSERT_ROW(p_spec_tests IN OUT NOCOPY GMD_SPEC_TESTS%ROWTYPE)
993: RETURN BOOLEAN IS
994: l_rowid ROWID ;
995: BEGIN
996:
997: GMD_SPEC_TESTS_PVT.INSERT_ROW(
998: X_ROWID => l_rowid,
999: X_SPEC_ID => p_spec_tests.spec_id,
1000: X_TEST_ID => p_spec_tests.test_id,
1001: X_TEST_METHOD_ID => p_spec_tests.test_method_id,
1086: SUBSTR(SQLERRM,1,100),'POSITION','010');
1087: RETURN FALSE;
1088:
1089: END INSERT_ROW;
1090: end GMD_SPEC_TESTS_PVT;