﻿<?xml version="1.0" encoding="utf-8"?>
<SQL92STD>
  <Object Id="1" CmdType="CommandType.Text" Name="GetTableList">
    <Param Type="DbType.String" Size="" Direction="ParameterDirection.Input">:LoginName</Param>
    <Query>SELECT NAME TableName from SYSIBM.SYSTABLES where Creator=:LoginName</Query>
  </Object>
  <Object Id="2" CmdType="CommandType.Text" Name="GetSPList">
    <Param Type="DbType.String" Size="" Direction="ParameterDirection.Input">@LoginName</Param>
    <!--<Query>select OBJECT_NAME as name,case when PACKAGE_NAME is not null then PACKAGE_NAME||'.'||OBJECT_NAME else OBJECT_NAME end as fullname,data_type as pdatatype,in_out AS pdirection from all_arguments where upper(OWNER) = upper(:LoginName) and upper(DATA_TYPE) = 'REF CURSOR' and IN_OUT='OUT'</Query>-->
    <Query>
      sELECT PROCNAME AS name,PROCNAME as fullname FROM SYSCAT.PROCEDURES WHERE definer =upper(?) order by PROCNAME Asc
    </Query>
  </Object>
  <Object Id="3" CmdType="CommandType.Text" Name="GetViewList">
    <Param Type="DbType.String" Size="" Direction="ParameterDirection.Input">:LoginName</Param>
    <Query>select VIEW_NAME  from SYS.ALL_VIEWS and upper(owner) = upper(:LoginName)</Query>
  </Object>
  <Object Id="4" CmdType="CommandType.Text" Name="GetParametersForSP">
    <Param Type="DbType.String" Size="" Direction="ParameterDirection.Input">:LoginName</Param>
    <Param Type="DbType.String" Size="" Direction="ParameterDirection.Input">:spname</Param>
    <!--<Param Type="DbType.String" Size="" Direction="ParameterDirection.Input">:PackageName</Param>-->
    <!--<Query>select argument_name as pname,data_type as pdatatype,'' as Value,in_out AS pdirection from all_arguments where UPPER(object_name) = upper(:spname) and upper(owner) = upper(:LoginName) and ((upper(PACKAGE_NAME) = upper(:PackageName)) or PACKAGE_NAME is null) order by sequence</Query>-->
    <Query>select argument_name as pname,data_type as pdatatype,'' as Value,in_out AS pdirection from all_arguments where UPPER(object_name) = upper(:spname) and upper(owner) = upper(:LoginName)  order by sequence</Query>
  </Object>
  <Object Id="5" CmdType="CommandType.Text" Name="GetColumnList">
    <Query>SELECT NAME ColumnName FROM SYSIBM.SYSCOLUMNS WHERE TBNAME IN (@Condition)</Query>
  </Object>
</SQL92STD>