Need to start a program in Oracle System (External...
Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
Here is another sample for procedures.Kindly reward points by clicking the star on the left of reply,if it is useful.
Code Sample for writing a procedure with input and output parameters
REPORT zzz_jaytest.
* Getting the regno and total as input parameters
PARAMETERS : p_regno(10) TYPE c DEFAULT 'R1000',
p_total TYPE i.
data : v_total type i.
* In this procedure, we are updating the total of a regno given as input.
* Here two parameters used in the procedure are input parameters.
* We are updating the record of regno entered in selection screen and
* adding the total entered to the already existing total. We have to give semicolon
* for the statement inside procedure.
exec sql.
CREATE or replace PROCEDURE PROC1 ( p_regno in char, p_total in number )
IS
BEGIN
UPDATE stu_det SET total = total + p_total where regno = p_regno;
END;
endexec.
* This is the code to execute the procedure for update.
* While executing the procedure, the parameter variable should be
* preceded with colon :
EXEC SQL.
EXECUTE PROCEDURE PROC1 ( in :p_regno, in :p_total )
ENDEXEC.
* In this procedure, we are selecting the details for the regno entered
* as input. Here p_regno is input parameter and v_total is used as output
* parameter. So that we can use the retrieved value of v_total in our
* ABAP program
exec sql.
CREATE or replace PROCEDURE PROC2 (p_regno in char, v_total out char)
IS
BEGIN
select total into v_total from stu_det
where regno = p_regno;
END;
endexec.
* This is the code to execute second procedure.
EXEC SQL.
EXECUTE PROCEDURE PROC2 ( in :p_regno, out :v_total )
ENDEXEC.
write : / 'Total of ', p_regno, ' is ', v_total.
Bluesky
