27: BEGIN
28: x_return_status := 'S';
29: x_error_msg_code := Null;
30:
31: print_msg('inserting row into pa_cint_exp_type_excl_all ');
32: INSERT INTO pa_cint_exp_type_excl_all
33: ( IND_COST_CODE
34: ,EXPENDITURE_TYPE
35: ,ORG_ID
28: x_return_status := 'S';
29: x_error_msg_code := Null;
30:
31: print_msg('inserting row into pa_cint_exp_type_excl_all ');
32: INSERT INTO pa_cint_exp_type_excl_all
33: ( IND_COST_CODE
34: ,EXPENDITURE_TYPE
35: ,ORG_ID
36: ,CREATION_DATE
51:
52: /* Retrive the rowid and pass it to Forms */
53: Select rowid
54: INTO x_rowid
55: FROM pa_cint_exp_type_excl_all
56: WHERE IND_COST_CODE = p_ind_cost_code
57: AND EXPENDITURE_TYPE = p_exp_type
58: AND ORG_ID = p_org_id;
59:
82:
83: x_return_status := 'S';
84: x_error_msg_code := Null;
85:
86: UPDATE pa_cint_exp_type_excl_all
87: SET expenditure_type = p_exp_type
88: ,LAST_UPDATED_BY =p_LAST_UPDATED_BY
89: ,LAST_UPDATE_DATE = p_LAST_UPDATE_DATE
90: ,LAST_UPDATE_LOGIN = p_LAST_UPDATE_LOGIN
103: ,p_exp_type IN varchar2
104: ,p_org_id IN NUMBER ) IS
105:
106: BEGIN
107: DELETE from pa_cint_exp_type_excl_all
108: WHERE ind_cost_code = p_ind_cost_code
109: AND expenditure_type = p_exp_type
110: AND org_id = p_org_id ;
111: