Friday, April 16, 2021

Tuesday, December 08, 2020

RDBMS Do As Directed

 

[1]
Create or Replace Procedure calsalary(PEmp_no in varchar) As
VBasic number(10,2);
VDa number(10,2);
VHra number(10,2);
VTax number(10,2);

Tuesday, October 27, 2020

RDBMS Do As Directed

Do as directed (any two) 

Train(Train-no,Train-name)

Station(Station-code,Station-name)

Halt(Halt-code,Seq-no,Train-no,Station-no,Time-in,Time-out)

(Halt-code,Seq-no are composite key)

1. Create a procedure which return Time-in and Time-out for given

Train-no and Station-name.

Tuesday, October 13, 2020

RDBMS PLSQL Program 50 program to generate value of primary key column using MAX function automatically

 CREATE OR REPLACE TRIGGER PKMAX

BEFORE INSERT ON emp

FOR EACH ROW

DECLARE 

    CNT NUMBER;

    veno emp.eno%TYPE;

BEGIN

     SELECT 'E' || LPAD(MAX(TO_NUMBER(SUBSTR(eno,2))),5,'0') INTO veno

     FROM emp;

     :NEW.eno := veno;

EXCEPTION

     WHEN NO_DATA_FOUND THEN

:NEW.eno := 'E00001';

END;

/

RDBMS PLSQL Program 49 program to generate value of primary key column using sequence automatically

 create or replace trigger t_old

before insert on emp

for each row

declare

veno NUMBER(4);

begin

SELECT seq1.NEXTVAL INTO veno FROM DUAL;

:new.eno:=’E’|| lpad(veno,5,0);

end;

/

RDBMS PLSQL Program 48 script to create sequence

 CREATE SEQUENCE seq1 start with 1 increment by 1; 

/

RDBMS PLSQL Program 47 program to generate before insert,update and delete row trigger on emp table which will not allow changes in data on weekends using RAISE_APPLICATION_ERROR() function

 CREATE OR REPLACE TRIGGER Weekend

BEFORE INSERT OR UPDATE OR DELETE ON emp

for each row

WHEN (TO_CHAR(SYSDATE,'day') IN('SATURDAY','SUNDAY'))

DECLARE

BEGIN

RAISE_APPLICATION_ERROR(-20001,'Enjoy your Weekend!! Do not do work!');

END;

/