help！ 有谁能告知能自动生成insert，delete，update，select等存储过程的工具呀？

Question

偶还没有发现过呢.不知道哪位高人知道不.
反正我觉得应该是没有的.

Answer 1

有，我都用过，不过是别人的。
他也不知道在哪里找的了。

Answer 2

下面这些全是自动生成的SQL> select text from auto_proc where Proc_name Like 'Ops_User%' Order By Proc_Name,Seq_No;TEXT
--------------------------------------------------------------------------------
Create Or Replace Procedure Ops_User_Delete (
      V_User_Id                            Number
)
Is
Begin
      Delete
        From Ops_User
       Where User_Id = V_User_Id;
End;
/
Create Or Replace Procedure Ops_User_Insert (
      V_User_Id                     In Out Number,
      V_Id                                 Varchar2,
      V_Firstname                          Varchar2,
      V_Lastname                           Varchar2,
      V_Email                              Varchar2
)
Is
BeginTEXT
--------------------------------------------------------------------------------
      V_User_Id := Get_Seq('Ops_user');
      Insert Into Ops_User(
                  User_Id,
                  Id,
                  Firstname,
                  Lastname,
                  Email
                )
        Select
                  V_User_Id,
                  V_Id,
                  V_Firstname,
                  V_Lastname,
                  V_Email
          From Dual;
End;
/
Create Or Replace Procedure Ops_User_Update (
      V_User_Id                            Number,
      V_Id                                 Varchar2,TEXT
--------------------------------------------------------------------------------
      V_Firstname                          Varchar2,
      V_Lastname                           Varchar2,
      V_Email                              Varchar2
)
Is
Begin
      Update Ops_User
         Set (
                  User_Id,
                  Id,
                  Firstname,
                  Lastname,
                  Email
             ) =
        (Select
                  V_User_Id,
                  V_Id,
                  V_Firstname,
                  V_Lastname,
                  V_Email
           From DualTEXT
--------------------------------------------------------------------------------
        )
       Where User_Id = V_User_Id;
End;
/67 rows selectedSQL>

Answer 3

自己写个呗，好象也不是很难