APPS.GMS_UTILITY dependencies on DBMS_SQL

Line 17: cur_select := DBMS_SQL.OPEN_CURSOR;

13: X_sql := 'Select award_number '
14: ||' from gms_awards where '
15: ||' award_id = :Award_Id ';
16:
17: cur_select := DBMS_SQL.OPEN_CURSOR;
18:
19:
20:
21: DBMS_SQL.PARSE(cur_select,X_sql,dbms_sql.native);

Line 21: DBMS_SQL.PARSE(cur_select,X_sql,dbms_sql.native);

17: cur_select := DBMS_SQL.OPEN_CURSOR;
18:
19:
20:
21: DBMS_SQL.PARSE(cur_select,X_sql,dbms_sql.native);
22:
23: DBMS_SQL.BIND_VARIABLE(cur_select,':Award_Id', P_Award_Id);
24:
25: DBMS_SQL.DEFINE_COLUMN(cur_select, 1 , X_Award_Number, 15);

Line 23: DBMS_SQL.BIND_VARIABLE(cur_select,':Award_Id', P_Award_Id);

19:
20:
21: DBMS_SQL.PARSE(cur_select,X_sql,dbms_sql.native);
22:
23: DBMS_SQL.BIND_VARIABLE(cur_select,':Award_Id', P_Award_Id);
24:
25: DBMS_SQL.DEFINE_COLUMN(cur_select, 1 , X_Award_Number, 15);
26:
27: X_Rows_Processed := DBMS_SQL.EXECUTE(cur_select);

Line 25: DBMS_SQL.DEFINE_COLUMN(cur_select, 1 , X_Award_Number, 15);

21: DBMS_SQL.PARSE(cur_select,X_sql,dbms_sql.native);
22:
23: DBMS_SQL.BIND_VARIABLE(cur_select,':Award_Id', P_Award_Id);
24:
25: DBMS_SQL.DEFINE_COLUMN(cur_select, 1 , X_Award_Number, 15);
26:
27: X_Rows_Processed := DBMS_SQL.EXECUTE(cur_select);
28:
29:

Line 27: X_Rows_Processed := DBMS_SQL.EXECUTE(cur_select);

23: DBMS_SQL.BIND_VARIABLE(cur_select,':Award_Id', P_Award_Id);
24:
25: DBMS_SQL.DEFINE_COLUMN(cur_select, 1 , X_Award_Number, 15);
26:
27: X_Rows_Processed := DBMS_SQL.EXECUTE(cur_select);
28:
29:
30: If DBMS_SQL.FETCH_ROWS(cur_select) > 0 then
31:

Line 30: If DBMS_SQL.FETCH_ROWS(cur_select) > 0 then

26:
27: X_Rows_Processed := DBMS_SQL.EXECUTE(cur_select);
28:
29:
30: If DBMS_SQL.FETCH_ROWS(cur_select) > 0 then
31:
32: DBMS_SQL.COLUMN_VALUE(cur_select,1 , X_Award_Number);
33: End If;
34:

Line 32: DBMS_SQL.COLUMN_VALUE(cur_select,1 , X_Award_Number);

28:
29:
30: If DBMS_SQL.FETCH_ROWS(cur_select) > 0 then
31:
32: DBMS_SQL.COLUMN_VALUE(cur_select,1 , X_Award_Number);
33: End If;
34:
35:
36: RETURN X_Award_Number;

Line 91: cursor_name := dbms_sql.open_cursor;

87: end if;
88: l_gms_return_code := x_gms_return_code ;
89: l_gl_return_code := x_gl_return_code ;
90:
91: cursor_name := dbms_sql.open_cursor;
92:
93:
94: proc_stat := 'declare gms_code_local VARCHAR2(1); '||
95: ' gms_e_code VARCHAR2(1); gl_code_local VARCHAR2(1); gms_e_stage VARCHAR2(1000); '||

Line 111: dbms_sql.parse(cursor_name,proc_stat,dbms_sql.native);

107: 'end if; end;';
108:
109:
110: x_error_message := 'Error in PARSE ';
111: dbms_sql.parse(cursor_name,proc_stat,dbms_sql.native);
112:
113:
114: x_error_message := 'Error in BIND ';
115: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_CODE_LOCAL', 'X', 1);

Line 115: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_CODE_LOCAL', 'X', 1);

