private void CreateProcedure1(IQuery query)
{
var procName = ObjectName.Parse("APP.proc1");
var args = new[] {new RoutineParameter("a", PrimitiveTypes.String())};
var body = new PlSqlBlockStatement();
body.Declarations.Add(new DeclareVariableStatement("b", PrimitiveTypes.String()));
body.Statements.Add(new AssignVariableStatement(SqlExpression.VariableReference("b"),
SqlExpression.VariableReference("a")));
var procInfo = new PlSqlProcedureInfo(procName, args, body);
query.Access().CreateObject(procInfo);
}