Ako aktualizovať kurzor pomocou COBOL

Kurzor je ukazovateľ polohy na obrazovke terminálu ze az /OS sálového počítača operačný systém . To umožňuje užívateľom prechádzať výsledku dotazu , ktorý môže obsahovať viac riadkov dát , alebo aby všetky príslušné riadky viditeľné . Užívateľ môže poukázať na jednom riadku vo výsledku dotazu , ktorý je spojený s príkazom SELECT . Tento príkaz prepojenie s kurzorom a vykoná príkaz OPEN CURSOR . Môžete aktualizovať kurzor v príkaze SQL pomocou UPDATE klauzuly v COBOL programe . Návod dovolená 1

typ " Upraviť " na " > " z /OS pre správu systému konzoly príkazového riadku a stlačte
2 < P " Enter " upravovať svoje COBOL program . > Pridajte nasledujúci kód po sekcii " EXEC SQL " vášho programu :

EXEC SQL DECLARE Cursor2

CURSOR na predaj

SELECT PARTNAME , SALESPRICE

Z PURCHDB.PARTS

KDE PartNumber MEDZI : nízke hodnoty A : . HIGHVALUE

FOR UPDATE OF SALESPRICE

END - EXEC

EXEC SQL OPEN Cursor2 END - . EXEC

EXEC SQL FETCH Cursor2

DO : PARTNAME : PARTNAMEIND ,

: SALESPRICE : . SALESPRICEIND

END - EXEC

UPDATE PURCHDB.PARTS EXEC SQL

SET SALESPRICE = : . NEWSALESPRICE klipart

WHERE CURRENT OF Cursor2

END - EXEC

" PARTNAME " a " SALESPRICE " sú tabuľky stĺpca " PURCHDB " zásob náhradných dielov databáze a môže byť nahradené iným databázy a nastavenie stĺpcov .
3

zadajte " Uložiť " na ovládacom paneli a stlačte " enter " kláves aktualizovať operátora CURSOR pre " SALESPRICE " stĺpca v COBOL programe .

• Predchádzajúca strana: Ako pridať vyhľadávacie pole do študenské práce navigačné panely 
• Ďalšia strana: Ako odstrániť text z textové pole v NET .