111: dbms_sql.parse(cursor_name,proc_stat,dbms_sql.native);
112:
113:
114: x_error_message := 'Error in BIND ';
115: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_CODE_LOCAL', 'X', 1);
116: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );
117: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);
118: x_gms_sob_id := to_char(x_sob_id) ;
119: x_gms_packet_id := to_char(x_packet_id) ;

Line 116: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );

112:
113:
114: x_error_message := 'Error in BIND ';
115: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_CODE_LOCAL', 'X', 1);
116: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );
117: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);
118: x_gms_sob_id := to_char(x_sob_id) ;
119: x_gms_packet_id := to_char(x_packet_id) ;
120: x_uid := to_char(x_user_id) ;

Line 117: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);

113:
114: x_error_message := 'Error in BIND ';
115: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_CODE_LOCAL', 'X', 1);
116: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );
117: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);
118: x_gms_sob_id := to_char(x_sob_id) ;
119: x_gms_packet_id := to_char(x_packet_id) ;
120: x_uid := to_char(x_user_id) ;
121: x_uir_id := to_char(x_user_resp_id) ;

Line 122: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_SOB_ID',x_gms_sob_id,20) ;

118: x_gms_sob_id := to_char(x_sob_id) ;
119: x_gms_packet_id := to_char(x_packet_id) ;
120: x_uid := to_char(x_user_id) ;
121: x_uir_id := to_char(x_user_resp_id) ;
122: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_SOB_ID',x_gms_sob_id,20) ;
123: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID',x_gms_packet_id,20) ;
124: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE',x_fcmode,2) ;
125: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE_FLAG',x_override_flag,2) ;
126: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;

Line 123: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID',x_gms_packet_id,20) ;

119: x_gms_packet_id := to_char(x_packet_id) ;
120: x_uid := to_char(x_user_id) ;
121: x_uir_id := to_char(x_user_resp_id) ;
122: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_SOB_ID',x_gms_sob_id,20) ;
123: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID',x_gms_packet_id,20) ;
124: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE',x_fcmode,2) ;
125: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE_FLAG',x_override_flag,2) ;
126: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;
127: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;

Line 124: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE',x_fcmode,2) ;

120: x_uid := to_char(x_user_id) ;
121: x_uir_id := to_char(x_user_resp_id) ;
122: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_SOB_ID',x_gms_sob_id,20) ;
123: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID',x_gms_packet_id,20) ;
124: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE',x_fcmode,2) ;
125: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE_FLAG',x_override_flag,2) ;
126: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;
127: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;
128: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_ID',x_uid,20) ;

Line 125: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE_FLAG',x_override_flag,2) ;

121: x_uir_id := to_char(x_user_resp_id) ;
122: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_SOB_ID',x_gms_sob_id,20) ;
123: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID',x_gms_packet_id,20) ;
124: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE',x_fcmode,2) ;
125: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE_FLAG',x_override_flag,2) ;
126: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;
127: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;
128: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_ID',x_uid,20) ;
129: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_RESP_ID',x_uir_id,20) ;

Line 126: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;

122: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_SOB_ID',x_gms_sob_id,20) ;
123: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID',x_gms_packet_id,20) ;
124: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE',x_fcmode,2) ;
125: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE_FLAG',x_override_flag,2) ;
126: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;
127: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;
128: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_ID',x_uid,20) ;
129: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_RESP_ID',x_uir_id,20) ;
130:

Line 127: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;

123: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID',x_gms_packet_id,20) ;
124: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE',x_fcmode,2) ;
125: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE_FLAG',x_override_flag,2) ;
126: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;
127: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;
128: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_ID',x_uid,20) ;
129: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_RESP_ID',x_uir_id,20) ;
130:
131:

Line 128: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_ID',x_uid,20) ;

124: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE',x_fcmode,2) ;
125: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE_FLAG',x_override_flag,2) ;
126: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;
127: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;
128: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_ID',x_uid,20) ;
129: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_RESP_ID',x_uir_id,20) ;
130:
131:
132: fck_processed := dbms_sql.execute(cursor_name);

Line 129: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_RESP_ID',x_uir_id,20) ;

125: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE_FLAG',x_override_flag,2) ;
126: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;
127: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;
128: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_ID',x_uid,20) ;
129: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_RESP_ID',x_uir_id,20) ;
130:
131:
132: fck_processed := dbms_sql.execute(cursor_name);
133:

Line 132: fck_processed := dbms_sql.execute(cursor_name);

