Πώς να ενημερώσετε ένα δρομέα χρησιμοποιώντας COBOL

Ο δρομέας είναι ένας δείκτης θέσης στο τερματικό οθόνη του az /OS mainframe λειτουργικό σύστημα του υπολογιστή . Επιτρέπει στους χρήστες να περιηγηθείτε ένα αποτέλεσμα ερώτημα που μπορεί να περιέχει πολλαπλές σειρές δεδομένων ή να κάνουν όλες τις σχετικές ορατές οι γραμμές . Ο χρήστης μπορεί να επισημάνω μια γραμμή σε ένα αποτέλεσμα ερωτήματος που σχετίζεται με μια εντολή SELECT . Αυτή η εντολή δεσμούς με ένα κέρσορα και εκτελεί την εντολή OPEN ΔΡΟΜΕΑΣ . Μπορείτε να ενημερώσετε ένα δρομέα σε μια δήλωση SQL χρησιμοποιώντας την ΕΝΗΜΕΡΩΣΗ ΤΩΝ ρήτρα στο πρόγραμμα COBOL σας . Οδηγίες
Η 1

Τύπος " Επεξεργασία " στο " > " z /OS σύστημα διαχείρισης εντολών κονσόλα και πατήστε το πλήκτρο "Enter" για να επεξεργαστείτε το πρόγραμμα COBOL σας . 2

Προσθέστε τον ακόλουθο κώδικα μετά το τμήμα " EXEC SQL " του προγράμματός σας :

EXEC SQL ΔΗΛΩΝΟΥΝ CURSOR2

δρομέα για

SELECT PARTNAME , SALESPRICE

ΑΠΟ PURCHDB.PARTS

ΠΟΥ ΜΕΤΑΞΥ Μοντέλου : μικρού ύψους και : . highvalue

ΓΙΑ ΤΗΝ ΕΝΗΜΕΡΩΣΗ ΤΩΝ SALESPRICE

END - EXEC

EXEC SQL OPEN CURSOR2 ΤΕΛΟΣ . EXEC

EXEC SQL FETCH CURSOR2

INTO : PARTNAME : PARTNAMEIND , πώληση

: SALESPRICE : . SALESPRICEIND

END - EXEC

EXEC SQL PURCHDB.PARTS UPDATE

SET SALESPRICE = : . NEWSALESPRICE

WHERE CURRENT OF CURSOR2

END - EXEC

Η " PARTNAME " και " SALESPRICE »είναι οι στήλες του πίνακα του « PURCHDB " βάσης δεδομένων απογραφής τμήματα και μπορεί να αντικατασταθεί με μια άλλη βάση δεδομένων και το σύνολο των στηλών .
εικόνων 3

Πληκτρολογήστε " Αποθήκευση " στην κονσόλα και πατήστε το πλήκτρο" Enter "για να ενημερώσετε το χειριστή ΔΡΟΜΕΑ για την " στήλη SALESPRICE " στο πρόγραμμα COBOL σας .
Η
εικόνων