Subversion Repositories DevTools

Rev

Rev 5098 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5098 Rev 5102
Line 1175... Line 1175...
1175 
   nProjId    = -1
 1175 
   nProjId    = -1
1176 
   nRtagId    = -1
 1176 
   nRtagId    = -1
1177 
   nPvId       = -1
 1177 
   nPvId       = -1
1178 
 
 1178 
 
1179 
   ' Get parameters from database
 1179 
   ' Get parameters from database
1180 
   OraDatabase.Parameters.Add "ProjId",       Request("proj_id"),   ORAPARM_INPUT, ORATYPE_VARCHAR2
 1180 
   OraDatabase.Parameters.Add "ProjId",        Request("proj_id"),   ORAPARM_INPUT, ORATYPE_VARCHAR2
1181 
   OraDatabase.Parameters.Add "Rtag_id",       Request("rtag_id"),   ORAPARM_INPUT, ORATYPE_VARCHAR2
 1181 
   OraDatabase.Parameters.Add "Rtag_id",       Request("rtag_id"),   ORAPARM_INPUT, ORATYPE_VARCHAR2
1182 
   OraDatabase.Parameters.Add "results",       NULL, ORAPARM_OUTPUT, ORATYPE_CURSOR
 1182 
   OraDatabase.Parameters.Add "results",       NULL, ORAPARM_OUTPUT, ORATYPE_CURSOR
1183 
 
 1183 
 
1184 
   OraDatabase.ExecuteSQL " BEGIN  PK_APP_UTILS.GET_CURRENT_PARAMETERS ( :ProjId, :Rtag_id, :results ); END;"
 1184 
   OraDatabase.ExecuteSQL " BEGIN  PK_APP_UTILS.GET_CURRENT_PARAMETERS ( :ProjId, :Rtag_id, :results ); END;"
1185 
 
 1185