128: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_ID',x_uid,20) ;
129: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_RESP_ID',x_uir_id,20) ;
130:
131:
132: fck_processed := dbms_sql.execute(cursor_name);
133:
134: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_CODE_LOCAL', L_gms_return_code);
135: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_CODE', X_gms_e_code);
136: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_STAGE',X_gms_e_stage);

Line 134: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_CODE_LOCAL', L_gms_return_code);

130:
131:
132: fck_processed := dbms_sql.execute(cursor_name);
133:
134: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_CODE_LOCAL', L_gms_return_code);
135: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_CODE', X_gms_e_code);
136: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_STAGE',X_gms_e_stage);
137:
138: dbms_sql.close_cursor(cursor_name);

Line 135: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_CODE', X_gms_e_code);

131:
132: fck_processed := dbms_sql.execute(cursor_name);
133:
134: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_CODE_LOCAL', L_gms_return_code);
135: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_CODE', X_gms_e_code);
136: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_STAGE',X_gms_e_stage);
137:
138: dbms_sql.close_cursor(cursor_name);
139: if l_gms_return_code in ('F','T') then

Line 136: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_STAGE',X_gms_e_stage);

132: fck_processed := dbms_sql.execute(cursor_name);
133:
134: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_CODE_LOCAL', L_gms_return_code);
135: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_CODE', X_gms_e_code);
136: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_STAGE',X_gms_e_stage);
137:
138: dbms_sql.close_cursor(cursor_name);
139: if l_gms_return_code in ('F','T') then
140: if l_gms_return_code in ('F') then

Line 138: dbms_sql.close_cursor(cursor_name);

134: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_CODE_LOCAL', L_gms_return_code);
135: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_CODE', X_gms_e_code);
136: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_STAGE',X_gms_e_stage);
137:
138: dbms_sql.close_cursor(cursor_name);
139: if l_gms_return_code in ('F','T') then
140: if l_gms_return_code in ('F') then
141: update gl_bc_packets gl
142: set gl.status_code = 'R'

Line 160: dbms_sql.close_cursor(cursor_name);

156: X_gl_return_code := l_gl_return_code ;
157:
158: EXCEPTION
159: WHEN OTHERS THEN
160: dbms_sql.close_cursor(cursor_name);
161: X_gms_return_code := L_gms_return_code ;
162: X_gl_return_code := l_gl_return_code ;
163:
164: end gms_util_fck;

Line 237: cursor_name := dbms_sql.open_cursor;

233: else
234: l_mode := x_fcmode;
235: end if;
236: ------------------------------------------------------
237: cursor_name := dbms_sql.open_cursor;
238:
239:
240: proc_stat := 'declare gms_code_local VARCHAR2(1); '||
241: ' gms_e_code VARCHAR2(1); gms_e_stage VARCHAR2(1000); '||

Line 254: dbms_sql.parse(cursor_name,proc_stat,dbms_sql.native);

250: 'end if; end;';
251:
252:
253: x_error_message := 'Error in PARSE ';
254: dbms_sql.parse(cursor_name,proc_stat,dbms_sql.native);
255:
256: --
257: -- BUG 3523587
258: -- GMS funds checking integrations with ap autonomous funds checking code.

Line 265: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_CODE_LOCAL', 'X', 1);

261: -- R12 Fundscheck Management uptake: obsoleted procedure call
262: -- create_duplicate_adls(x_packet_id) ;
263:
264: x_error_message := 'Error in BIND ';
265: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_CODE_LOCAL', 'X', 1);
266: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );
267: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);
268: x_gms_sob_id := to_char(x_sob_id) ;
269: x_gms_packet_id := to_char(x_packet_id) ;

Line 266: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );

262: -- create_duplicate_adls(x_packet_id) ;
263:
264: x_error_message := 'Error in BIND ';
265: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_CODE_LOCAL', 'X', 1);
266: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );
267: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);
268: x_gms_sob_id := to_char(x_sob_id) ;
269: x_gms_packet_id := to_char(x_packet_id) ;
270: x_uid := to_char(x_user_id) ;

Line 267: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);

263:
264: x_error_message := 'Error in BIND ';
265: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_CODE_LOCAL', 'X', 1);
266: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );
267: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);
268: x_gms_sob_id := to_char(x_sob_id) ;
269: x_gms_packet_id := to_char(x_packet_id) ;
270: x_uid := to_char(x_user_id) ;
271: x_uir_id := to_char(x_user_resp_id) ;

