The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE INSERT_BUDGET_LINES
( p_project_id IN NUMBER
,p_pre_baselined_version_id IN NUMBER
,p_baselined_budget_version_id IN NUMBER
,x_rejection_code OUT NOCOPY VARCHAR2
,x_interface_status OUT NOCOPY VARCHAR2
) IS
l_set_of_books_id PA_PLSQL_DATATYPES.IdTabTyp;
l_last_update_date PA_PLSQL_DATATYPES.DateTabTyp;
l_last_updated_by PA_PLSQL_DATATYPES.NumTabTyp;
SELECT
pia.SET_OF_BOOKS_ID SET_OF_BOOKS_ID
,'PROJECTS' SOURCE
,grp_id GROUP_ID -- can be mapped to pbl.attribute1 also
,ABS(MOD(dbms_random.random,999)) RECORD_NUMBER -- can be mappedto pbl.attribute2 also
,null ERROR_CODE
,null ERROR_REASON
,pbl.attribute3 BUDGET_LEVEL_ID
,pbl.attribute4 BUDGETING_SEGMENTS
,pbl.attribute5 TRANSACTION_TYPE
,pbl.attribute6 SUB_TYPE
,pbl.attribute7 FUND_VALUE
,pbl.attribute8 PERIOD_NAME
,pbl.attribute9 SEGMENT1_30
,pbl.attribute10 INCREASE_DECREASE_FLAG
,pbl.attribute11 AMOUNT
,pbl.attribute12 DOC_NUMBER
,null ATTRIBUTE1
,null ATTRIBUTE2
,null ATTRIBUTE3
,null ATTRIBUTE4
,null ATTRIBUTE5
,null ATTRIBUTE6
,null ATTRIBUTE7
,null ATTRIBUTE8
,null ATTRIBUTE9
,null ATTRIBUTE10
,null ATTRIBUTE11
,null ATTRIBUTE12
,null ATTRIBUTE13
,null ATTRIBUTE14
,null ATTRIBUTE15
,null ATTRIBUTE_CATEGORY
,'N' PROCESSED_FLAG
,'NEW' STATUS
,pbl.CREATION_DATE DATE_CREATED
,pbl.CREATED_BY CREATED_BY
,'N' CORRECTED_FLAG
,null LAST_UPDATE_DATE
,null LAST_UPDATED_BY
,pbl.START_DATE GL_DATE
,null PUBLIC_LAW_CODE
,null ADVANCE_TYPE
,null DEPT_ID
,null MAIN_ACCOUNT
,null TRANSFER_DESCRIPTION
,usr_id BUDGET_USER_ID
from PA_PROJECTS_ALL ppa
,PA_PROJECT_TYPES_ALL ppt
,PA_IMPLEMENTATIONS_ALL pia
,PA_BUDGET_VERSIONS pbv
,PA_BUDGET_LINES pbl
,PA_RESOURCE_ASSIGNMENTS pra
where ppa.project_id = p_project_id
and ppa.project_TYPE = ppt.project_type
and ppa.org_id = ppt.org_id
and ppa.project_id = pbv.project_id
and ppa.org_id = pia.org_id
and pbv.budget_version_id = pbl.budget_version_id
and pbv.budget_version_id = p_baselined_budget_version_id
and pbl.resource_assignment_id = pra.resource_assignment_id ;
SELECT ABS(MOD(dbms_random.random,999)),1003399 -- Please put the value of user_id as per your need.
into l_VER_GROUP_ID,l_user_id
FROM dual;
INSERT INTO FV_BE_INTERFACE_CONTROL
(
SOURCE
,GROUP_ID
,STATUS
,DATE_PROCESSED
,TIME_PROCESSED
)
VALUES
(
'PROJECTS'
,l_VER_GROUP_ID
,'NEW'
,to_char(sysdate,'DD-MON-YY')
,to_char(sysdate,'HH24:MI:SS')
);
,l_last_update_date
,l_last_updated_by
,l_gl_date
,l_public_law_code
,l_advance_type
,l_dept_id
,l_main_account
,l_transfer_description
,l_budget_user_id
LIMIT l_limit;
INSERT INTO FV_BE_INTERFACE
(
SET_OF_BOOKS_ID
,SOURCE
,GROUP_ID
,RECORD_NUMBER
,ERROR_CODE
,ERROR_REASON
,BUDGET_LEVEL_ID
,BUDGETING_SEGMENTS
,TRANSACTION_TYPE
,SUB_TYPE
,FUND_VALUE
,PERIOD_NAME
,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
,INCREASE_DECREASE_FLAG
,AMOUNT
,DOC_NUMBER
,ATTRIBUTE1
,ATTRIBUTE2
,ATTRIBUTE3
,ATTRIBUTE4
,ATTRIBUTE5
,ATTRIBUTE6
,ATTRIBUTE7
,ATTRIBUTE8
,ATTRIBUTE9
,ATTRIBUTE10
,ATTRIBUTE11
,ATTRIBUTE12
,ATTRIBUTE13
,ATTRIBUTE14
,ATTRIBUTE15
,ATTRIBUTE_CATEGORY
,PROCESSED_FLAG
,STATUS
,DATE_CREATED
,CREATED_BY
,CORRECTED_FLAG
,LAST_UPDATE_DATE
,LAST_UPDATED_BY
,GL_DATE
,PUBLIC_LAW_CODE
,ADVANCE_TYPE
,DEPT_ID
,MAIN_ACCOUNT
,TRANSFER_DESCRIPTION
,BUDGET_USER_ID
)
VALUES
(
l_set_of_books_id(i)
,l_source(i)
,l_group_id(i)
,l_record_number(i)
,l_error_code(i)
,l_error_reason(i)
,l_budget_level_id(i)
,l_budgeting_segments(i)
,l_transaction_type(i)
,l_sub_type(i)
,l_fund_value(i)
,l_period_name(i)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,1 )
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,2)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,3)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,4)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,5)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,6)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,7)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,8)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,9)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,10)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,11)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,12)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,13)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,14)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,15)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,16)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,17)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,18)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,19)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,20)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,21)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,22)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,23)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,24)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,25)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,26)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,27)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,28)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,29)
,REGEXP_SUBSTR(l_segment1_30(i),'[^.]+', 1,30)
,l_increase_decrease_flag(i)
,l_amount(i)
,l_doc_number(i)
,l_attribute1(i)
,l_attribute2(i)
,l_attribute3(i)
,l_attribute4(i)
,l_attribute5(i)
,l_attribute6(i)
,l_attribute7(i)
,l_attribute8(i)
,l_attribute9(i)
,l_attribute10(i)
,l_attribute11(i)
,l_attribute12(i)
,l_attribute13(i)
,l_attribute14(i)
,l_attribute15(i)
,l_attribute_category(i)
,l_processed_flag(i)
,l_status(i)
,l_date_created(i)
,l_created_by(i)
,l_corrected_flag(i)
,l_last_update_date(i)
,l_last_updated_by(i)
,l_gl_date(i)
,l_public_law_code(i)
,l_advance_type(i)
,l_dept_id(i)
,l_main_account(i)
,l_transfer_description(i)
,l_budget_user_id(i)
);
END INSERT_BUDGET_LINES;