1: PACKAGE BODY PSB_PAY_ELEMENTS_PVT AS
2: /* $Header: PSBVELMB.pls 120.2 2005/03/12 13:06:06 matthoma ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30):= 'PSB_PAY_ELEMENTS_PVT';
5: g_dbug VARCHAR2(2000);
1: PACKAGE BODY PSB_PAY_ELEMENTS_PVT AS
2: /* $Header: PSBVELMB.pls 120.2 2005/03/12 13:06:06 matthoma ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30):= 'PSB_PAY_ELEMENTS_PVT';
5: g_dbug VARCHAR2(2000);
6: g_entity_set_id NUMBER;
7: -- The flag determines whether to print debug information or not.
8: g_debug_flag VARCHAR2(1) := 'N' ;
1242: SELECT psb_pay_elements_s.NEXTVAL
1243: INTO l_pay_element_id
1244: FROM DUAL;
1245:
1246: PSB_PAY_ELEMENTS_PVT.INSERT_ROW
1247: ( p_api_version => 1.0,
1248: p_init_msg_list => null,
1249: p_commit => null,
1250: p_validation_level => null,
1713: END IF;
1714:
1715: END debug ;
1716:
1717: END PSB_PAY_ELEMENTS_PVT;