The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure insert_dml(p_rec in out NOCOPY per_anc_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'insert_dml';
insert into per_analysis_criteria
( analysis_criteria_id,
request_id,
program_application_id,
program_id,
program_update_date,
id_flex_num,
summary_flag,
enabled_flag,
start_date_active,
end_date_active,
segment1,
segment2,
segment3,
segment4,
segment5,
segment6,
segment7,
segment8,
segment9,
segment10,
segment11,
segment12,
segment13,
segment14,
segment15,
segment16,
segment17,
segment18,
segment19,
segment20,
segment21,
segment22,
segment23,
segment24,
segment25,
segment26,
segment27,
segment28,
segment29,
segment30
)
Values
( p_rec.analysis_criteria_id,
p_rec.request_id,
p_rec.program_application_id,
p_rec.program_id,
p_rec.program_update_date,
p_rec.id_flex_num,
p_rec.summary_flag,
p_rec.enabled_flag,
p_rec.start_date_active,
p_rec.end_date_active,
p_rec.segment1,
p_rec.segment2,
p_rec.segment3,
p_rec.segment4,
p_rec.segment5,
p_rec.segment6,
p_rec.segment7,
p_rec.segment8,
p_rec.segment9,
p_rec.segment10,
p_rec.segment11,
p_rec.segment12,
p_rec.segment13,
p_rec.segment14,
p_rec.segment15,
p_rec.segment16,
p_rec.segment17,
p_rec.segment18,
p_rec.segment19,
p_rec.segment20,
p_rec.segment21,
p_rec.segment22,
p_rec.segment23,
p_rec.segment24,
p_rec.segment25,
p_rec.segment26,
p_rec.segment27,
p_rec.segment28,
p_rec.segment29,
p_rec.segment30
);
End insert_dml;
Procedure pre_insert(p_rec in out NOCOPY per_anc_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'pre_insert';
Cursor C_Sel1 is select per_analysis_criteria_s.nextval from sys.dual;
End pre_insert;
Procedure post_insert(p_rec in per_anc_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'post_insert';
End post_insert;
per_anc_bus.insert_validate(p_rec);
pre_insert(p_rec);
insert_dml(p_rec);
post_insert(p_rec);
p_program_update_date in date default null,
p_id_flex_num in number,
p_summary_flag in varchar2,
p_enabled_flag in varchar2,
p_start_date_active in date default null,
p_end_date_active in date default null,
p_segment1 in varchar2 default null,
p_segment2 in varchar2 default null,
p_segment3 in varchar2 default null,
p_segment4 in varchar2 default null,
p_segment5 in varchar2 default null,
p_segment6 in varchar2 default null,
p_segment7 in varchar2 default null,
p_segment8 in varchar2 default null,
p_segment9 in varchar2 default null,
p_segment10 in varchar2 default null,
p_segment11 in varchar2 default null,
p_segment12 in varchar2 default null,
p_segment13 in varchar2 default null,
p_segment14 in varchar2 default null,
p_segment15 in varchar2 default null,
p_segment16 in varchar2 default null,
p_segment17 in varchar2 default null,
p_segment18 in varchar2 default null,
p_segment19 in varchar2 default null,
p_segment20 in varchar2 default null,
p_segment21 in varchar2 default null,
p_segment22 in varchar2 default null,
p_segment23 in varchar2 default null,
p_segment24 in varchar2 default null,
p_segment25 in varchar2 default null,
p_segment26 in varchar2 default null,
p_segment27 in varchar2 default null,
p_segment28 in varchar2 default null,
p_segment29 in varchar2 default null,
p_segment30 in varchar2 default null,
p_validate in boolean default false
) is
--
l_rec per_anc_shd.g_rec_type;
p_program_update_date,
p_id_flex_num,
p_summary_flag,
p_enabled_flag,
p_start_date_active,
p_end_date_active,
p_segment1,
p_segment2,
p_segment3,
p_segment4,
p_segment5,
p_segment6,
p_segment7,
p_segment8,
p_segment9,
p_segment10,
p_segment11,
p_segment12,
p_segment13,
p_segment14,
p_segment15,
p_segment16,
p_segment17,
p_segment18,
p_segment19,
p_segment20,
p_segment21,
p_segment22,
p_segment23,
p_segment24,
p_segment25,
p_segment26,
p_segment27,
p_segment28,
p_segment29,
p_segment30
);
p_program_update_date => null,
p_id_flex_num => p_id_flex_num,
p_summary_flag => null,
p_enabled_flag => null,
p_start_date_active => null,
p_end_date_active => null,
p_segment1 => p_segment1,
p_segment2 => p_segment2,
p_segment3 => p_segment3,
p_segment4 => p_segment4,
p_segment5 => p_segment5,
p_segment6 => p_segment6,
p_segment7 => p_segment7,
p_segment8 => p_segment8,
p_segment9 => p_segment9,
p_segment10 => p_segment10,
p_segment11 => p_segment11,
p_segment12 => p_segment12,
p_segment13 => p_segment13,
p_segment14 => p_segment14,
p_segment15 => p_segment15,
p_segment16 => p_segment16,
p_segment17 => p_segment17,
p_segment18 => p_segment18,
p_segment19 => p_segment19,
p_segment20 => p_segment20,
p_segment21 => p_segment21,
p_segment22 => p_segment22,
p_segment23 => p_segment23,
p_segment24 => p_segment24,
p_segment25 => p_segment25,
p_segment26 => p_segment26,
p_segment27 => p_segment27,
p_segment28 => p_segment28,
p_segment29 => p_segment29,
p_segment30 => p_segment30,
p_validate => p_validate);