DBA Data[Home] [Help]

APPS.BEN_EXTRACT_SEED dependencies on BEN_EXTRACT_SEED

Line 1: PACKAGE BODY ben_extract_seed AS

1: PACKAGE BODY ben_extract_seed AS
2: /* $Header: benextse.pkb 120.26 2011/12/12 08:36:21 pvelvano ship $ */
3:
4: g_Ext_adv_crit_cmbn tbl_Ext_adv_crit_cmbn ;
5:

Line 4028: l_value2 := ben_extract_seed.get_lookup_code (l_code,p_lookup_code2 ,'VAL_2',null) ;

4024: l_meaning2 := p_val2;
4025:
4026: -- if the code is comming as param , make sure the lookup exisit
4027: if p_lookup_code2 is not null then
4028: l_value2 := ben_extract_seed.get_lookup_code (l_code,p_lookup_code2 ,'VAL_2',null) ;
4029: end if ;
4030:
4031: --- if the code is null or the code is not null and not exist get the code from name
4032: if l_value2 is null or p_lookup_code2 is null then

Line 4033: l_value2 := ben_extract_seed.decode_value(l_code,l_meaning2,'VAL_2',null) ;

4029: end if ;
4030:
4031: --- if the code is null or the code is not null and not exist get the code from name
4032: if l_value2 is null or p_lookup_code2 is null then
4033: l_value2 := ben_extract_seed.decode_value(l_code,l_meaning2,'VAL_2',null) ;
4034: end if ;
4035:
4036: l_meaning := p_val;
4037:

Line 4039: l_value := ben_extract_seed.get_lookup_code (l_code,p_lookup_code1 ,'VAL_1',null) ;

4035:
4036: l_meaning := p_val;
4037:
4038: if p_lookup_code1 is not null then
4039: l_value := ben_extract_seed.get_lookup_code (l_code,p_lookup_code1 ,'VAL_1',null) ;
4040: end if ;
4041:
4042:
4043:

Line 4045: l_value := ben_extract_seed.decode_value(l_code,l_meaning,'VAL_1',l_meaning2) ;

4041:
4042:
4043:
4044: if l_value is null or p_lookup_code1 is null then
4045: l_value := ben_extract_seed.decode_value(l_code,l_meaning,'VAL_1',l_meaning2) ;
4046: end if ;
4047:
4048: --- since we are changing the meaning of TDRASG in passor make sure the lookup code
4049: --- ised even if the name is null

Line 4248: l_val_2 := ben_extract_seed.get_lookup_code (l_code,p_lookup_code2 ,'VAL_2',null) ;

4244:
4245:
4246: -- if the code is comming as param , make sure the lookup exisit
4247: if p_lookup_code2 is not null then
4248: l_val_2 := ben_extract_seed.get_lookup_code (l_code,p_lookup_code2 ,'VAL_2',null) ;
4249: end if ;
4250:
4251: if l_val_2 is null or p_lookup_code2 is null then
4252: l_val_2 := ben_extract_seed.decode_value(l_code,l_meaning2,'VAL_2',null) ;

Line 4252: l_val_2 := ben_extract_seed.decode_value(l_code,l_meaning2,'VAL_2',null) ;

4248: l_val_2 := ben_extract_seed.get_lookup_code (l_code,p_lookup_code2 ,'VAL_2',null) ;
4249: end if ;
4250:
4251: if l_val_2 is null or p_lookup_code2 is null then
4252: l_val_2 := ben_extract_seed.decode_value(l_code,l_meaning2,'VAL_2',null) ;
4253: end if ;
4254:
4255:
4256:

Line 4260: l_val_1 := ben_extract_seed.get_lookup_code (l_code,p_lookup_code1 ,'VAL_1',null) ;

4256:
4257: l_meaning := p_val;
4258:
4259: if p_lookup_code1 is not null then
4260: l_val_1 := ben_extract_seed.get_lookup_code (l_code,p_lookup_code1 ,'VAL_1',null) ;
4261: end if ;
4262:
4263: if l_val_1 is null or p_lookup_code1 is null then
4264: l_val_1 := ben_extract_seed.decode_value(l_code,l_meaning,'VAL_1',l_meaning2) ;

Line 4264: l_val_1 := ben_extract_seed.decode_value(l_code,l_meaning,'VAL_1',l_meaning2) ;

4260: l_val_1 := ben_extract_seed.get_lookup_code (l_code,p_lookup_code1 ,'VAL_1',null) ;
4261: end if ;
4262:
4263: if l_val_1 is null or p_lookup_code1 is null then
4264: l_val_1 := ben_extract_seed.decode_value(l_code,l_meaning,'VAL_1',l_meaning2) ;
4265: end if ;
4266:
4267: if l_val_1 is NULL THEN
4268: -- if the concurrent manger does the job log the message

Line 4777: END ben_extract_seed;

4773:
4774: Return l_return ;
4775: end ;
4776:
4777: END ben_extract_seed;