[Home] [Help]
PACKAGE BODY: APPS.OTA_PI_MAIN
Source
1 PACKAGE BODY OTA_PI_MAIN AS
2 /* $Header: otpimain.pkb 120.2 2005/10/31 05:40:08 hwinsor noship $ */
3
4 PROCEDURE def_bg_data (errbuf out NOCOPY varchar2
5 ,retcode out NOCOPY number
6 ,p_business_group_id IN NUMBER DEFAULT NULL) IS
7 begin
8 --
9 ota_fr_2483_data.load_bg_measurement_types(p_business_group_id);
10 --
11 errbuf := '';
12 retcode := 0;
13 exception
14 when others then
15 retcode := sqlcode;
16 errbuf := sqlerrm;
17 end def_bg_data;
18 --
19 end OTA_PI_MAIN;