The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE insert_row (
x_rowid IN OUT NOCOPY varchar2
,x_ORG_LABOR_SCH_RULE_ID IN OUT NOCOPY number
,p_ORGANIZATION_ID IN number
,p_ORG_ID IN number
,p_LABOR_COSTING_RULE IN varchar2
,p_COST_RATE_SCH_ID IN number
,p_OVERTIME_PROJECT_ID IN number
,p_OVERTIME_TASK_ID IN number
,p_ACCT_RATE_DATE_CODE IN varchar2
,p_ACCT_RATE_TYPE IN varchar2
,p_ACCT_EXCHANGE_RATE IN number
,p_START_DATE_ACTIVE IN DATE
,p_END_DATE_ACTIVE IN DATE
,p_FORECAST_COST_RATE_SCH_ID IN number
,p_CREATION_DATE IN DATE
,p_CREATED_BY IN number
,p_LAST_UPDATE_DATE IN DATE
,p_LAST_UPDATED_BY IN number
,p_LAST_UPDATE_LOGIN IN number
,x_return_status IN OUT NOCOPY varchar2
,x_error_msg_code IN OUT NOCOPY varchar2
)IS
cursor return_rowid is
select rowid
from pa_org_labor_sch_rule
where ORG_LABOR_SCH_RULE_ID = x_ORG_LABOR_SCH_RULE_ID;
select pa_org_labor_sch_rule_s.nextval
from sys.dual;
INSERT into pa_org_labor_sch_rule
(
ORG_LABOR_SCH_RULE_ID
,ORGANIZATION_ID
,ORG_ID
,LABOR_COSTING_RULE
,COST_RATE_SCH_ID
,OVERTIME_PROJECT_ID
,OVERTIME_TASK_ID
,ACCT_RATE_DATE_CODE
,ACCT_RATE_TYPE
,ACCT_EXCHANGE_RATE
,START_DATE_ACTIVE
,END_DATE_ACTIVE
,FORECAST_COST_RATE_SCH_ID
,CREATION_DATE
,CREATED_BY
,LAST_UPDATE_DATE
,LAST_UPDATED_BY
,LAST_UPDATE_LOGIN
) VALUES
(
x_ORG_LABOR_SCH_RULE_ID
,p_ORGANIZATION_ID
,p_ORG_ID
,p_LABOR_COSTING_RULE
,p_COST_RATE_SCH_ID
,p_OVERTIME_PROJECT_ID
,p_OVERTIME_TASK_ID
,p_ACCT_RATE_DATE_CODE
,p_ACCT_RATE_TYPE
,p_ACCT_EXCHANGE_RATE
,p_START_DATE_ACTIVE
,p_END_DATE_ACTIVE
,p_FORECAST_COST_RATE_SCH_ID
,p_CREATION_DATE
,p_CREATED_BY
,p_LAST_UPDATE_DATE
,p_LAST_UPDATED_BY
,p_LAST_UPDATE_LOGIN
);
print_msg('rowid not found raise insert failed');
END insert_row;
PROCEDURE update_row
(
p_rowid IN varchar2
,p_ORG_LABOR_SCH_RULE_ID IN number
,p_ORGANIZATION_ID IN number
,p_ORG_ID IN number
,p_LABOR_COSTING_RULE IN varchar2
,p_COST_RATE_SCH_ID IN number
,p_OVERTIME_PROJECT_ID IN number
,p_OVERTIME_TASK_ID IN number
,p_ACCT_RATE_DATE_CODE IN varchar2
,p_ACCT_RATE_TYPE IN varchar2
,p_ACCT_EXCHANGE_RATE IN number
,p_START_DATE_ACTIVE IN DATE
,p_END_DATE_ACTIVE IN DATE
,p_FORECAST_COST_RATE_SCH_ID IN number
,p_CREATION_DATE IN DATE
,p_CREATED_BY IN number
,p_LAST_UPDATE_DATE IN DATE
,p_LAST_UPDATED_BY IN number
,p_LAST_UPDATE_LOGIN IN number
,x_return_status IN OUT NOCOPY varchar2
,x_error_msg_code IN OUT NOCOPY varchar2
)IS
CURSOR cur_row is
SELECT
ORGANIZATION_ID
,ORG_ID
,LABOR_COSTING_RULE
,COST_RATE_SCH_ID
,OVERTIME_PROJECT_ID
,OVERTIME_TASK_ID
,ACCT_RATE_DATE_CODE
,ACCT_RATE_TYPE
,ACCT_EXCHANGE_RATE
,START_DATE_ACTIVE
,END_DATE_ACTIVE
,FORECAST_COST_RATE_SCH_ID
FROM pa_org_labor_sch_rule
WHERE ORG_LABOR_SCH_RULE_ID = p_ORG_LABOR_SCH_RULE_ID
FOR UPDATE OF ORG_LABOR_SCH_RULE_ID NOWAIT;
print_msg('Inside update row.');
/** check if any of the attributes changed then update else donot **/
IF (Nvl(recinfo.org_id,0) <> nvl(p_org_id,0) OR
Nvl(recinfo.organization_id,0) <> nvl(p_organization_id,0) OR
Nvl(recinfo.labor_costing_rule,'X') <> nvl(p_labor_costing_rule,'X') OR
Nvl(recinfo.cost_rate_sch_id,0) <> nvl(p_cost_rate_sch_id,0) OR
Nvl(recinfo.overtime_project_id,0) <> nvl(p_overtime_project_id,0) OR
nvl(recinfo.overtime_task_id,0) <> nvl(p_overtime_task_id,0) OR
Nvl(recinfo.acct_rate_date_code,'X') <> nvl(p_acct_rate_date_code,'X') OR
Nvl(recinfo.acct_rate_type,'X') <> nvl(p_acct_rate_type,'X') OR
Nvl(recinfo.acct_exchange_rate,0) <> nvl(p_acct_exchange_rate,0) OR
Nvl(recinfo.start_date_active,trunc(sysdate)) <> nvl(p_start_date_active,trunc(sysdate)) OR
Nvl(recinfo.end_date_active,recinfo.start_date_active-1) <>
nvl(p_end_date_active,recinfo.start_date_active-1) OR
Nvl(recinfo.FORECAST_COST_RATE_SCH_ID,0) <> nvl(p_FORECAST_COST_RATE_SCH_ID,0) ) THEN
IF l_debug_mode = 'Y' THEN
print_msg('firing update query');
UPDATE pa_org_labor_sch_rule SET
ORGANIZATION_ID = p_ORGANIZATION_ID
,ORG_ID = p_ORG_ID
,LABOR_COSTING_RULE = p_LABOR_COSTING_RULE
,COST_RATE_SCH_ID = p_COST_RATE_SCH_ID
,OVERTIME_PROJECT_ID = p_OVERTIME_PROJECT_ID
,OVERTIME_TASK_ID = p_OVERTIME_TASK_ID
,ACCT_RATE_DATE_CODE = p_ACCT_RATE_DATE_CODE
,ACCT_RATE_TYPE = p_ACCT_RATE_TYPE
,ACCT_EXCHANGE_RATE = p_ACCT_EXCHANGE_RATE
,START_DATE_ACTIVE = p_START_DATE_ACTIVE
,END_DATE_ACTIVE = p_END_DATE_ACTIVE
,FORECAST_COST_RATE_SCH_ID = p_FORECAST_COST_RATE_SCH_ID
,LAST_UPDATE_DATE = p_LAST_UPDATE_DATE
,LAST_UPDATED_BY = p_LAST_UPDATED_BY
,LAST_UPDATE_LOGIN = p_LAST_UPDATE_LOGIN
WHERE ORG_LABOR_SCH_RULE_ID = p_ORG_LABOR_SCH_RULE_ID;
print_msg('Update failure:'||x_error_msg_code);
END update_row;
PROCEDURE delete_row (p_ORG_LABOR_SCH_RULE_ID in NUMBER)IS
l_debug_mode varchar2(1) := 'N';
DELETE FROM PA_ORG_LABOR_SCH_RULE
WHERE ORG_LABOR_SCH_RULE_ID = p_ORG_LABOR_SCH_RULE_ID;
print_msg('Delete Success');
print_msg('Delete Failure');
END delete_row;
PROCEDURE delete_row (x_rowid in VARCHAR2)IS
cursor get_itemid is
select ORG_LABOR_SCH_RULE_ID
from PA_ORG_LABOR_SCH_RULE
where rowid = x_rowid;
delete_row (l_ORG_LABOR_SCH_RULE_ID);
END delete_row;
SELECT
ORGANIZATION_ID
,ORG_ID
,LABOR_COSTING_RULE
,COST_RATE_SCH_ID
,OVERTIME_PROJECT_ID
,OVERTIME_TASK_ID
,ACCT_RATE_DATE_CODE
,ACCT_RATE_TYPE
,ACCT_EXCHANGE_RATE
,START_DATE_ACTIVE
,END_DATE_ACTIVE
,FORECAST_COST_RATE_SCH_ID
FROM pa_org_labor_sch_rule
WHERE ORG_LABOR_SCH_RULE_ID = p_ORG_LABOR_SCH_RULE_ID
FOR UPDATE OF ORG_LABOR_SCH_RULE_ID NOWAIT;
fnd_message.set_name('FND', 'FORM_RECORD_DELETED');