Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- SET ECHO OFF
- SET VERIFY OFF
- SET SERVEROUTPUT ON
- VARIABLE g_gaji NUMBER
- ACCEPT p_gaji PROMPT 'Masukkan Gaji Tahunan : '
- ACCEPT p_pajak PROMPT 'Masukkan Pajak : '
- DECLARE
- v_gaji NUMBER := &p_gaji;
- v_pajak NUMBER := &p_pajak;
- BEGIN
- :g_gaji := NVL(v_gaji,0)*(1-v_pajak/100);
- END;
- /
- PRINT g_gaji
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement