Bagi saya, sepertinya
- Anda harus "mengubah" prosedur yang menghitung setiap bagian dari
STUDENT_ID
menjadi fungsi- Kenapa? Karena - seperti sekarang - prosedur harus memiliki parameter OUT sehingga mereka dapat mengembalikan apa yang mereka hitung. Dan itu tidak lain hanyalah sebuah fungsi
- menyampaikan informasi kepada mereka masing-masing
- dapatkan hasilnya
- menggabungkan potongan hasil ke dalam
STUDENT_ID
terakhir nilai
Sesuatu seperti ini:
function f_name (par_name in varchar2) return varchar2 is
retval varchar2(20);
begin
retval := whatever code you have to find it
return retval;
end;
function f_surname (par_surname in varchar2) return varchar2 is
retval varchar2(20);
begin
retval := whatever code you have to find it
return retval;
end;
etc.
procedure student_id (par_surname in varchar2, par_name in varchar2, ...)
is
l_student_id varchar2(30);
begin
l_student_id := f_name (par_name) ||'-'||
f_surname(par_surname) ||'-'||
f_gender (par_gender) ||'-'||
...
f_state (par_state);
dbms_output.put_line('Student_ID is: ' || l_student_id);
end;
Terakhir, karena semua fungsi dan prosedur tersebut menangani masalah yang sama, alangkah baiknya jika semuanya dimasukkan ke dalam paket .