การสร้าง procedures โดยการเรียกใช้ procedures ที่สร้างไว้แล้ว ทั้ง insert delete update

CREATE OR REPLACE PROCEDURE ForChkbox
(
ForChkbox_ID  	  			doc_list_detail.ID%TYPE,
ForChkbox_LIST_ID 			doc_list_detail.LIST_ID%TYPE,
ForChkbox_LIST_NUM 			doc_list_detail.LIST_NUM%TYPE,
ForChkbox_OBJECTIVE			doc_list_detail.OBJECTIVE%TYPE,
ForChkbox_LIST_STATUS		doc_list_detail.LIST_STATUS%TYPE,
ForChkbox_STUDENT_ID 		doc_list.STUDENT_ID%TYPE,
ForChkbox_OTHER				doc_list_detail.DOC_OTHER%TYPE,
returnVal out integer
)

AS

NumCount integer;

BEGIN

 returnVal := 1;
 
 if returnVal > 0 then
 
    select count(*)
	into NumCount
	from doc_list_detail
	where LIST_ID = ForChkbox_LIST_ID;
	
		  if NumCount > 0 then
		  deleteChkbox( เรียกใช้จากprocedures ที่สร้างไว้แล้ว)
	
		  			  else
					  updateChkbox( เรียกใช้จากprocedures ที่สร้างไว้แล้ว)

	
					  	else
						  insertChkbox( เรียกใช้จากprocedures ที่สร้างไว้แล้ว)

if sql%notfound then
returnVal := -4;
	
end if;
	   							  end if;
    	   			  end if;
    	end if;
END;

CREATE OR REPLACE PROCEDURE ForChkbox
(
ForChkbox_ID  	  			doc_list_detail.ID%TYPE,
ForChkbox_LIST_ID 			doc_list_detail.LIST_ID%TYPE,
ForChkbox_LIST_NUM 			doc_list_detail.LIST_NUM%TYPE,
ForChkbox_OBJECTIVE			doc_list_detail.OBJECTIVE%TYPE,
ForChkbox_LIST_STATUS		doc_list_detail.LIST_STATUS%TYPE,
ForChkbox_STUDENT_ID 		doc_list.STUDENT_ID%TYPE,
ForChkbox_OTHER				doc_list_detail.DOC_OTHER%TYPE,
)

AS

NumCount integer;

BEGIN

 
    select count(*)
	into NumCount
	from doc_list_detail
	where LIST_ID = doc_list_detail.LIST_ID;
	
	if NumCount > 0 then
	 updateChkbox
	
	else
		deleteChkbox
	
	else
		insertChkbox

	
end if;

END;

CREATE OR REPLACE PROCEDURE ForChkbox
(

ForChkbox_ID        doc_list_detail.ID%TYPE,
ForChkbox_LIST_ID    doc_list_detail.LIST_ID%TYPE,
ForChkbox_LIST_NUM    doc_list_detail.LIST_NUM%TYPE,
ForChkbox_OBJECTIVE   doc_list_detail.OBJECTIVE%TYPE,
ForChkbox_LIST_STATUS  doc_list_detail.LIST_STATUS%TYPE,
ForChkbox_STUDENT_ID   doc_list.STUDENT_ID%TYPE,
ForChkbox_OTHER    doc_list_detail.DOC_OTHER%TYPE
)

AS

NumCount integer;

BEGIN

 if ForChkbox_LIST_NUM  > 0 then
    select count(*)
 into NumCount
 from doc_list_detail
 where LIST_ID = ForChkbox_LIST_ID
 and ID = ForChkbox_ID;
    
   if NumCount > 0 then
   updateChkbox //เปงชื่อPROCEDURE  ที่ได้สร้างไว้แล้ว
   (ForChkbox_ID,ForChkbox_LIST_NUM,ForChkbox_OBJECTIVE,ForChkbox_LIST_STATUS,ForChkbox_STUDENT_ID,ForChkbox_LIST_ID);
   else
   insertChkbox //เปงชื่อPROCEDURE  ที่ได้สร้างไว้แล้ว
   (ForChkbox_STUDENT_ID,ForChkbox_ID,ForChkbox_LIST_NUM,ForChkbox_OBJECTIVE,ForChkbox_LIST_STATUS,ForChkbox_LIST_ID,ForChkbox_OTHER);
      end if;
   
 else
  deleteChkbox  //เปงชื่อPROCEDURE  ที่ได้สร้างไว้แล้ว
  (ForChkbox_ID,ForChkbox_LIST_ID);
 
end if;

END;
/