Il cursore è un indicatore di posizione nella finestra Terminale del sistema operativo del computer mainframe z /OS . Esso consente agli utenti di navigare risultato di una query che può contenere più righe di dati o per effettuare tutte le righe rilevanti visibili. L' utente può indicare una riga in un risultato di query che è associato con un comando SELECT . Questo si collega comando con un cursore ed esegue il comando OPEN cursore. È possibile aggiornare un cursore in un'istruzione SQL utilizzando l'aggiornamento clausola nel programma COBOL . Istruzioni
1

tipo " Modifica" in " > " console di gestione del sistema z /OS prompt e premere il tasto "Enter" per modificare il programma COBOL .
2 < p > Aggiungere il seguente codice dopo la sezione " EXEC SQL " del vostro programma :

EXEC SQL DECLARE Cursor2

CURSOR FOR

SELEZIONA NOMEPARTE , SALESPRICE

DA PURCHDB.PARTS

DOVE PARTNUMBER TRA : valore limitato E : . HIGHVALUE

FOR UPDATE OF SALESPRICE

END - EXEC

EXEC SQL APERTO Cursor2 END - . EXEC

EXEC SQL FETCH Cursor2

INTO : NOMEPARTE : PARTNAMEIND , Stati

: Prezzo di vendita : . SALESPRICEIND

END - EXEC

EXEC SQL UPDATE PURCHDB.PARTS

SET SALESPRICE = : . NEWSALESPRICE

WHERE CURRENT OF Cursor2

END - EXEC

" NOMEPARTE " e " SALESPRICE "sono le colonne della tabella del" PURCHDB " database di inventario delle parti e può essere sostituito con un altro database e set di colonne .
3

tipo " Salva " sulla console e premere il tasto" Invio " per aggiornare l'operatore cursore per il " colonna SALESPRICE " nel programma COBOL .