The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE INSERT_LEVEL1_SECTION_IN_FORM(p_form_id IN NUMBER,
p_level1_section_id IN NUMBER);
PROCEDURE INSERT_LEVEL2_SECTION_IN_FORM(p_form_id IN NUMBER,
p_level1_section_id IN NUMBER,
p_level2_section_id IN NUMBER);
select form_code , form_version , type
into v_form_code, v_form_version, v_type
from pon_forms_sections where form_id = p_form_id;
select form_code , form_version , type
into v_form_code, v_form_version, v_type
from pon_forms_sections where form_id = p_form_id;
SELECT fnd_flex_value_sets.VALIDATION_TYPE, fnd_flex_value_sets.flex_value_set_name
INTO l_validation_type, l_vset_name
FROM fnd_flex_value_sets, pon_fields
WHERE fnd_flex_value_sets.FLEX_VALUE_SET_NAME = pon_fields.VALUE_SET_NAME
AND pon_fields.FIELD_CODE = P_FIELD_CODE;
l_query_stmt := 'select ' || upper(p_mapping_column) || ' from pon_form_field_values where form_field_value_id = :1' ;
FUNCTON: InsertCompiledRow PRIVATE
PARAMETERS:
COMMENT :
======================================================================*/
Procedure InsertCompiledRow( p_FORM_SECTION_FIELD_ID Number,
p_form_id Number,
p_type Varchar2,
p_field_code Varchar2,
p_INTERNAL_SEQUENCE_NUMBER Number,
p_MAPPING_FIELD_VALUE_COLUMN Varchar2,
p_REQUIRED Varchar2,
p_LEVEL1_SECTION_ID Number,
p_LEVEL2_SECTION_ID Number,
p_REPEATING_SECTION_ID Number,
p_DISPLAY_ON_MAIN_PAGE Varchar2,
p_ENABLED Varchar2,
p_EDITABLE Varchar2) is
l_api_name CONSTANT VARCHAR2(30) := 'InsertCompiledRow';
insert into pon_form_section_compiled
(FORM_SECTION_FIELD_ID,
FORM_ID,
TYPE,
FIELD_CODE,
INTERNAL_SEQUENCE_NUMBER,
MAPPING_FIELD_VALUE_COLUMN,
REQUIRED,
LEVEL1_SECTION_ID,
LEVEL2_SECTION_ID,
REPEATING_SECTION_ID,
DISPLAY_ON_MAIN_PAGE,
ENABLED,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
EDITABLE)
values
( p_FORM_SECTION_FIELD_ID ,
p_form_id ,
p_type,
p_field_code ,
p_INTERNAL_SEQUENCE_NUMBER ,
p_MAPPING_FIELD_VALUE_COLUMN ,
p_REQUIRED ,
p_LEVEL1_SECTION_ID ,
p_LEVEL2_SECTION_ID ,
p_REPEATING_SECTION_ID ,
p_DISPLAY_ON_MAIN_PAGE,
p_ENABLED,
sysdate,
fnd_global.user_id,
sysdate,
fnd_global.user_id,
fnd_global.user_id,
p_EDITABLE
);
end InsertCompiledRow;
select description
into rt_value
from org_freight_tl
where LANGUAGE = userenv('LANG')
and ORGANIZATION_ID = p_inventory_organization_id
and FREIGHT_CODE = p_carrier_code;
l_stmt := 'Selecting ' || p_field_code || ' with auction_header_id = to_number('||p_id||')';
select AWARD_BY_DATE into rt_date from pon_auction_headers_all where auction_header_id = to_number(p_id);
select CLOSE_BIDDING_DATE into rt_date from pon_auction_headers_all where auction_header_id = to_number(p_id);
select OPEN_BIDDING_DATE into rt_date from pon_auction_headers_all where auction_header_id = to_number(p_id);
select VIEW_BY_DATE into rt_date from pon_auction_headers_all where auction_header_id = to_number(p_id);
l_stmt := 'Selecting ' || p_field_code || ' with auction_header_id = to_number('||p_id||')';
select PAYMENT_TERMS_ID into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select ORG_ID into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select AUCTION_HEADER_ID into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
l_stmt := 'Selecting ' || p_field_code || ' with auction_header_id = to_number('||p_id||')';
select ABSTRACT_STATUS into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select AMENDMENT_DESCRIPTION into rt_large_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select AUCTION_TITLE into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select BID_VISIBILITY_CODE into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select CARRIER_CODE into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select CURRENCY_CODE into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select DOCUMENT_NUMBER into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select EVENT_TITLE into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select FOB_CODE into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select FREIGHT_TERMS_CODE into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select DOCUMENT_NUMBER into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select atvl_1.NAME
into rt_value
from
PON_AUCTION_HEADERS_ALL ah,
AP_TERMS_VL atvl_1
where
ah.auction_header_id = to_number(p_id)
and atvl_1.TERM_ID(+) = ah.PAYMENT_TERMS_ID;
select
PON_FORMS_UTIL_PVT.GET_FREIGHT(ah.carrier_code, fsp.inventory_organization_id)
into rt_large_value
from pon_auction_headers_all ah,
financials_system_params_all fsp
where ah.auction_header_id = to_number(p_id)
and fsp.org_id(+) = ah.org_id;
select
decode( nvl(ah.INCLUDE_PDF_IN_EXTERNAL_PAGE, 'N'), 'Y', 'SHOW_PDF', 'HIDE_PDF') DISPLAY_PDF_FLAG
into rt_value
from pon_auction_headers_all ah
where ah.auction_header_id = to_number(p_id);
select doc.internal_name
into rt_value
from
pon_auction_headers_all ah,
PON_AUC_DOCTYPES doc
where
ah.auction_header_id = to_number(p_id)
and ah.DOCTYPE_ID = doc.DOCTYPE_ID;
select doctl.NAME
into rt_value
from pon_auction_headers_all ah,
PON_AUC_DOCTYPES_TL doctl
where
ah.auction_header_id = to_number(p_id)
and ah.DOCTYPE_ID = doctl.DOCTYPE_ID
and doctl.LANGUAGE = userenv('LANG');
select
lookup_1.MEANING
into
rt_value
from pon_auction_headers_all ah,
FND_LOOKUP_VALUES lookup_1
where
ah.auction_header_id = to_number(p_id)
and lookup_1.LOOKUP_CODE(+) = ah.BID_VISIBILITY_CODE
and lookup_1.VIEW_APPLICATION_ID (+) = 0
and lookup_1.SECURITY_GROUP_ID (+) = 0
and lookup_1.LOOKUP_TYPE(+) = 'PON_BID_VISIBILITY_CODE'
and lookup_1.LANGUAGE(+) = userenv('LANG');
select
lookup_2.MEANING
into rt_value
from pon_auction_headers_all ah,
FND_LOOKUP_VALUES lookup_2
where ah.auction_header_id = to_number(p_id)
and lookup_2.lookup_code(+) = ah.fob_code
and lookup_2.LOOKUP_TYPE(+) = 'FOB'
and lookup_2.LANGUAGE(+) = userenv('LANG')
and lookup_2.SECURITY_GROUP_ID (+) = 0
and lookup_2.VIEW_APPLICATION_ID(+) = 201;
select
lookup_3.MEANING
into
rt_value
from pon_auction_headers_all ah,
FND_LOOKUP_VALUES lookup_3
where ah.auction_header_id = to_number(p_id)
and lookup_3.LOOKUP_CODE(+) = ah.FREIGHT_TERMS_CODE
and lookup_3.lookup_type ='FREIGHT TERMS'
and lookup_3.LANGUAGE(+) = userenv('LANG')
and lookup_3.SECURITY_GROUP_ID (+) = 0
and lookup_3.VIEW_APPLICATION_ID(+) = 201;
select
org.NAME
into
rt_value
from pon_auction_headers_all ah,
HR_ALL_ORGANIZATION_UNITS_TL org
where ah.auction_header_id = to_number(p_id)
and org.ORGANIZATION_ID = ah.ORG_ID
and org.LANGUAGE = userenv('LANG');
select to_char(sysdate,'MMDD')
into
rt_value
from dual;
select to_char(sysdate,'YY')
into
rt_value
from dual;
select to_char(sysdate,'YYYYMMDD')
into
rt_value
from dual;
select DOCUMENT_NUMBER into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select TO_CHAR(CLOSE_BIDDING_DATE, 'YYYYMMDD') into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select TO_CHAR(CLOSE_BIDDING_DATE + 15, 'YYYYMMDD') into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select DECODE(amendment_flag,'Y','A','S') into rt_value from pon_auction_headers_all where auction_header_id = to_number(p_id);
select preference_value into rt_value from PON_PARTY_PREFERENCES where app_short_name = 'PON' and preference_name = 'FBO_USER_ID';
SELECT PON_FORMS_UTIL_PVT.decrypt('FedBizOpps', (select preference_value from PON_PARTY_PREFERENCES where app_short_name = 'PON' and preference_name = 'FBO_PASSWORD')) into rt_value
FROM DUAL;
select validation_type
into l_value_set_type
from fnd_flex_value_sets
where FLEX_VALUE_SET_NAME = p_value_set_name;
select VALUE_COLUMN_NAME, ID_COLUMN_NAME
into l_value_column_name,l_id_column_name
from fnd_flex_validation_tables tbl, fnd_flex_value_sets val
where tbl.flex_value_set_id =val.flex_value_set_id
and val.flex_value_set_name = p_value_set_name;
fnd_flex_val_api.get_table_vset_select( p_value_set_name =>p_value_set_name,
x_select => l_query_stmt,
x_mapping_code => l_mapping_code,
x_success => l_success);
p_query_stmt := 'Select ' || L_ID_COLUMN_NAME || ' AS ID_COLUMN ,'
|| g_newline || substr(l_value_column_name,1,500) || ' AS VALUE_COLUMN ';
p_query_stmt := 'Select ' || l_value_column_name || ' AS ID_COLUMN ,'
|| g_newline || l_value_column_name || ' AS VALUE_COLUMN ';
select tl.FLEX_VALUE_MEANING
from fnd_flex_values_tl tl,
fnd_flex_values val,
fnd_flex_value_sets valset
where tl.flex_value_id = val.flex_value_id
and tl.language = USERENV('LANG')
and val.flex_value_set_id = valset.flex_value_set_id
and valset.flex_value_set_name = p_value_set_name
and val.FLEX_VALUE = p_id_value;
select tbl.ID_COLUMN_NAME, tbl.VALUE_COLUMN_NAME, fld.VALUE_SET_QUERY, fld.VALUE_SET_ID_EXISTS
into l_id_column_name, l_value_column_name, l_query_stmt, l_id_column_exists
from fnd_flex_validation_tables tbl,
fnd_flex_value_sets val,
pon_fields fld
where tbl.flex_value_set_id = val.flex_value_set_id
and val.flex_value_set_name = fld.value_set_name
and fld.field_code = p_field_code;
select validation_type
into l_value_set_type
from fnd_flex_value_sets
where FLEX_VALUE_SET_NAME = p_value_set_name;
select VALUE_COLUMN_NAME, ID_COLUMN_NAME
into l_value_column_name,l_id_column_name
from fnd_flex_validation_tables tbl, fnd_flex_value_sets val
where tbl.flex_value_set_id =val.flex_value_set_id
and val.flex_value_set_name = p_value_set_name;
p_query_stmt := p_query_stmt || g_newline || ',cursor (select to_char(' || l_date_value_column || ',''YYYY'') AS "YYYY"'
|| g_newline || ' ,to_char(' || l_date_value_column || ',''MM'') AS "MM"'
|| g_newline || ' ,to_char(' || l_date_value_column || ',''DD'') AS "DD"'
|| g_newline || ' from dual) AS ' || p_field_code ||'_NM';
p_query_stmt := p_query_stmt || g_newline || ',cursor (select to_char(' || l_date_value_column || ',''YYYY'') AS "YYYY"'
|| g_newline || ' ,to_char(' || l_date_value_column || ',''MM'') AS "MM"'
|| g_newline || ' ,to_char(' || l_date_value_column || ',''DD'') AS "DD"'
|| g_newline || ' ,to_char(' || l_date_value_column || ',''HH'') AS "HH"'
|| g_newline || ' ,to_char(' || l_date_value_column || ',''MI'') AS "MI"'
|| g_newline || ' ,to_char(' || l_date_value_column || ',''SS'') AS "SS"'
|| g_newline || ' from dual) AS ' || p_field_code ||'_NM';
select rs.form_code repeating_section_code,
ff.TYPE,
ff.FIELD_CODE,
ff.LEVEL1_SECTION_ID,
ff.LEVEL2_SECTION_ID,
ff.repeating_section_id repeating_section_id,
ff.MAPPING_FIELD_VALUE_COLUMN,
f.datatype,
f.value_set_name,
valset.flex_value_set_id value_set_id,
valset.VALIDATION_TYPE
from pon_form_section_compiled ff,
pon_forms_sections rs,
pon_fields f,
fnd_flex_value_sets valset
where ff.form_id = p_section_id
and rs.form_id(+) = ff.repeating_section_id
and ff.enabled ='Y'
and f.field_code(+) = ff.field_code
and f.value_set_name = valset.flex_value_set_name(+)
order by INTERNAL_SEQUENCE_NUMBER;
p_query_stmt := p_query_stmt || g_newline || ',Cursor (SELECT ' || l_value_alias || '.' || 'FORM_FIELD_VALUE_ID AS SECTION_PK_ID,'
|| g_newline || l_value_alias || '.' || 'PARENT_FIELD_VALUES_FK AS PARENT_FK_ID' ;
select ff.TYPE,
ts.form_code LEVEL1_SECTION_CODE,
isec.form_code LEVEL2_SECTION_code,
rs.form_code repeating_section_code,
ff.LEVEL1_SECTION_ID LEVEL1_SECTION_ID,
ff.LEVEL2_SECTION_ID LEVEL2_SECTION_ID,
ff.repeating_section_id repeating_section_id,
ff.FIELD_CODE,
ff.MAPPING_FIELD_VALUE_COLUMN,
f.datatype,
f.value_set_name,
f.system_flag,
f.SYSTEM_FIELD_LOV_FLAG,
valset.flex_value_set_id value_set_id,
valset.VALIDATION_TYPE,
ff.EDITABLE --Add for FOB project
from pon_form_section_compiled ff,
PON_FORMS_SECTIONS ts,
PON_FORMS_SECTIONS isec,
PON_FORMS_SECTIONS rs,
pon_fields f,
fnd_flex_value_sets valset
where ts.form_id(+) = ff.LEVEL1_SECTION_ID
and isec.form_id(+) = ff.LEVEL2_SECTION_ID
and rs.form_id(+) = ff.repeating_section_id
and ff.form_id = p_form_id
and ff.enabled ='Y'
and ff.field_code =f.field_code(+)
and f.value_set_name = valset.flex_value_set_name(+)
order by INTERNAL_SEQUENCE_NUMBER;
print_debug_log(l_api_name, 'Inserted Dummy Row l_schema_pk_id = '||l_schema_pk_id||' p_form_id = '||p_form_id||' p_section_id = -1 p_parent_fk_id = NULL');
select form_code
into l_form_code
from PON_FORMS_SECTIONS
where form_id = p_form_id;
p_query_stmt := 'SELECT ' || l_value_alias || '.' || 'FORM_FIELD_VALUE_ID AS FORM_PK_VALUE,'
|| g_newline || l_value_alias || '.' || 'OWNING_ENTITY_CODE,'
|| g_newline || l_value_alias || '.' || 'ENTITY_PK1';
p_query_stmt := p_query_stmt || g_newline || ' ,cursor (select 1 AS row_num';
p_query_stmt := p_query_stmt || g_newline || ' ,cursor (select 1 AS row_num';
p_query_stmt := p_query_stmt || g_newline || ' ,cursor (select 1 AS row_num';
';
select form_code
into l_form_code
from pon_forms_sections
where form_id = p_form_id;
select
xdo_stylesheet_code,
form_code
into
p_xdo_stylesheet_code,
l_form_code
from pon_forms_sections
where form_id = p_form_id;
insert into pon_form_field_values
(FORM_FIELD_VALUE_ID,
FORM_ID,
OWNING_ENTITY_CODE,
ENTITY_PK1,
SECTION_ID,
PARENT_FIELD_VALUES_FK,
TEXTCOL1,
TEXTCOL2,
TEXTCOL3,
TEXTCOL4,
TEXTCOL5,
TEXTCOL6,
TEXTCOL7,
TEXTCOL8,
TEXTCOL9,
TEXTCOL10,
TEXTCOL11,
TEXTCOL12,
TEXTCOL13,
TEXTCOL14,
TEXTCOL15,
TEXTCOL16,
TEXTCOL17,
TEXTCOL18,
TEXTCOL19,
TEXTCOL20,
TEXTCOL21,
TEXTCOL22,
TEXTCOL23,
TEXTCOL24,
TEXTCOL25,
TEXTCOL26,
TEXTCOL27,
TEXTCOL28,
TEXTCOL29,
TEXTCOL30,
TEXTCOL31,
TEXTCOL32,
TEXTCOL33,
TEXTCOL34,
TEXTCOL35,
TEXTCOL36,
TEXTCOL37,
TEXTCOL38,
TEXTCOL39,
TEXTCOL40,
TEXTCOL41,
TEXTCOL42,
TEXTCOL43,
TEXTCOL44,
TEXTCOL45,
TEXTCOL46,
TEXTCOL47,
TEXTCOL48,
TEXTCOL49,
TEXTCOL50,
TEXTCOL51,
TEXTCOL52,
TEXTCOL53,
TEXTCOL54,
TEXTCOL55,
TEXTCOL56,
TEXTCOL57,
TEXTCOL58,
TEXTCOL59,
TEXTCOL60,
TEXTCOL61,
TEXTCOL62,
TEXTCOL63,
TEXTCOL64,
TEXTCOL65,
TEXTCOL66,
TEXTCOL67,
TEXTCOL68,
TEXTCOL69,
TEXTCOL70,
TEXTCOL71,
TEXTCOL72,
TEXTCOL73,
TEXTCOL74,
TEXTCOL75,
TEXTCOL76,
TEXTCOL77,
TEXTCOL78,
TEXTCOL79,
TEXTCOL80,
TEXTCOL81,
TEXTCOL82,
TEXTCOL83,
TEXTCOL84,
TEXTCOL85,
TEXTCOL86,
TEXTCOL87,
TEXTCOL88,
TEXTCOL89,
TEXTCOL90,
TEXTCOL91,
TEXTCOL92,
TEXTCOL93,
TEXTCOL94,
TEXTCOL95,
TEXTCOL96,
TEXTCOL97,
TEXTCOL98,
TEXTCOL99,
TEXTCOL100,
TEXTCOL101,
TEXTCOL102,
TEXTCOL103,
TEXTCOL104,
TEXTCOL105,
TEXTCOL106,
TEXTCOL107,
TEXTCOL108,
TEXTCOL109,
TEXTCOL110,
TEXTCOL111,
TEXTCOL112,
TEXTCOL113,
TEXTCOL114,
TEXTCOL115,
TEXTCOL116,
TEXTCOL117,
TEXTCOL118,
TEXTCOL119,
TEXTCOL120,
TEXTCOL121,
TEXTCOL122,
TEXTCOL123,
TEXTCOL124,
TEXTCOL125,
TEXTCOL126,
TEXTCOL127,
TEXTCOL128,
TEXTCOL129,
TEXTCOL130,
TEXTCOL131,
TEXTCOL132,
TEXTCOL133,
TEXTCOL134,
TEXTCOL135,
TEXTCOL136,
TEXTCOL137,
TEXTCOL138,
TEXTCOL139,
TEXTCOL140,
TEXTCOL141,
TEXTCOL142,
TEXTCOL143,
TEXTCOL144,
TEXTCOL145,
TEXTCOL146,
TEXTCOL147,
TEXTCOL148,
TEXTCOL149,
TEXTCOL150,
TEXTCOL151,
TEXTCOL152,
TEXTCOL153,
TEXTCOL154,
TEXTCOL155,
TEXTCOL156,
TEXTCOL157,
TEXTCOL158,
TEXTCOL159,
TEXTCOL160,
TEXTCOL161,
TEXTCOL162,
TEXTCOL163,
TEXTCOL164,
TEXTCOL165,
TEXTCOL166,
TEXTCOL167,
TEXTCOL168,
TEXTCOL169,
TEXTCOL170,
TEXTCOL171,
TEXTCOL172,
TEXTCOL173,
TEXTCOL174,
TEXTCOL175,
TEXTCOL176,
TEXTCOL177,
TEXTCOL178,
TEXTCOL179,
TEXTCOL180,
TEXTCOL181,
TEXTCOL182,
TEXTCOL183,
TEXTCOL184,
TEXTCOL185,
TEXTCOL186,
TEXTCOL187,
TEXTCOL188,
TEXTCOL189,
TEXTCOL190,
TEXTCOL191,
TEXTCOL192,
TEXTCOL193,
TEXTCOL194,
TEXTCOL195,
TEXTCOL196,
TEXTCOL197,
TEXTCOL198,
TEXTCOL199,
TEXTCOL200,
TEXTCOL201,
TEXTCOL202,
TEXTCOL203,
TEXTCOL204,
TEXTCOL205,
TEXTCOL206,
TEXTCOL207,
TEXTCOL208,
TEXTCOL209,
TEXTCOL210,
TEXTCOL211,
TEXTCOL212,
TEXTCOL213,
TEXTCOL214,
TEXTCOL215,
TEXTCOL216,
TEXTCOL217,
TEXTCOL218,
TEXTCOL219,
TEXTCOL220,
TEXTCOL221,
TEXTCOL222,
TEXTCOL223,
TEXTCOL224,
TEXTCOL225,
TEXTCOL226,
TEXTCOL227,
TEXTCOL228,
TEXTCOL229,
TEXTCOL230,
TEXTCOL231,
TEXTCOL232,
TEXTCOL233,
TEXTCOL234,
TEXTCOL235,
TEXTCOL236,
TEXTCOL237,
TEXTCOL238,
TEXTCOL239,
TEXTCOL240,
TEXTCOL241,
TEXTCOL242,
TEXTCOL243,
TEXTCOL244,
TEXTCOL245,
TEXTCOL246,
TEXTCOL247,
TEXTCOL248,
TEXTCOL249,
TEXTCOL250,
DATECOL1,
DATECOL2,
DATECOL3,
DATECOL4,
DATECOL5,
DATECOL6,
DATECOL7,
DATECOL8,
DATECOL9,
DATECOL10,
DATECOL11,
DATECOL12,
DATECOL13,
DATECOL14,
DATECOL15,
DATECOL16,
DATECOL17,
DATECOL18,
DATECOL19,
DATECOL20,
DATECOL21,
DATECOL22,
DATECOL23,
DATECOL24,
DATECOL25,
DATECOL26,
DATECOL27,
DATECOL28,
DATECOL29,
DATECOL30,
DATECOL31,
DATECOL32,
DATECOL33,
DATECOL34,
DATECOL35,
DATECOL36,
DATECOL37,
DATECOL38,
DATECOL39,
DATECOL40,
DATECOL41,
DATECOL42,
DATECOL43,
DATECOL44,
DATECOL45,
DATECOL46,
DATECOL47,
DATECOL48,
DATECOL49,
DATECOL50,
NUMBERCOL1,
NUMBERCOL2,
NUMBERCOL3,
NUMBERCOL4,
NUMBERCOL5,
NUMBERCOL6,
NUMBERCOL7,
NUMBERCOL8,
NUMBERCOL9,
NUMBERCOL10,
NUMBERCOL11,
NUMBERCOL12,
NUMBERCOL13,
NUMBERCOL14,
NUMBERCOL15,
NUMBERCOL16,
NUMBERCOL17,
NUMBERCOL18,
NUMBERCOL19,
NUMBERCOL20,
NUMBERCOL21,
NUMBERCOL22,
NUMBERCOL23,
NUMBERCOL24,
NUMBERCOL25,
NUMBERCOL26,
NUMBERCOL27,
NUMBERCOL28,
NUMBERCOL29,
NUMBERCOL30,
NUMBERCOL31,
NUMBERCOL32,
NUMBERCOL33,
NUMBERCOL34,
NUMBERCOL35,
NUMBERCOL36,
NUMBERCOL37,
NUMBERCOL38,
NUMBERCOL39,
NUMBERCOL40,
NUMBERCOL41,
NUMBERCOL42,
NUMBERCOL43,
NUMBERCOL44,
NUMBERCOL45,
NUMBERCOL46,
NUMBERCOL47,
NUMBERCOL48,
NUMBERCOL49,
NUMBERCOL50,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
LEVEL1_SECTION_ID,
LEVEL2_SECTION_ID)
values(
p_value_pk_id
,p_FORM_ID
,'XML_SCHEMA_GENERATION'
, g_dummy_pk
,p_SECTION_ID
,p_parent_fk_id
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,g_dummy_char
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,sysdate -200
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,g_dummy_num
,sysdate
,0
,sysdate
,0
,0
,p_level1_section_id
,p_level2_section_id);
select
ff.FORM_SECTION_FIELD_ID,
ff.FORM_ID,
ff.TYPE,
ff.FIELD_CODE,
ff.SEQUENCE_NUMBER,
ff.REQUIRED,
ff.SECTION_ID,
ff.DISPLAY_ON_MAIN_PAGE,
ff.ENABLED,
f.datatype,
f.system_flag,
ff.EDITABLE
from pon_form_section_fields ff,
pon_fields f
where form_id = p_form_id
and f.field_code(+) = ff.field_code
order by sequence_number;
Delete pon_form_section_compiled
where form_id = p_form_id;
InsertCompiledRow( p_FORM_SECTION_FIELD_ID => null,
p_form_id => p_form_id,
p_type => 'FORM',
p_field_code => null,
p_INTERNAL_SEQUENCE_NUMBER =>0,
p_MAPPING_FIELD_VALUE_COLUMN =>null,
p_REQUIRED => null,
p_LEVEL1_SECTION_ID => null,
p_LEVEL2_SECTION_ID => null,
p_REPEATING_SECTION_ID => null,
p_DISPLAY_ON_MAIN_PAGE =>null,
p_ENABLED =>'Y',
p_EDITABLE => null);
InsertCompiledRow( p_FORM_SECTION_FIELD_ID => form_section_compiled.FORM_SECTION_FIELD_ID,
p_form_id => form_section_compiled.FORM_ID,
p_type => 'FORM_FIELD',
p_field_code => form_section_compiled.FIELD_CODE,
p_INTERNAL_SEQUENCE_NUMBER =>g_internal_sequence_number,
p_MAPPING_FIELD_VALUE_COLUMN =>x_mapping_column,
p_REQUIRED => form_section_compiled.REQUIRED,
p_LEVEL1_SECTION_ID => null,
p_LEVEL2_SECTION_ID => null,
p_REPEATING_SECTION_ID => null,
p_DISPLAY_ON_MAIN_PAGE =>form_section_compiled.DISPLAY_ON_MAIN_PAGE,
p_ENABLED =>form_section_compiled.ENABLED,
p_EDITABLE =>form_section_compiled.EDITABLE);
select
nvl(is_repeating_section_flag,'N')
into
x_is_repeating_section_flag
from
pon_forms_sections
where
FORM_ID = x_section_id;
InsertCompiledRow( p_FORM_SECTION_FIELD_ID => form_section_compiled.FORM_SECTION_FIELD_ID,
p_form_id => form_section_compiled.FORM_ID,
p_type => 'REPEAT_SECTION',
p_field_code => null,
p_INTERNAL_SEQUENCE_NUMBER =>g_internal_sequence_number,
p_MAPPING_FIELD_VALUE_COLUMN =>null,
p_REQUIRED => null,
p_LEVEL1_SECTION_ID => null,
p_LEVEL2_SECTION_ID => null,
p_REPEATING_SECTION_ID => form_section_compiled.SECTION_ID,
p_DISPLAY_ON_MAIN_PAGE =>form_section_compiled.DISPLAY_ON_MAIN_PAGE,
p_ENABLED =>form_section_compiled.ENABLED,
p_EDITABLE =>null);
InsertCompiledRow( p_FORM_SECTION_FIELD_ID => form_section_compiled.FORM_SECTION_FIELD_ID,
p_form_id => form_section_compiled.FORM_ID,
p_type => 'NORMAL_SECTION',
p_field_code => null,
p_INTERNAL_SEQUENCE_NUMBER =>g_internal_sequence_number,
p_MAPPING_FIELD_VALUE_COLUMN =>null,
p_REQUIRED => null,
p_LEVEL1_SECTION_ID => form_section_compiled.SECTION_ID,
p_LEVEL2_SECTION_ID => null,
p_REPEATING_SECTION_ID => null,
p_DISPLAY_ON_MAIN_PAGE =>form_section_compiled.DISPLAY_ON_MAIN_PAGE,
p_ENABLED =>form_section_compiled.ENABLED,
p_EDITABLE =>null);
INSERT_LEVEL1_SECTION_IN_FORM(p_form_id,form_section_compiled.SECTION_ID);
update pon_form_section_compiled
set enabled = 'N'
where form_id = p_form_id
and level1_section_id = form_section_compiled.SECTION_ID;
PROCEDURE: INSERT_LEVEL1_SECTION_IN_FORM PRIVATE
PARAMETERS:
COMMENT :
======================================================================*/
PROCEDURE INSERT_LEVEL1_SECTION_IN_FORM(p_form_id IN NUMBER,
p_level1_section_id IN NUMBER) IS
x_section_id NUMBER;
l_api_name CONSTANT VARCHAR2(30) := 'INSERT_LEVEL1_SECTION_IN_FORM';
select
ff.FORM_SECTION_FIELD_ID,
ff.FORM_ID,
ff.TYPE,
ff.FIELD_CODE,
ff.SEQUENCE_NUMBER,
ff.REQUIRED,
ff.SECTION_ID,
ff.DISPLAY_ON_MAIN_PAGE,
ff.ENABLED,
f.datatype,
f.system_flag,
ff.EDITABLE
from pon_form_section_fields ff,
pon_fields f
where form_id = p_level1_section_id
and f.field_code(+) = ff.field_code
order by sequence_number;
InsertCompiledRow( p_FORM_SECTION_FIELD_ID => LEVEL1_SECTION_fields_record.FORM_SECTION_FIELD_ID,
p_form_id => p_form_id,
p_type => 'SECTION_FIELD',
p_field_code => LEVEL1_SECTION_fields_record.FIELD_CODE,
p_INTERNAL_SEQUENCE_NUMBER =>g_internal_sequence_number,
p_MAPPING_FIELD_VALUE_COLUMN =>x_mapping_column,
p_REQUIRED => LEVEL1_SECTION_fields_record.REQUIRED,
p_LEVEL1_SECTION_ID => p_level1_section_id,
p_LEVEL2_SECTION_ID => null,
p_REPEATING_SECTION_ID => null,
p_DISPLAY_ON_MAIN_PAGE =>LEVEL1_SECTION_fields_record.DISPLAY_ON_MAIN_PAGE,
p_ENABLED =>LEVEL1_SECTION_fields_record.ENABLED,
p_EDITABLE =>LEVEL1_SECTION_fields_record.EDITABLE);
select
nvl(is_repeating_section_flag,'N')
into
x_is_repeating_section_flag
from
pon_forms_sections
where
FORM_ID = x_section_id;
InsertCompiledRow( p_FORM_SECTION_FIELD_ID => LEVEL1_SECTION_fields_record.FORM_SECTION_FIELD_ID,
p_form_id => p_form_id,
p_type => 'INNER_REPEAT_SECTION',
p_field_code => null,
p_INTERNAL_SEQUENCE_NUMBER =>g_internal_sequence_number,
p_MAPPING_FIELD_VALUE_COLUMN =>null,
p_REQUIRED => null,
p_LEVEL1_SECTION_ID => p_level1_section_id,
p_LEVEL2_SECTION_ID => null,
p_REPEATING_SECTION_ID => LEVEL1_SECTION_fields_record.SECTION_ID,
p_DISPLAY_ON_MAIN_PAGE =>LEVEL1_SECTION_fields_record.DISPLAY_ON_MAIN_PAGE,
p_ENABLED =>LEVEL1_SECTION_fields_record.ENABLED,
p_EDITABLE =>null);
InsertCompiledRow( p_FORM_SECTION_FIELD_ID => LEVEL1_SECTION_fields_record.FORM_SECTION_FIELD_ID,
p_form_id => p_form_id,
p_type => 'INNER_NORMAL_SECTION',
p_field_code => null,
p_INTERNAL_SEQUENCE_NUMBER =>g_internal_sequence_number,
p_MAPPING_FIELD_VALUE_COLUMN =>null,
p_REQUIRED => null,
p_LEVEL1_SECTION_ID => p_level1_section_id,
p_LEVEL2_SECTION_ID => LEVEL1_SECTION_fields_record.SECTION_ID,
p_REPEATING_SECTION_ID => null,
p_DISPLAY_ON_MAIN_PAGE =>LEVEL1_SECTION_fields_record.DISPLAY_ON_MAIN_PAGE,
p_ENABLED =>LEVEL1_SECTION_fields_record.ENABLED,
p_EDITABLE =>null);
INSERT_LEVEL2_SECTION_IN_FORM(p_form_id,
p_level1_section_id,
LEVEL1_SECTION_fields_record.SECTION_ID);
END INSERT_LEVEL1_SECTION_IN_FORM;
PROCEDURE: INSERT_LEVEL2_SECTION_IN_FORM PRIVATE
PARAMETERS:
COMMENT :
======================================================================*/
PROCEDURE INSERT_LEVEL2_SECTION_IN_FORM(p_form_id IN NUMBER,
p_level1_section_id IN NUMBER,
p_level2_section_id IN NUMBER) IS
x_section_id NUMBER;
l_api_name CONSTANT VARCHAR2(30) := 'INSERT_LEVEL2_SECTION_IN_FORM';
select
ff.FORM_SECTION_FIELD_ID,
ff.FORM_ID,
ff.TYPE,
ff.FIELD_CODE,
ff.SEQUENCE_NUMBER,
ff.REQUIRED,
ff.SECTION_ID,
ff.DISPLAY_ON_MAIN_PAGE,
ff.ENABLED,
f.datatype,
f.system_flag,
ff.EDITABLE
from pon_form_section_fields ff,
pon_fields f
where form_id = p_level2_section_id
and f.field_code(+) = ff.field_code
order by sequence_number;
InsertCompiledRow( p_FORM_SECTION_FIELD_ID => inner_section_fields_record.FORM_SECTION_FIELD_ID,
p_form_id => p_form_id,
p_type => 'INNER_SECTION_FIELD',
p_field_code => inner_section_fields_record.FIELD_CODE,
p_INTERNAL_SEQUENCE_NUMBER =>g_internal_sequence_number,
p_MAPPING_FIELD_VALUE_COLUMN =>x_mapping_column,
p_REQUIRED => inner_section_fields_record.REQUIRED,
p_LEVEL1_SECTION_ID => p_level1_section_id,
p_LEVEL2_SECTION_ID => p_level2_section_id,
p_REPEATING_SECTION_ID => null,
p_DISPLAY_ON_MAIN_PAGE =>inner_section_fields_record.DISPLAY_ON_MAIN_PAGE,
p_ENABLED =>inner_section_fields_record.ENABLED,
p_EDITABLE =>null);
InsertCompiledRow( p_FORM_SECTION_FIELD_ID => inner_section_fields_record.FORM_SECTION_FIELD_ID,
p_form_id => p_form_id,
p_type => 'INNER_SECTION_REPEAT_SECTION',
p_field_code => null,
p_INTERNAL_SEQUENCE_NUMBER =>g_internal_sequence_number,
p_MAPPING_FIELD_VALUE_COLUMN =>null,
p_REQUIRED => null,
p_LEVEL1_SECTION_ID => p_level1_section_id,
p_LEVEL2_SECTION_ID => p_level2_section_id,
p_REPEATING_SECTION_ID => inner_section_fields_record.SECTION_ID,
p_DISPLAY_ON_MAIN_PAGE =>inner_section_fields_record.DISPLAY_ON_MAIN_PAGE,
p_ENABLED =>inner_section_fields_record.ENABLED,
p_EDITABLE =>null);
END INSERT_LEVEL2_SECTION_IN_FORM;
SELECT
DISTINCT FS.FORM_ID SECTION_ID
FROM
PON_FORM_SECTION_FIELDS FSF,
PON_FORMS_SECTIONS FS
WHERE
FSF.SECTION_ID = FS.FORM_ID
AND
FS.IS_REPEATING_SECTION_FLAG = 'Y'
AND
(FS.JRAD_XML_REGION_NAME IS NULL
OR
FS.JRAD_XML_REGION_NAME_DISP IS NULL)
START WITH
FSF.FORM_ID = p_form_id
CONNECT
BY PRIOR FSF.SECTION_ID = FSF.FORM_ID;
UPDATE PON_FORMS_SECTIONS
SET
JRAD_XML_REGION_NAME_DISP = v_read_only_region_name,
JRAD_XML_REGION_NAME = v_edit_region_name
WHERE
FORM_ID = v_section_id
AND STATUS = 'ACTIVE';
select
type,
jrad_xml_region_name,
jrad_xml_region_name_disp
into
x_type,
x_data_entry_region_name,
x_read_only_region_name_disp
from
pon_forms_sections
where
FORM_ID = p_form_id;
update
pon_forms_sections
set
xml_query = x_query_stmt
where
form_id = p_form_id;
UPDATE pon_forms_sections
SET
jrad_xml_region_name = x_data_entry_region_name,
jrad_xml_region_name_disp = x_read_only_region_name_disp
WHERE form_id = p_form_id
AND status = 'ACTIVE';
COMMENT : This procedure is used to update the abstract status
when it is published, i.e. this procedure should be
invoked when the user presses either publish or un-publish
abstract button. We also invoke this procedure when the
apply button is pressed on the enter form-data page as
we need to save the 'include pdf' checkbox value.
======================================================================*/
procedure publishAbstract(p_auction_header_id IN NUMBER,
p_include_pdf_flag IN VARCHAR2,
p_publish_action IN VARCHAR2,
x_result OUT NOCOPY VARCHAR2,
x_error_code OUT NOCOPY VARCHAR2,
x_error_message OUT NOCOPY VARCHAR2) IS
l_api_name CONSTANT VARCHAR2(30) := 'PUBLISHABSTRACT';
update pon_auction_headers_all
set include_pdf_in_external_page = p_include_pdf_flag,
last_update_date = sysdate
where auction_header_id = p_auction_header_id;
-- we dont need to update the status in either
-- pon_auction_headers_all.abstract_status OR
-- pon_forms_instances.status
-- as we do invoke this method when the user presses the apply button as well
update pon_auction_headers_all
set abstract_status = decode(nvl(p_publish_action, 'X'), 'Y', 'PUBLISHED', 'NOT_PUBLISHED'),
last_update_date = sysdate
where auction_header_id = p_auction_header_id;
select form_id
into l_form_id
from pon_forms_sections
where form_code = 'ABSTRACT'
and type = 'ABSTRACT';
update pon_forms_instances
set status = decode(nvl(p_publish_action, 'X'), 'Y', 'PUBLISHED', 'NOT_PUBLISHED'),
last_update_date = sysdate
where entity_code = 'PON_AUCTION_HEADERS_ALL'
and entity_pk1 = to_char(p_auction_header_id)
and form_id = l_form_id;
COMMENT : This procedure is used to update the form instance status
for a form attached to an entity. This procedure will be
invoked from the beforeCommit method of the
FormFieldValuesEO entity
======================================================================*/
PROCEDURE performPostSaveChanges(p_form_id IN NUMBER,
p_entity_pk1 IN VARCHAR2,
p_entity_code IN VARCHAR2,
p_include_pdf IN VARCHAR2,
x_result OUT NOCOPY VARCHAR2,
x_error_code OUT NOCOPY VARCHAR2,
x_error_message OUT NOCOPY VARCHAR2) IS
l_api_name CONSTANT VARCHAR2(30) := 'PERFORMPOSTSAVECHANGES';
select type
into l_form_type
from pon_forms_sections
where form_id = p_form_id;
select status
into l_old_status
from pon_forms_instances
where entity_code = p_entity_code
and entity_pk1 = p_entity_pk1
and form_id = p_form_id;
update pon_forms_instances
set status = 'DATA_ENTERED',
last_update_date = sysdate
where entity_code = p_entity_code
and entity_pk1 = p_entity_pk1
and form_id = p_form_id;
select status
into l_old_status
from pon_forms_instances
where entity_code = p_entity_code
and entity_pk1 = p_entity_pk1
and form_id = p_form_id;
-- data for a form, we need to update the status if the
-- status hasnt been set
if(NVL(l_old_status , 'x@Y#z') = 'x@Y#z') then
update pon_forms_instances
set status = 'NOT_PUBLISHED',
last_update_date = sysdate
where entity_code = p_entity_code
and entity_pk1 = p_entity_pk1
and form_id = p_form_id;
update pon_auction_headers_all
set include_pdf_in_external_page = p_include_pdf,
last_update_date = sysdate
where auction_header_id = to_number(p_entity_pk1);
PROCEDURE: deleteFormFieldValues PUBLIC
PARAMETERS:
COMMENT : This procedure is used to remove all the child rows from
pon_form_field_values table for a given parent row.
This procedure will be invoked from the remove method of the
FormFieldValuesEO entity
======================================================================*/
PROCEDURE deleteFormFieldValues(p_form_id IN NUMBER,
p_entity_pk1 IN VARCHAR2,
p_entity_code IN VARCHAR2,
p_section_id IN NUMBER,
p_parent_fk IN NUMBER,
x_result OUT NOCOPY VARCHAR2,
x_error_code OUT NOCOPY VARCHAR2,
x_error_message OUT NOCOPY VARCHAR2) IS
l_api_name CONSTANT VARCHAR2(30) := 'DELETEFORMFIELDVALUES';
delete from pon_form_field_values
where form_id = p_form_id
and entity_pk1 = p_entity_pk1
and owning_entity_code = p_entity_code
and parent_field_values_fk = p_parent_fk
and nvl(section_id, -1) <> -1;
END deleteFormFieldValues;
SELECT HASHKEY
INTO l_org_hash_key
FROM POS_ORG_HASH
WHERE ORG_ID=p_org_id;
PROCEDURE: deleteValues PUBLIC
PARAMETERS:
COMMENT : This procedure is used to remove all the rows from
pon_form_field_values table for a given form.
This procedure should be invoked from the remove method
FormInstancesEO entity
======================================================================*/
PROCEDURE deleteValues( p_form_id IN NUMBER,
p_entity_pk1 IN VARCHAR2,
p_entity_code IN VARCHAR2,
x_result OUT NOCOPY VARCHAR2,
x_error_code OUT NOCOPY VARCHAR2,
x_error_message OUT NOCOPY VARCHAR2) IS
l_api_name CONSTANT VARCHAR2(30) := 'DELETEVALUES';
delete from pon_form_field_values
where form_id = p_form_id
and entity_pk1 = p_entity_pk1
and owning_entity_code = p_entity_code;
END deleteValues;
/*select preference_value
into l_result
from PON_PARTY_PREFERENCES
where app_short_name = 'PON'
and preference_name = 'FBO_URL';*/
select ag.database_column
into l_column_name
from EGO_ATTRS_V ag, ego_fnd_dsc_flx_ctx_ext egoag
where ag.attr_group_type = egoag.descriptive_flexfield_name
and ag.attr_group_name = egoag.descriptive_flex_context_code
AND ag.attr_group_type = 'PON_AUC_PRICES_EXT_ATTRS'
AND ag.ATTR_GROUP_NAME = 'FED_CUST_DESG'
AND ag.ATTR_NAME = p_attr_name;
select attr_group_id into l_attr_grp_id from ego_attr_groups_v where attr_group_name = 'FED_CUST_DESG' and attr_group_type = 'PON_AUC_PRICES_EXT_ATTRS';
select line_number BULK COLLECT INTO l_line_number from (select line_number, clm_amount line_amount from pon_auction_item_prices_all
where order_type_lookup_code <> 'QUANTITY'
and auction_header_id = p_auction_header_id
and clm_amount is not null
union
select line_number, current_price * quantity line_amount from pon_auction_item_prices_all
where order_type_lookup_code = 'QUANTITY'
and auction_header_id = p_auction_header_id
and current_price is not null)
order by line_amount desc;
l_sql := 'select paip_ext.' || l_column_name ||
' from pon_auction_item_prices_ext_b paip_ext' ||
' where paip_ext.auction_header_id = ' || p_auction_header_id ||
' and paip_ext.line_number = '|| l_line_number(1) ||
' and paip_ext.attr_group_id = '||l_attr_grp_id;
select ag.database_column
into l_column_name
from EGO_ATTRS_V ag, ego_fnd_dsc_flx_ctx_ext egoag
where ag.attr_group_type = egoag.descriptive_flexfield_name
and ag.attr_group_name = egoag.descriptive_flex_context_code
AND ag.attr_group_type = 'PON_AUC_PRICES_EXT_ATTRS'
AND ag.ATTR_GROUP_NAME = 'FED_CUST_DESG'
AND ag.ATTR_NAME = p_attr_name;
select attr_group_id into l_attr_grp_id from ego_attr_groups_v where attr_group_name = 'FED_CUST_DESG' and attr_group_type = 'PON_AUC_PRICES_EXT_ATTRS';
l_sql := 'select paip_ext.' || l_column_name ||', Sum(paip.clm_amount) amount ' ||
'from pon_auction_item_prices_ext_b paip_ext, pon_auction_Item_prices_all paip '||
'where paip_ext.auction_header_id = ' || p_auction_header_id ||
'and paip_ext.attr_group_id = ' || l_attr_grp_id ||
'AND paip.auction_header_id = paip_ext.auction_header_id ' ||
'AND paip_ext.line_number = paip.line_number ' ||
' AND paip_ext.'|| l_column_name || ' IS NOT NULL ' ||
' GROUP BY paip_ext.' || l_column_name ||
' ORDER BY amount DESC';
SELECT Decode(Nvl(amendment_flag,'N'),'Y',amendment_description,abstract_details)
INTO l_fed_desc
FROM pon_auction_headers_all
WHERE auction_header_id = p_auction_header_id;
SELECT Decode(Nvl(amendment_number,0),0,'S','A')
INTO l_uploadtype
FROM pon_auction_headers_all
WHERE auction_header_id = p_auction_header_id;
select ag.database_column, egoag.attr_group_id
into l_column_name, l_attr_group_id
from EGO_ATTRS_V ag, ego_fnd_dsc_flx_ctx_ext egoag
where ag.attr_group_type = egoag.descriptive_flexfield_name
and ag.attr_group_name = egoag.descriptive_flex_context_code
AND ag.attr_group_type = p_attr_group_type
AND ag.ATTR_GROUP_NAME = p_attr_group_name
AND ag.ATTR_NAME = p_attr_name;
l_sql := 'select ' || l_column_name || ' from ' || p_from ||
' where auction_header_id = :1 and attr_group_id = :2';
select line_number into l_line_number from pon_auction_item_prices_all
where auction_header_id = p_auction_header_id AND Nvl(clm_info_flag,'N') = 'N' AND rownum < 2;
select line_number into l_line_number from pon_auction_item_prices_all
where auction_header_id = p_auction_header_id AND Nvl(clm_info_flag,'N') = 'N' AND rownum < 2;
select line_number into l_line_number from pon_auction_item_prices_all
where auction_header_id = p_auction_header_id AND Nvl(clm_info_flag,'N') = 'N' AND rownum < 2;
select application_id, attr_id
into l_application_id, l_attr_id
from ego_attrs_v
where ATTR_NAME = p_attr_internal_name
and ATTR_GROUP_NAME = p_attr_group_int_name
and ATTR_GROUP_TYPE = p_attr_group_type;
select pon_post_wf_s.nextval
into l_sequence
from dual;
select DOCUMENT_NUMBER into l_solnbr from pon_auction_headers_all where auction_header_id = p_entity_pk1;
select FORM_NAME into l_form_name from PON_FORMS_SECTIONS_TL where form_id = p_form_id
AND LANGUAGE = l_curr_lang; -- bug 9855606
select to_char(l_form_name) || '-' ||to_char(l_solnbr) ||'-' ||to_char(l_sequence)
into l_item_key from dual;
select email_address into l_buyer_email
from WF_LOCAL_ROLES
where NAME = p_from_role_name;
select meaning, enabled_flag, start_date_active, end_date_active
into l_email_to,l_email_enabled,l_email_start_date,l_email_end_date
from fnd_lookups
where lookup_type ='PON_FBO_EMAIL'
and lookup_code = 'EMAIL_TO';
select meaning
into l_email_cc
from fnd_lookups
where lookup_type = 'PON_FBO_EMAIL'
and lookup_code = 'EMAIL_CC';
SELECT COUNT(*)
INTO l_count_role
FROM wf_local_roles
WHERE NAME = l_to_role_name;
SELECT EMAIL_ADDRESS, notification_preference
INTO l_fed_email, l_notification_preference
FROM wf_local_roles
WHERE NAME = l_to_role_name;
SELECT field_length INTO l_max_field_length FROM pon_fields WHERE field_code = p_field_code;
SELECT To_Char(Nvl(Max(FBO_POST_DATE),SYSDATE),'YYYYMMDD') INTO x_posting_date FROM pon_fbo_posts
WHERE DOCUMENT_ID = p_auction_header_id
AND FBO_POST_STATUS = 'SUCCESS'
AND form_id=p_form_id;