Subversion Repositories DevTools

Rev

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

Rev 13 Rev 29
Line 83... Line 83...
83 
		Case "pmiRejectBom"
 83 
		Case "pmiRejectBom"
84 
			Call RejectBOM ()
 84 
			Call RejectBOM ()
85
85
86 
		Case "pmiVersionTree"
 86 
		Case "pmiVersionTree"
87 
			Call VersionTree()
 87 
			Call VersionTree()
- 
 
 88
- 
 
 89 
		Case "pmiUnDeployView"
- 
 
 90 
			Call ToUnDeployView()
88
91
89 
	End Select
 92 
	End Select
90 
End Sub
 93 
End Sub
91 
'----------------------------------------------------------------------------------------------------------------------------------------------
 94 
'----------------------------------------------------------------------------------------------------------------------------------------------
92 
Function PBSelector ( sName, nRowID, nParID, nLevel )
 95 
Function PBSelector ( sName, nRowID, nParID, nLevel )
Line 259... Line 262...
259
262
260 
	objEH.Catch
 263 
	objEH.Catch
261
264
262 
End Sub
 265 
End Sub
263 
'-----------------------------------------------------------------------------------------------------------------
 266 
'-----------------------------------------------------------------------------------------------------------------
- 
 
 267 
Sub ToUnDeployView ()
- 
 
 268 
	On Error Resume Next
- 
 
 269
- 
 
 270 
	objEH.Try
- 
 
 271
- 
 
 272 
			Call OpenInWindow ( "wUnDeployView.asp?proj_id="&dbPARproj_id&"&branch_id="&dbPARbranch_id )
- 
 
 273
- 
 
 274 
	objEH.Catch
- 
 
 275
- 
 
 276 
End Sub
- 
 
 277 
'-----------------------------------------------------------------------------------------------------------------
264 
%>
278 
%>
265 

            279