Markören är en lägesindikering på terminalen skärmen av az /OS stordator operativsystem . Den tillåter användare att navigera ett frågeresultat som kan innehålla flera rader med data eller att göra alla relevanta rader synliga . Användaren kan peka på en rad i ett frågeresultat som är associerad med ett SELECT kommando. Detta kommando länkar med en markör och exekverar OPEN CURSOR kommandot . Du kan uppdatera en markör i en SQL-sats med uppdatering av klausulen i din COBOL -program . Instruktioner
1
Type " Redigera " vid " > " z /OS -system management console prompten och tryck på " Enter " -tangenten för att redigera din COBOL- program .
2
Lägg till följande kod efter " EXEC SQL " i ditt program :
EXEC SQL FÖRKLARA CURSOR2
CURSOR för iPhonen
SELECT PARTNAME , Säljpris
FRÅN PURCHDB.PARTS
VAR PARTNUMBER MELLAN : lågvärdig AND : . HIGHVALUE
FOR UPDATE OF Säljpris
END - EXEC
EXEC SQL OPEN CURSOR2 END - . EXEC
EXEC SQL FETCH CURSOR2
INTO : PARTNAME : PARTNAMEIND ,
: Säljpris : . SALESPRICEIND
END - EXEC
EXEC SQL UPDATE PURCHDB.PARTS
SET Säljpris = : . NEWSALESPRICE
WHERE CURRENT OF CURSOR2
END - EXEC
" PARTNAME " och " Säljpris " är tabellens kolumner i " PURCHDB " inventering delar databas och kan ersättas med en annan databas och uppsättning kolumner .
3
Type " Spara " på konsolen och tryck på " Enter " för att uppdatera CURSOR operatören för " Säljpris " kolumn i COBOL -program .