Line 272: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_SOB_ID',x_gms_sob_id,20);

268: x_gms_sob_id := to_char(x_sob_id) ;
269: x_gms_packet_id := to_char(x_packet_id) ;
270: x_uid := to_char(x_user_id) ;
271: x_uir_id := to_char(x_user_resp_id) ;
272: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_SOB_ID',x_gms_sob_id,20);
273: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID',x_gms_packet_id,20) ;
274: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FCMODE',l_mode,2) ;
275: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE',x_OVERRIDE,2) ;
276: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;

Line 273: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID',x_gms_packet_id,20) ;

269: x_gms_packet_id := to_char(x_packet_id) ;
270: x_uid := to_char(x_user_id) ;
271: x_uir_id := to_char(x_user_resp_id) ;
272: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_SOB_ID',x_gms_sob_id,20);
273: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID',x_gms_packet_id,20) ;
274: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FCMODE',l_mode,2) ;
275: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE',x_OVERRIDE,2) ;
276: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;
277: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;

Line 274: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FCMODE',l_mode,2) ;

270: x_uid := to_char(x_user_id) ;
271: x_uir_id := to_char(x_user_resp_id) ;
272: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_SOB_ID',x_gms_sob_id,20);
273: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID',x_gms_packet_id,20) ;
274: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FCMODE',l_mode,2) ;
275: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE',x_OVERRIDE,2) ;
276: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;
277: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;
278: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_ID',x_uid,20) ;

Line 275: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE',x_OVERRIDE,2) ;

271: x_uir_id := to_char(x_user_resp_id) ;
272: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_SOB_ID',x_gms_sob_id,20);
273: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID',x_gms_packet_id,20) ;
274: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FCMODE',l_mode,2) ;
275: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE',x_OVERRIDE,2) ;
276: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;
277: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;
278: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_ID',x_uid,20) ;
279: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_RESP_ID',x_uir_id,20) ;

Line 276: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;

272: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_SOB_ID',x_gms_sob_id,20);
273: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID',x_gms_packet_id,20) ;
274: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FCMODE',l_mode,2) ;
275: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE',x_OVERRIDE,2) ;
276: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;
277: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;
278: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_ID',x_uid,20) ;
279: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_RESP_ID',x_uir_id,20) ;
280:

Line 277: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;

273: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID',x_gms_packet_id,20) ;
274: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FCMODE',l_mode,2) ;
275: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE',x_OVERRIDE,2) ;
276: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;
277: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;
278: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_ID',x_uid,20) ;
279: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_RESP_ID',x_uir_id,20) ;
280:
281: fck_processed := dbms_sql.execute(cursor_name);

Line 278: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_ID',x_uid,20) ;

274: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FCMODE',l_mode,2) ;
275: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE',x_OVERRIDE,2) ;
276: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;
277: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;
278: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_ID',x_uid,20) ;
279: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_RESP_ID',x_uir_id,20) ;
280:
281: fck_processed := dbms_sql.execute(cursor_name);
282:

Line 279: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_RESP_ID',x_uir_id,20) ;

275: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_OVERRIDE',x_OVERRIDE,2) ;
276: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_FLAG',x_flag,2) ;
277: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;
278: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_ID',x_uid,20) ;
279: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_RESP_ID',x_uir_id,20) ;
280:
281: fck_processed := dbms_sql.execute(cursor_name);
282:
283: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_CODE_LOCAL', l_gms_return_code);

Line 281: fck_processed := dbms_sql.execute(cursor_name);

277: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL',x_partial,2) ;
278: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_ID',x_uid,20) ;
279: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_RESP_ID',x_uir_id,20) ;
280:
281: fck_processed := dbms_sql.execute(cursor_name);
282:
283: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_CODE_LOCAL', l_gms_return_code);
284: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_CODE', X_gms_e_code);
285: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_STAGE',X_gms_e_stage);

Line 283: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_CODE_LOCAL', l_gms_return_code);

279: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_USER_RESP_ID',x_uir_id,20) ;
280:
281: fck_processed := dbms_sql.execute(cursor_name);
282:
283: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_CODE_LOCAL', l_gms_return_code);
284: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_CODE', X_gms_e_code);
285: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_STAGE',X_gms_e_stage);
286:
287:

Line 284: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_CODE', X_gms_e_code);

