DBA Data[Home] [Help]

APPS.GMD_SPEC_VRS_PUB dependencies on GMD_CUSTOMER_SPEC_VRS

Line 408: | into gmd_customer_spec_vrs |

404: | |
405: | DESCRIPTION |
406: | Accepts a table of customer_spec_vrs definitions. Validates |
407: | each table entry and where valid, inserts a corresponding row |
408: | into gmd_customer_spec_vrs |
409: | In the case of any failure a rollback is instigated. |
410: | |
411: | HISTORY |
412: | 03-AUG-2002 K.Y.Hunt |

Line 438: l_customer_spec_vrs GMD_CUSTOMER_SPEC_VRS%ROWTYPE;

434: l_api_version CONSTANT NUMBER := 1.0;
435: l_msg_count NUMBER :=0;
436: l_msg_data VARCHAR2(2000);
437: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
438: l_customer_spec_vrs GMD_CUSTOMER_SPEC_VRS%ROWTYPE;
439: l_customer_spec_vrs_out GMD_CUSTOMER_SPEC_VRS%ROWTYPE;
440: l_customer_spec_vrs_tbl GMD_SPEC_VRS_PUB.customer_spec_vrs_tbl;
441: l_user_id NUMBER(15);
442:

Line 439: l_customer_spec_vrs_out GMD_CUSTOMER_SPEC_VRS%ROWTYPE;

435: l_msg_count NUMBER :=0;
436: l_msg_data VARCHAR2(2000);
437: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
438: l_customer_spec_vrs GMD_CUSTOMER_SPEC_VRS%ROWTYPE;
439: l_customer_spec_vrs_out GMD_CUSTOMER_SPEC_VRS%ROWTYPE;
440: l_customer_spec_vrs_tbl GMD_SPEC_VRS_PUB.customer_spec_vrs_tbl;
441: l_user_id NUMBER(15);
442:
443: BEGIN

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

513: -- Diagnostic message is already on the stack
514: RAISE FND_API.G_EXC_ERROR;
515: END IF;
516:
517: IF NOT GMD_CUSTOMER_SPEC_VRS_PVT.Insert_Row(l_customer_spec_vrs, l_customer_spec_vrs_out)
518: THEN
519: -- Diagnostic message is already on the stack
520: RAISE FND_API.G_EXC_ERROR;
521: END IF;

Line 1402: l_customer_spec_vrs GMD_CUSTOMER_SPEC_VRS%ROWTYPE;

1398: l_msg_count NUMBER :=0;
1399: l_msg_data VARCHAR2(2000);
1400: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
1401: l_spec GMD_SPECIFICATIONS%ROWTYPE;
1402: l_customer_spec_vrs GMD_CUSTOMER_SPEC_VRS%ROWTYPE;
1403: l_deleted_rows NUMBER :=0;
1404:
1405: BEGIN
1406:

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

1500:
1501:
1502: -- Lock the validity rule ahead of deleting
1503: -- ========================================
1504: IF NOT GMD_CUSTOMER_SPEC_VRS_PVT.Lock_Row( l_customer_spec_vrs.spec_vr_id)
1505: THEN
1506: -- Report Failure to obtain locks
1507: -- ==============================
1508: GMD_API_PUB.Log_Message('GMD_LOCKING_FAILURE',

Line 1509: 'l_table_name', 'GMD_CUSTOMER_SPEC_VRS',

1505: THEN
1506: -- Report Failure to obtain locks
1507: -- ==============================
1508: GMD_API_PUB.Log_Message('GMD_LOCKING_FAILURE',
1509: 'l_table_name', 'GMD_CUSTOMER_SPEC_VRS',
1510: 'l_column_name', 'SPEC_VR_ID',
1511: 'l_key_value', l_customer_spec_vrs.spec_vr_id);
1512: RAISE FND_API.G_EXC_ERROR;
1513: END IF;

Line 1515: IF NOT GMD_CUSTOMER_SPEC_VRS_PVT.Delete_Row

1511: 'l_key_value', l_customer_spec_vrs.spec_vr_id);
1512: RAISE FND_API.G_EXC_ERROR;
1513: END IF;
1514:
1515: IF NOT GMD_CUSTOMER_SPEC_VRS_PVT.Delete_Row
1516: ( p_spec_vr_id => l_customer_spec_vrs.spec_vr_id
1517: , p_last_update_date => sysdate
1518: , p_last_updated_by => l_spec.last_updated_by
1519: )

Line 1522: 'l_table_name', 'GMD_CUSTOMER_SPEC_VRS',

1518: , p_last_updated_by => l_spec.last_updated_by
1519: )
1520: THEN
1521: GMD_API_PUB.Log_Message('GMD_FAILED_TO_DELETE_ROW',
1522: 'l_table_name', 'GMD_CUSTOMER_SPEC_VRS',
1523: 'l_column_name', 'SPEC_VR_ID',
1524: 'l_key_value', l_customer_spec_vrs.spec_vr_id);
1525: RAISE FND_API.G_EXC_ERROR;
1526: ELSE