Subversion Repositories DevTools

Rev

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

Rev 5150 Rev 5299
Line 90... Line 90...
90 
	If objForm.IsValidOnPostBack Then
 90 
	If objForm.IsValidOnPostBack Then
91 
		' --- Form is Valid ---
 91 
		' --- Form is Valid ---
92 
		Call UpdateRole()
 92 
		Call UpdateRole()
93
93
94 
		If objEH.Finally Then
 94 
		If objEH.Finally Then
- 
 
 95 
            If Request("rmode") <> "" Then
- 
 
 96 
			    Call OpenInParentWindow ( Request("rfile") &"?updated=ok2"& objPMod.ComposeURLWithout("rfile,rmode") )
- 
 
 97 
            Else
95 
			Call OpenInParentWindow ( Request("rfile") &"?updated=ok"& objPMod.ComposeURLWithout("rfile,role_id") )
 98 
			    Call OpenInParentWindow ( Request("rfile") &"?updated=ok"& objPMod.ComposeURLWithout("rfile,role_id,rmode") )
- 
 
 99 
            End If
96 
			Call CloseWindow()
 100 
			Call CloseWindow()
97 
		End If
 101 
		End If
98
102
99 
	End If
 103 
	End If
100 
End If
 104 
End If
Line 161... Line 165...
161 
      </tr>
 165 
      </tr>
162 
    </table></td>
 166 
    </table></td>
163 
  </tr>
 167 
  </tr>
164 
  <%=objPMod.ComposeHiddenTags()%>
 168 
  <%=objPMod.ComposeHiddenTags()%>
165 
  <input type="hidden" name="action" value="true">
 169 
  <input type="hidden" name="action" value="true">
- 
 
 170 
  <input type="hidden" name="rmode" value="<%=Request("rmode")%>">
166 
  </form>
 171 
  </form>
167 
</table>
 172 
</table>
168 
</body>
 173 
</body>
169 
</html>
 174 
</html>
170 
<%
 175 
<%