Šis raksts ir mašīntulkošanas spoguļraksts, lūdzu, noklikšķiniet šeit, lai pārietu uz oriģinālo rakstu.

Skats: 12545|Atbildi: 0

[Avots] Oracle sistēmas iepriekš definēti izņēmumi un lietotāja definēti izņēmumi

[Kopēt saiti]
Publicēts 19.03.2015 09:28:41 | | |
Izveidot tabulu stuinfo1
(
       stuid int primārā atslēga,
       stuname varchar [10] nav nulle,
       stusex char(2) check(stusex='vīrietis' vai stusex='sieviete'),
       Stubir datums
);
ievietot stuinfo vērtības ('001','Zhang San','vīrietis',to_date ('1999-1-1','gggg-mm-dd'));
ievietot stuinfo vērtības ('002','Reese','vīrietis',to_date ('1997-12-1','gggg-mm-dd'));
ievietot stuinfo vērtības ('003', 'Wang Wu', 'sieviete', to_date ('1995-3-4', 'gggg-mm-dd'));
ievietot stuinfo vērtības ('004','haha','vīrietis',to_date ('2000-7-5','gggg-mm-dd'));
ievietot stuinfo vērtības ('005', 'haha', 'vīrietis', to_date ('1993-7-5', 'gggg-mm-dd'));


--Sistēmas iepriekš definēti izņēmumi
paziņot
    v_name stuinfo.stuname%type;
Sākt
    izvēlieties stuname v_name no stuinfo;
--izņēmums
-- kad too_many_rows tad
-- dbms_output.put_line('Vaicājuma rezultāti ir lieki, tos nevar piešķirt');
beigas;
--lietotāja definēti izņēmumi
paziņot
    money_error izņēmums;
    nauda1 int := 1000;
    money2 int :=& pārskaitījuma summa;
Sākt
    ja nauda1-nauda2 < 0 tad
       raise_application_error (-20001, "Nepietiekams atlikums");
       --paaugstināt money_error;
    citādi
       dbms_output.put_line('Pārsūtīšana veiksmīga');
    beigas, ja;
--izņēmums
-- kad money_error tad
-- dbms_output.put_line('Nepietiekams līdzsvars');
beigas;

--iepriekš nedefinēti izņēmumi
paziņot
    myerror izņēmums;
    Pragma exception_init(Mana kļūda,-1);
Sākt
    ievietot stuinfo vērtības ('001','aa','sieviete',to_date('1995-3-4','gggg-mm-dd'));
Izņēmums
    kad myerror tad
        dbms_output.put_line('Primārās atslēgas unikalitātes ierobežojuma pārkāpums');
beigas;

ievietojiet stuinfo1 vērtības (1,'sdf','vīrietis','');
Izvēlieties * no TB1;
nomešanas galds TB1;
--dinamiskais sql
Sākt
     izpildīt tūlītēju 'izveidot tabulu TB1(TID INT)';
beigas;

paziņot
        sqlString varchar2(200);
        tId int:=2;
Sākt
        sqlString:='ievietot tb1 vērtības (:1)';

        izpildīt tūlītēju sqlString, izmantojot tId;

beigas;


izvēlieties * no stuinfo;
--Netiešais kursors
Sākt
        DBMS_OUTPUT. PUT_LINE("Pirms ievietošanas:"|| SQL%ROWCOUNT);
        atjaunināt stuinfo set stusex = 'vīrietis';
        DBMS_OUTPUT. PUT_LINE('Pēc ievietošanas:'|| SQL%ROWCOUNT);
BEIGAS;






Iepriekšējo:Oracle iegūst virknes garuma funkcijas length() un hengthb()
Nākamo:Konfigurējiet VPN Redhat Enterprise Server 6.3
Atruna:
Visa programmatūra, programmēšanas materiāli vai raksti, ko publicē Code Farmer Network, ir paredzēti tikai mācību un pētniecības mērķiem; Iepriekš minēto saturu nedrīkst izmantot komerciāliem vai nelikumīgiem mērķiem, pretējā gadījumā lietotājiem ir jāuzņemas visas sekas. Informācija šajā vietnē nāk no interneta, un autortiesību strīdiem nav nekāda sakara ar šo vietni. Iepriekš minētais saturs ir pilnībā jāizdzēš no datora 24 stundu laikā pēc lejupielādes. Ja jums patīk programma, lūdzu, atbalstiet oriģinālu programmatūru, iegādājieties reģistrāciju un iegūstiet labākus oriģinālus pakalpojumus. Ja ir kādi pārkāpumi, lūdzu, sazinieties ar mums pa e-pastu.

Mail To:help@itsvse.com