επιλέξτε * από το stuinfo.
--Έμμεσος δρομέας
αρχίζω
dbms_output.put_line('Πριν-ερώτημα:'|| sql%rowcount);
ενημέρωση stuinfo set stusex = 'θηλυκό';
dbms_output.put_line('Μετά το ερώτημα:'|| sql%rowcount);
τέλος;
--ρητός δρομέας
--1. Κοινό
δηλώνουν
Ο κέρσορας mycur1 είναι επιλεγμένος * από το stuinfo. --ορίστε τους δρομείς
--v_id stuinfo.stuid%type;
--v_name stuinfo.stuname%type;
--v_sex stuinfo.stusex%type;
--v_bir stuinfo.stubir%type;
v_row stuinfo%rowtype;
αρχίζω
ανοίξτε το mycur1; --Ανοίξτε τον κέρσορα
βρόχος
--φέρτε το mycur1 σε v_id,v_name,v_sex,v_bir; --Μετακινήστε τον κέρσορα προς τα κάτω για να βάλετε την τιμή ανάγνωσης στη μεταβλητή
Φέρτε το mycur1 στο v_row. --Ανάγνωση δρομέα
έξοδος όταν mycur1%notfound;
--dbms_output.put_line('id:'|| v_id||', όνομα: '|| v_name||', φύλο: '|| v_sex||' Γενέθλια: «|| v_bir); --Αποτέλεσμα εξόδου
dbms_output.put_line('id:'|| v_row.stuid||', όνομα: '|| v_row.stuname||', φύλο: '|| v_row.stusex||' Γενέθλια: «|| v_row.stubir);
τελικός βρόχος?
κλείσιμο mycur1; --Απενεργοποιήστε τον κέρσορα
τέλος;
--2. Versifier με παραμέτρους
δηλώνουν
Ο δρομέας mycur1(v_sex stuinfo.stusex%type) είναι επιλεγμένος * από stuinfo όπου stusex = v_sex; --ορίστε τους δρομείς
v_row stuinfo%rowtype;
αρχίζω
ανοίξτε το mycur1('&gender'); --Ανοίξτε τον κέρσορα
βρόχος
Φέρτε το mycur1 στο v_row. --Ανάγνωση δρομέα
έξοδος όταν mycur1%notfound;
dbms_output.put_line('id:'|| v_row.stuid||', όνομα: '|| v_row.stuname||', φύλο: '|| v_row.stusex||' Γενέθλια: «|| v_row.stubir);
τελικός βρόχος?
κλείσιμο mycur1; --Απενεργοποιήστε τον κέρσορα
τέλος;
--3. Κυκλικός δρομέας
δηλώνουν
Ο κέρσορας mycur1 είναι επιλεγμένος * από το stuinfo. --ορίστε τους δρομείς
αρχίζω
για v_row στο mycur1
βρόχος
dbms_output.put_line('id:'|| v_row.stuid||', όνομα: '|| v_row.stuname||', φύλο: '|| v_row.stusex||' Γενέθλια: «|| v_row.stubir);
τελικός βρόχος?
τέλος;
--4. Ενημερώστε τα δεδομένα με τον κέρσορα
δηλώνουν
Ο δρομέας mycur1 είναι επιλεγμένος * από το stuinfo για ενημέρωση. --ορίστε τους δρομείς
αρχίζω
για v_row στο mycur1
βρόχος
αν v_row.stuid = '003' τότε
διαγραφή από το stuinfo όπου ρεύμα του mycur1;
αλλιώς
ενημέρωση stuinfo set stusex = 'αρσενικό' όπου ρεύμα του mycur1;
τέλος αν?
τελικός βρόχος?
τέλος;
επιλέξτε * από το stuinfo.
ενημέρωση stuinfo set stusex = 'θηλυκό' όπου stuid = '002';
--Δρομέας αναφοράς
--1. Αδύναμος τύπος
δηλώνουν
type curname is ref cursor; --ορίστε έναν τύπο δρομέα (curname είναι το όνομα του τύπου)
mycur1 curname; --
v_sex stuinfo.stusex%type;
v_row stuinfo%rowtype;
v_row2 subinfo%rowtype;
αρχίζω
v_sex := '& φύλο';
αν v_sex = «αρσενικό» τότε
Ανοίξτε το MyCur1 για επιλογή * από το stuinfo όπου stusex = 'αρσενικό';
βρόχος
Φέρτε το mycur1 στο v_row. --Ανάγνωση δρομέα
έξοδος όταν mycur1%notfound;
dbms_output.put_line('id:'|| v_row.stuid||', όνομα: '|| v_row.stuname||', φύλο: '|| v_row.stusex||' Γενέθλια: «|| v_row.stubir);
τελικός βρόχος?
αλλιώς
Ανοίξτε το MyCur1 για επιλογή * από τις υποπληροφορίες.
βρόχος
Φέρτε το mycur1 στο v_row2. --Ανάγνωση δρομέα
έξοδος όταν mycur1%notfound;
τελικός βρόχος?
τέλος αν?
κλείσιμο mycur1; --Απενεργοποιήστε τον κέρσορα
τέλος;
Επιλέξτε * από τις υποπληροφορίες.
--Ισχυρός τύπος
δηλώνουν
type curname is ref cursor return stuinfo%rowtype;
mycur1 curname;
v_sex stuinfo.stusex%type;
v_row stuinfo%rowtype;
αρχίζω
v_sex := '& φύλο';
αν v_sex = «αρσενικό» τότε
Ανοίξτε το MyCur1 για επιλογή * από το stuinfo όπου stusex = 'αρσενικό';
αλλιώς
Ανοίξτε το MyCur1 για επιλογή * από το stuinfo όπου stusex = 'θηλυκό';
τέλος αν?
βρόχος
Φέρτε το mycur1 στο v_row. --Ανάγνωση δρομέα
έξοδος όταν mycur1%notfound;
dbms_output.put_line('id:'|| v_row.stuid||', όνομα: '|| v_row.stuname||', φύλο: '|| v_row.stusex||' Γενέθλια: «|| v_row.stubir);
τελικός βρόχος?
κλείσιμο mycur1; --Απενεργοποιήστε τον κέρσορα
τέλος;
|
Δημοσιεύτηκε στις 19/3/2015 10:53:06 π.μ.
|
|
|
Δημοσιεύτηκε στις 19/3/2015 11:21:08 π.μ.
|