280:
281: fck_processed := dbms_sql.execute(cursor_name);
282:
283: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_CODE_LOCAL', l_gms_return_code);
284: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_CODE', X_gms_e_code);
285: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_STAGE',X_gms_e_stage);
286:
287:
288:

Line 285: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_STAGE',X_gms_e_stage);

281: fck_processed := dbms_sql.execute(cursor_name);
282:
283: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_CODE_LOCAL', l_gms_return_code);
284: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_CODE', X_gms_e_code);
285: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_STAGE',X_gms_e_stage);
286:
287:
288:
289: dbms_sql.close_cursor(cursor_name);

Line 289: dbms_sql.close_cursor(cursor_name);

285: DBMS_SQL.VARIABLE_VALUE(cursor_name,':GMS_E_STAGE',X_gms_e_stage);
286:
287:
288:
289: dbms_sql.close_cursor(cursor_name);
290: --
291: -- BUG 3523587
292: -- GMS funds checking integrations with ap autonomous funds checking code.
293: --

Line 305: dbms_sql.close_cursor(cursor_name);

301:
302: EXCEPTION
303: WHEN OTHERS THEN
304: l_gms_return_code := 'T';
305: dbms_sql.close_cursor(cursor_name);
306:
307: l_gms_return_code := 'T';
308:
309: x_gms_e_stage := substr('gms_utility.gms_util_pc_fck:'||SQLCODE||':'||SQLERRM,1,2000);

Line 431: cursor_name := dbms_sql.open_cursor;

427: end;';
428:
429: END IF ;
430:
431: cursor_name := dbms_sql.open_cursor;
432: dbms_sql.parse(cursor_name,proc_stat,dbms_sql.native);
433: x_gms_packet_id := to_char(x_packet_id) ;
434: DBMS_SQL.BIND_VARIABLE(cursor_name,':x_gl_return_code_local', l_gl_return_code, 1);
435: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID', x_gms_packet_id, 20);

Line 432: dbms_sql.parse(cursor_name,proc_stat,dbms_sql.native);

428:
429: END IF ;
430:
431: cursor_name := dbms_sql.open_cursor;
432: dbms_sql.parse(cursor_name,proc_stat,dbms_sql.native);
433: x_gms_packet_id := to_char(x_packet_id) ;
434: DBMS_SQL.BIND_VARIABLE(cursor_name,':x_gl_return_code_local', l_gl_return_code, 1);
435: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID', x_gms_packet_id, 20);
436: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE', l_MODE, 2);

Line 434: DBMS_SQL.BIND_VARIABLE(cursor_name,':x_gl_return_code_local', l_gl_return_code, 1);

430:
431: cursor_name := dbms_sql.open_cursor;
432: dbms_sql.parse(cursor_name,proc_stat,dbms_sql.native);
433: x_gms_packet_id := to_char(x_packet_id) ;
434: DBMS_SQL.BIND_VARIABLE(cursor_name,':x_gl_return_code_local', l_gl_return_code, 1);
435: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID', x_gms_packet_id, 20);
436: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE', l_MODE, 2);
437: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_RETURN_CODE', x_gms_return_code, 2);
438: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL_RESV_FLAG', x_partial_resv_flag, 2);

Line 435: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID', x_gms_packet_id, 20);

431: cursor_name := dbms_sql.open_cursor;
432: dbms_sql.parse(cursor_name,proc_stat,dbms_sql.native);
433: x_gms_packet_id := to_char(x_packet_id) ;
434: DBMS_SQL.BIND_VARIABLE(cursor_name,':x_gl_return_code_local', l_gl_return_code, 1);
435: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID', x_gms_packet_id, 20);
436: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE', l_MODE, 2);
437: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_RETURN_CODE', x_gms_return_code, 2);
438: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL_RESV_FLAG', x_partial_resv_flag, 2);
439: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );

Line 436: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE', l_MODE, 2);

432: dbms_sql.parse(cursor_name,proc_stat,dbms_sql.native);
433: x_gms_packet_id := to_char(x_packet_id) ;
434: DBMS_SQL.BIND_VARIABLE(cursor_name,':x_gl_return_code_local', l_gl_return_code, 1);
435: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID', x_gms_packet_id, 20);
436: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE', l_MODE, 2);
437: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_RETURN_CODE', x_gms_return_code, 2);
438: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL_RESV_FLAG', x_partial_resv_flag, 2);
439: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );
440: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);

