|
Le curseur est un indicateur de position sur l'écran du terminal de système d'exploitation informatique mainframe z /OS . Il permet aux utilisateurs de naviguer d'un résultat de requête qui peut contenir plusieurs lignes de données ou de prendre toutes les lignes pertinentes visible. L'utilisateur peut pointer sur une ligne dans un résultat de requête qui est associé à une commande SELECT . Cette commande liens avec un curseur et exécute la commande Ouvrir le curseur. Vous pouvez mettre à jour un curseur dans une instruction SQL en utilisant la mise à jour clause dans votre programme COBOL . Instructions
1 type " Modifier " dans le ">" console de gestion système z /OS invite et appuyez sur la touche "Entrée" pour modifier votre programme COBOL .
2 Ajoutez le code suivant après la section "EXEC SQL" de votre programme :
EXEC SQL DECLARE CURSOR2
CURSOR pour ma SELECT partName , le Prix
D' PURCHDB.PARTS
OÙ PARTNUMBER ENTRE: ET de faible valeur : . HIGHVALUE
FOR UPDATE OF Le Prix
END-EXEC
EXEC SQL OUVERT CURSOR2 FIN - . EXEC
EXEC SQL FETCH CURSOR2
EN : partName : PARTNAMEIND , Photos : Prix de vente : . SALESPRICEIND
END-EXEC
EXEC SQL UPDATE PURCHDB.PARTS
SET Prix de vente = : . NEWSALESPRICE
WHERE CURRENT OF CURSOR2
END-EXEC
" partName " et " Le Prix »sont les colonnes de la table de la " PURCHDB " base de données des pièces de l'inventaire et peut être remplacé par une base de données et un ensemble de colonnes différent .
3 type de " Enregistrer " sur la console et appuyez sur la touche " Enter »pour mettre à jour l'opérateur CURSOR pour la colonne" le Prix " dans votre programme COBOL .
|
