The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure formSelectOpen(cname in varchar2,
cprompt in varchar2 character set any_cs DEFAULT NULL,
nsize in integer DEFAULT NULL,
cattributes in varchar2 DEFAULT NULL) is
begin p(htf.formSelectOpen(cname,cprompt,nsize,cattributes)); end;
procedure formSelectOption(cvalue in varchar2 character set any_cs,
cselected in varchar2 DEFAULT NULL,
cattributes in varchar2 DEFAULT NULL) is
begin p(htf.formSelectOption(cvalue,cselected,cattributes)); end;
procedure formSelectClose is
begin p(htf.formSelectClose); end;
htbuf.delete;
htraws.delete;
-- Update rows_out for next fetch
rows_out := rows_out + irows;
/* Update buffer to contain remaining bytes */
buffer := substr(buffer,256);
/* Update buffer to contain remaining bytes */
buffer := substr(buffer, sp_loc + 1);
/* Update buffer to contain remaining bytes */
buffer := substr(buffer, nl_loc + 1);
select VALUE into nc_charset from V$NLS_PARAMETERS
where PARAMETER = 'NLS_NCHAR_CHARACTERSET';