Create Table Accounts
( Acct Number(5)
, Amt Number(8,2)
);
Create Or Replace
Procedure Cr_Acct /* Spec */
( Acct In Integer,
Amt In Real)
As
Begin /* Body */
Insert Into Accounts
Values (Acct, Amt);
End Cr_Acct;
/
Select *
From User_Source
Where Name = 'CR_ACCT';Declare
Acct_Id Number := &Id;
Amt Number := &Deposit;
Begin
Cr_Acct(Acct_Id, Amt);
End;
/
Select * From Accounts;
No comments:
Post a Comment