Database Reference
In-Depth Information
Figure 24.2
PL/SQL Block
Structure and
Exception
Trapping.
vLEN INTEGER DEFAULT 0;
vSPLIT INTEGER DEFAULT 0;
vHOURS INTEGER DEFAULT 0;
vSECONDS INTEGER DEFAULT 0;
BEGIN
--execution section
vSPLIT := INSTR(pTIME,':');
vLEN := LENGTH(pTIME);
vHOURS := TO_NUMBER(SUBSTR(pTIME,1,vSPLIT-1));
vSECONDS := TO_NUMBER(SUBSTR(pTIME,
vSPLIT+1,vLEN-vSPLIT));
RETURN vHOURS+(vSECONDS/60);
EXCEPTION WHEN OTHERS THEN
--exception trap section
RETURN 0;
END;
/
Search WWH ::




Custom Search