DBA Data[Home] [Help]

APPS.GMD_SPEC_VRS_PUB dependencies on GMD_CUSTOMER_SPEC_VRS

Line 414: | into gmd_customer_spec_vrs |

410: | |
411: | DESCRIPTION |
412: | Accepts a table of customer_spec_vrs definitions. Validates |
413: | each table entry and where valid, inserts a corresponding row |
414: | into gmd_customer_spec_vrs |
415: | In the case of any failure a rollback is instigated. |
416: | |
417: | HISTORY |
418: | 03-AUG-2002 K.Y.Hunt |

Line 444: l_customer_spec_vrs GMD_CUSTOMER_SPEC_VRS%ROWTYPE;

440: l_api_version CONSTANT NUMBER := 1.0;
441: l_msg_count NUMBER :=0;
442: l_msg_data VARCHAR2(2000);
443: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
444: l_customer_spec_vrs GMD_CUSTOMER_SPEC_VRS%ROWTYPE;
445: l_customer_spec_vrs_out GMD_CUSTOMER_SPEC_VRS%ROWTYPE;
446: l_customer_spec_vrs_tbl GMD_SPEC_VRS_PUB.customer_spec_vrs_tbl;
447: l_user_id NUMBER(15);
448:

Line 445: l_customer_spec_vrs_out GMD_CUSTOMER_SPEC_VRS%ROWTYPE;

441: l_msg_count NUMBER :=0;
442: l_msg_data VARCHAR2(2000);
443: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
444: l_customer_spec_vrs GMD_CUSTOMER_SPEC_VRS%ROWTYPE;
445: l_customer_spec_vrs_out GMD_CUSTOMER_SPEC_VRS%ROWTYPE;
446: l_customer_spec_vrs_tbl GMD_SPEC_VRS_PUB.customer_spec_vrs_tbl;
447: l_user_id NUMBER(15);
448:
449: BEGIN

Line 525: IF NOT GMD_CUSTOMER_SPEC_VRS_PVT.Insert_Row(l_customer_spec_vrs, l_customer_spec_vrs_out)

521: -- Diagnostic message is already on the stack
522: RAISE FND_API.G_EXC_ERROR;
523: END IF;
524:
525: IF NOT GMD_CUSTOMER_SPEC_VRS_PVT.Insert_Row(l_customer_spec_vrs, l_customer_spec_vrs_out)
526: THEN
527: -- Diagnostic message is already on the stack
528: RAISE FND_API.G_EXC_ERROR;
529: END IF;

Line 1414: l_customer_spec_vrs GMD_CUSTOMER_SPEC_VRS%ROWTYPE;

1410: l_msg_count NUMBER :=0;
1411: l_msg_data VARCHAR2(2000);
1412: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
1413: l_spec GMD_SPECIFICATIONS%ROWTYPE;
1414: l_customer_spec_vrs GMD_CUSTOMER_SPEC_VRS%ROWTYPE;
1415: l_deleted_rows NUMBER :=0;
1416:
1417: BEGIN
1418:

Line 1516: IF NOT GMD_CUSTOMER_SPEC_VRS_PVT.Lock_Row( l_customer_spec_vrs.spec_vr_id)

1512:
1513:
1514: -- Lock the validity rule ahead of deleting
1515: -- ========================================
1516: IF NOT GMD_CUSTOMER_SPEC_VRS_PVT.Lock_Row( l_customer_spec_vrs.spec_vr_id)
1517: THEN
1518: -- Report Failure to obtain locks
1519: -- ==============================
1520: GMD_API_PUB.Log_Message('GMD_LOCKING_FAILURE',

Line 1521: 'l_table_name', 'GMD_CUSTOMER_SPEC_VRS',

1517: THEN
1518: -- Report Failure to obtain locks
1519: -- ==============================
1520: GMD_API_PUB.Log_Message('GMD_LOCKING_FAILURE',
1521: 'l_table_name', 'GMD_CUSTOMER_SPEC_VRS',
1522: 'l_column_name', 'SPEC_VR_ID',
1523: 'l_key_value', l_customer_spec_vrs.spec_vr_id);
1524: RAISE FND_API.G_EXC_ERROR;
1525: END IF;

Line 1527: IF NOT GMD_CUSTOMER_SPEC_VRS_PVT.Delete_Row

1523: 'l_key_value', l_customer_spec_vrs.spec_vr_id);
1524: RAISE FND_API.G_EXC_ERROR;
1525: END IF;
1526:
1527: IF NOT GMD_CUSTOMER_SPEC_VRS_PVT.Delete_Row
1528: ( p_spec_vr_id => l_customer_spec_vrs.spec_vr_id
1529: , p_last_update_date => sysdate
1530: , p_last_updated_by => l_spec.last_updated_by
1531: )

Line 1534: 'l_table_name', 'GMD_CUSTOMER_SPEC_VRS',

1530: , p_last_updated_by => l_spec.last_updated_by
1531: )
1532: THEN
1533: GMD_API_PUB.Log_Message('GMD_FAILED_TO_DELETE_ROW',
1534: 'l_table_name', 'GMD_CUSTOMER_SPEC_VRS',
1535: 'l_column_name', 'SPEC_VR_ID',
1536: 'l_key_value', l_customer_spec_vrs.spec_vr_id);
1537: RAISE FND_API.G_EXC_ERROR;
1538: ELSE