Line 437: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_RETURN_CODE', x_gms_return_code, 2);

433: x_gms_packet_id := to_char(x_packet_id) ;
434: DBMS_SQL.BIND_VARIABLE(cursor_name,':x_gl_return_code_local', l_gl_return_code, 1);
435: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID', x_gms_packet_id, 20);
436: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE', l_MODE, 2);
437: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_RETURN_CODE', x_gms_return_code, 2);
438: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL_RESV_FLAG', x_partial_resv_flag, 2);
439: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );
440: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);
441: stat_processed := dbms_sql.execute(cursor_name);

Line 438: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL_RESV_FLAG', x_partial_resv_flag, 2);

434: DBMS_SQL.BIND_VARIABLE(cursor_name,':x_gl_return_code_local', l_gl_return_code, 1);
435: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID', x_gms_packet_id, 20);
436: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE', l_MODE, 2);
437: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_RETURN_CODE', x_gms_return_code, 2);
438: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL_RESV_FLAG', x_partial_resv_flag, 2);
439: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );
440: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);
441: stat_processed := dbms_sql.execute(cursor_name);
442: DBMS_SQL.VARIABLE_VALUE(cursor_name,':x_gl_return_code_local', l_gl_return_code);

Line 439: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );

435: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PACKET_ID', x_gms_packet_id, 20);
436: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE', l_MODE, 2);
437: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_RETURN_CODE', x_gms_return_code, 2);
438: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL_RESV_FLAG', x_partial_resv_flag, 2);
439: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );
440: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);
441: stat_processed := dbms_sql.execute(cursor_name);
442: DBMS_SQL.VARIABLE_VALUE(cursor_name,':x_gl_return_code_local', l_gl_return_code);
443: dbms_sql.close_cursor(cursor_name);

Line 440: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);

436: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_MODE', l_MODE, 2);
437: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_RETURN_CODE', x_gms_return_code, 2);
438: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL_RESV_FLAG', x_partial_resv_flag, 2);
439: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );
440: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);
441: stat_processed := dbms_sql.execute(cursor_name);
442: DBMS_SQL.VARIABLE_VALUE(cursor_name,':x_gl_return_code_local', l_gl_return_code);
443: dbms_sql.close_cursor(cursor_name);
444: end if;

Line 441: stat_processed := dbms_sql.execute(cursor_name);

437: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_RETURN_CODE', x_gms_return_code, 2);
438: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL_RESV_FLAG', x_partial_resv_flag, 2);
439: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );
440: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);
441: stat_processed := dbms_sql.execute(cursor_name);
442: DBMS_SQL.VARIABLE_VALUE(cursor_name,':x_gl_return_code_local', l_gl_return_code);
443: dbms_sql.close_cursor(cursor_name);
444: end if;
445: x_gl_return_code := l_gl_return_code ;

Line 442: DBMS_SQL.VARIABLE_VALUE(cursor_name,':x_gl_return_code_local', l_gl_return_code);

438: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_PARTIAL_RESV_FLAG', x_partial_resv_flag, 2);
439: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );
440: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);
441: stat_processed := dbms_sql.execute(cursor_name);
442: DBMS_SQL.VARIABLE_VALUE(cursor_name,':x_gl_return_code_local', l_gl_return_code);
443: dbms_sql.close_cursor(cursor_name);
444: end if;
445: x_gl_return_code := l_gl_return_code ;
446:

Line 443: dbms_sql.close_cursor(cursor_name);

439: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_CODE', 'E_X' ,10 );
440: DBMS_SQL.BIND_VARIABLE(cursor_name,':GMS_E_STAGE', 'E_STG', 1000);
441: stat_processed := dbms_sql.execute(cursor_name);
442: DBMS_SQL.VARIABLE_VALUE(cursor_name,':x_gl_return_code_local', l_gl_return_code);
443: dbms_sql.close_cursor(cursor_name);
444: end if;
445: x_gl_return_code := l_gl_return_code ;
446:
447: EXCEPTION

Line 449: dbms_sql.close_cursor(cursor_name);

445: x_gl_return_code := l_gl_return_code ;
446:
447: EXCEPTION
448: WHEN OTHERS THEN
449: dbms_sql.close_cursor(cursor_name);
450:
451: l_gl_return_code := 'Z';
452:
453: gms_e_stage := substr('gms_utility.gms_util_gl_return_code:'||SQLCODE||':'||SQLERRM,1,2000);