[Home] [Help]
1579:
1580: l_index2 := dbms_utility.get_hash_value(p_tx_evnt_cls_code ||l_tax_event_type_code,
1581: 1,8192);
1582:
1583: IF ZX_GLOBAL_STRUCTURES_PKG.g_zx_evnt_cls_typs_tbl.exists(l_index2) THEN
1584:
1585: x_doc_status := ZX_GLOBAL_STRUCTURES_PKG.g_zx_evnt_cls_typs_tbl(l_index2);
1586:
1587: ELSE
1581: 1,8192);
1582:
1583: IF ZX_GLOBAL_STRUCTURES_PKG.g_zx_evnt_cls_typs_tbl.exists(l_index2) THEN
1584:
1585: x_doc_status := ZX_GLOBAL_STRUCTURES_PKG.g_zx_evnt_cls_typs_tbl(l_index2);
1586:
1587: ELSE
1588: populate_event_cls_typs;
1589:
1586:
1587: ELSE
1588: populate_event_cls_typs;
1589:
1590: IF ZX_GLOBAL_STRUCTURES_PKG.g_zx_evnt_cls_typs_tbl.exists(l_index2) THEN
1591: x_doc_status := ZX_GLOBAL_STRUCTURES_PKG.g_zx_evnt_cls_typs_tbl(l_index2);
1592: ELSE
1593: IF ( G_LEVEL_EXCEPTION >= G_CURRENT_RUNTIME_LEVEL) THEN
1594: FND_LOG.STRING(G_LEVEL_EXCEPTION,G_MODULE_NAME||l_api_name,
1587: ELSE
1588: populate_event_cls_typs;
1589:
1590: IF ZX_GLOBAL_STRUCTURES_PKG.g_zx_evnt_cls_typs_tbl.exists(l_index2) THEN
1591: x_doc_status := ZX_GLOBAL_STRUCTURES_PKG.g_zx_evnt_cls_typs_tbl(l_index2);
1592: ELSE
1593: IF ( G_LEVEL_EXCEPTION >= G_CURRENT_RUNTIME_LEVEL) THEN
1594: FND_LOG.STRING(G_LEVEL_EXCEPTION,G_MODULE_NAME||l_api_name,
1595: ' Unable to derive doc_event_status. Please Check!');
4637: cursor c_get_evnt_cls_typs is
4638: select TAX_EVENT_CLASS_CODE,
4639: TAX_EVENT_TYPE_CODE,
4640: STATUS_CODE
4641: from zx_evnt_cls_typs;
4642: l_index binary_integer;
4643:
4644: BEGIN
4645:
4648: l_index := dbms_utility.get_hash_value(l_evnt_cls_typs_rec.TAX_EVENT_CLASS_CODE ||
4649: l_evnt_cls_typs_rec.TAX_EVENT_TYPE_CODE,
4650: 1,8192);
4651:
4652: ZX_GLOBAL_STRUCTURES_PKG.g_zx_evnt_cls_typs_tbl(l_index) := l_evnt_cls_typs_rec.STATUS_CODE;
4653:
4654: END LOOP;
4655:
4656: EXCEPTION