![oracle 6i oracle 6i](https://4.bp.blogspot.com/-MspGQ3wK41A/WtSCOJeo8DI/AAAAAAAAVEo/GJdARn5uy4Qdv24g4i2rJdS-LwRZGDOCACEwYBhgL/s1600/1.png)
WHILE EXEC_SQL.FETCH_ROWS(cursor_number)> 0 LOOPĮXEC_SQL.COLUMN_VALUE(cursor_number,1,ins_reg_no) IF(to_number(:global.ins_last_record_click) != 0)THEN
![oracle 6i oracle 6i](https://i.ytimg.com/vi/Ez8SBmMsMJw/hqdefault.jpg)
:global.ins_last_record_click := totalRecords ĮXEC_SQL.CLOSE_CURSOR(recordcount_cursor_number) -very important to close cursor since system can freeze when navigating records SET_ITEM_PROPERTY(CURSOR_STYLE,'BUSY') ĮXEC_SQL.COLUMN_VALUE(recordcount_cursor_number,1,totalRecords) WHILE EXEC_SQL.FETCH_ROWS(recordcount_cursor_number)> 0 LOOP Define the cloums for the data to be returnedĮXEC_SQL.DEFINE_COLUMN(cursor_number,1, ins_reg_no) ĮXEC_SQL.DEFINE_COLUMN(recordcount_cursor_number,1,totalRecords) Ĭount := EXEC_SQL.EXECUTE(cursor_number) ĬountRec := EXEC_SQL.EXECUTE(recordcount_cursor_number) Sql_CountStmt := 'SELECT COUNT(DISTINCT(ins_reg_no))FROM table WHERE 1 = 1 '||:global.ins_last_where_clause -dynamic whereĮXEC_SQL.PARSE(recordcount_cursor_number, Sql_CountStmt) cannot use the dynamic where since this changes based on rowid FROM table WHERE 1 = 1 '||where_clause ||' order by surname' -dynamic where Recordcount_cursor_number := Exec_SQL.Open_cursor
![oracle 6i oracle 6i](https://fiverr-res.cloudinary.com/images/q_auto,f_auto/gigs/114141307/original/a52a5c5153173680d5e3d1256b396f0cf288e297/create-desktop-application-in-oracle-forms-and-reports.png)
The query is returning the records i am just having problems accessing it thru navigation buttons in a single record block.
#Oracle 6i code#
This code fires every time the user clicks on the 'first','previous','next' and 'last' buttons on the toolbar. No errors just the record is not going to the next record I am using a single block record however i am unable to navigate between records when i say next_record i am not moving. I am using oracle forms 6i and i am have created a dynamic sql using EXEC_SQL.