| Line 690... |
Line 690... |
| 690 |
nProjId = -1
|
690 |
nProjId = -1
|
| 691 |
nRtagId = -1
|
691 |
nRtagId = -1
|
| 692 |
nPvId = -1
|
692 |
nPvId = -1
|
| 693 |
|
693 |
|
| 694 |
Set OraSession2 = CreateObject("OracleInProcServer.XOraSession")
|
694 |
Set OraSession2 = CreateObject("OracleInProcServer.XOraSession")
|
| 695 |
Set OraDatabase2 = OraSession2.OpenDatabase( "RELEASEM", "DEPLOYMENT_MANAGER/DEPLOYMENT_MANAGER", Cint(0))
|
695 |
Set OraDatabase2 = OraSession2.OpenDatabase( Application("TNS_NAME"), Application("DEPLOYMENT_MANAGER_LOGIN"), Cint(0))
|
| 696 |
|
- |
|
| 697 |
|
696 |
|
| 698 |
' Get parameters from database
|
697 |
' Get parameters from database
|
| 699 |
OraDatabase2.Parameters.Add "ProjId", Request("proj_id"), ORAPARM_INPUT, ORATYPE_VARCHAR2
|
698 |
OraDatabase2.Parameters.Add "ProjId", Request("proj_id"), ORAPARM_INPUT, ORATYPE_VARCHAR2
|
| 700 |
OraDatabase2.Parameters.Add "Rtag_id", Request("rtag_id"), ORAPARM_INPUT, ORATYPE_VARCHAR2
|
699 |
OraDatabase2.Parameters.Add "Rtag_id", Request("rtag_id"), ORAPARM_INPUT, ORATYPE_VARCHAR2
|
| 701 |
OraDatabase2.Parameters.Add "results", NULL, ORAPARM_OUTPUT, ORATYPE_CURSOR
|
700 |
OraDatabase2.Parameters.Add "results", NULL, ORAPARM_OUTPUT, ORATYPE_CURSOR
|