[oracle] 프로시저 조회, 등록, 수정, 삭제

--in : 입력매개변수, out : 출력매개변수, in out(생략) : 변수 1개로 입력, 출력할 수 있다.
-- 사원번호를 입력받아 이름을 선택하여 프로시저 외부로 데이터 보내기
-- 조회
create or replace procedure emp_name_search(pempno in emp.empno%type, p_ename out emp.ename%type)
is
begin
    select ename into p_ename from emp where empno=pempno;
    
end;

variable s_ename varchar2(20);
execute emp_name_search(7876, : s_ename);
print s_ename;

select * from user_sequences;

--회원등록 프로시저
--num -> memsq
--이름, 연락처, 이메일, 주소 - 입력
--writedate -> sysdate
create or replace procedure men_insert (m_sernamein member.username%type, m_tel in member.tel%jype,
                                        m_email in member.email%type, m_addr in member.add%type)
                                        
is
begin
    insert into member values(memsq.nextval, m_username, m_del);
end;

    select * from member; 
    
--회원 수정 프로시저
create or replace procedure mem_update(m_username in member.username%type ,m_tel in member.tel%type, m_email in member.email%type, m_addr in member.addr%type)

is
begin
    update member set tel=m_tel, email=m_email, addr=m_addr where username=m_username;
end;     

desc member;
                                  

--job이 null 레코드를 삭제하는 프로시저
--프로시저명 : emp_del

--회원 삭제 프로시저
create or replace procedure emp_del
is

begin
    delete from emp where job is null;
    commit;
end;

execute emp_del;