Subversion Repositories DevTools

Rev

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

Rev 5048 Rev 5061
Line 26... Line 26...
26
<!--#include file="_access_control_general.asp"-->
26
<!--#include file="_access_control_general.asp"-->
27
<!--#include file="_access_control_login.asp"-->
27
<!--#include file="_access_control_login.asp"-->
28
<%
28
<%
29
'------------ VARIABLE DEFINITION -------------
29
'------------ VARIABLE DEFINITION -------------
30
Dim sMessage
30
Dim sMessage
31
Dim parProj_id
-
 
32
Dim parPv_id
31
Dim parPv_id
33
Dim parOp_code
32
Dim parOp_code
34
Dim parRfile
33
Dim parRfile
35
Dim bPreventSubmit
34
Dim bPreventSubmit
36
Dim ripplePresent, rippleDisable, rippleChecked
35
Dim ripplePresent, rippleDisable, rippleChecked
Line 42... Line 41...
42
'------------ VARIABLE INIT -------------------
41
'------------ VARIABLE INIT -------------------
43
sMessage = NULL
42
sMessage = NULL
44
bPreventSubmit = False
43
bPreventSubmit = False
45
 
44
 
46
' collect all parameters from query string
45
' collect all parameters from query string
47
parProj_id = Request("proj_id")
-
 
48
parPv_id = Request("pv_id")
46
parPv_id = Request("pv_id")
49
parOp_code = Request("op_code")
47
parOp_code = Request("op_code")
50
parRfile = Request("rfile")
48
parRfile = Request("rfile")
51
Set objFormCollector = CreateObject("Scripting.Dictionary")
49
Set objFormCollector = CreateObject("Scripting.Dictionary")
52
 
50
 
Line 98... Line 96...
98
       Dim ReleaseMode
96
       Dim ReleaseMode
99
 
97
 
100
       ReleaseMode = GetReleaseMode(parRtag_id)
98
       ReleaseMode = GetReleaseMode(parRtag_id)
101
 
99
 
102
       ' determine if insert/update is enabled by permissions
100
       ' determine if insert/update is enabled by permissions
103
       if NOT UserCanAddOrEditThisDaemonInst(parProj_id, ReleaseMode, parOp_code) Then
101
       if NOT UserCanAddOrEditThisDaemonInst(DB_PROJ_ID, ReleaseMode, parOp_code) Then
104
          ' redirect to an error message
102
          ' redirect to an error message
105
          Call RaiseMsg(enum_MSG_ERROR, "You have been denied permission to add/update daemon instructions for the specified release.")
103
          Call RaiseMsg(enum_MSG_ERROR, "You have been denied permission to add/update daemon instructions for the specified release.")
106
       End If
104
       End If
107
 
105
 
108
       ' do daemon instruction validation, continuing only if it passes
106
       ' do daemon instruction validation, continuing only if it passes
Line 182... Line 180...
182
         </tr>
180
         </tr>
183
         <%
181
         <%
184
         '-- FROM START --------------------------------------------------------------------------------------------------------------
182
         '-- FROM START --------------------------------------------------------------------------------------------------------------
185
         objFormComponent.FormName = "DaemonInstruction"
183
         objFormComponent.FormName = "DaemonInstruction"
186
         objFormComponent.Action = ScriptName &_
184
         objFormComponent.Action = ScriptName &_
187
                                   "?proj_id="& parProj_id &_
185
                                   "?proj_id="& DB_PROJ_ID &_
188
                                   "&rtag_id="& parRtag_id &_
186
                                   "&rtag_id="& parRtag_id &_
189
                                   "&pv_id="  & parPv_id &_
187
                                   "&pv_id="  & parPv_id &_
190
                                   "&rfile="  & parRfile
188
                                   "&rfile="  & parRfile
191
         objFormComponent.OnSubmit = "ShowProgress();"
189
         objFormComponent.OnSubmit = "ShowProgress();"
192
         Call objFormComponent.FormStart()
190
         Call objFormComponent.FormStart()
Line 233... Line 231...
233
                        <input name="btn" type="reset" class="form_btn" value="Cancel" onClick="self.close();">
231
                        <input name="btn" type="reset" class="form_btn" value="Cancel" onClick="self.close();">
234
                  <tr>
232
                  <tr>
235
                  </tr>
233
                  </tr>
236
                  <tr>
234
                  <tr>
237
                     <td>
235
                     <td>
238
                        <input type="hidden" id="proj_id"     name="proj_id"      value="<%=parProj_id%>">
-
 
239
                        <input type="hidden" id="rtag_id"     name="rtag_id"      value="<%=parRtag_id%>">
236
                        <input type="hidden" id="rtag_id"     name="rtag_id"      value="<%=parRtag_id%>">
240
                        <input type="hidden" id="pv_id"       name="pv_id"        value="<%=parPv_id%>">
237
                        <input type="hidden" id="pv_id"       name="pv_id"        value="<%=parPv_id%>">
241
                        <input type="hidden" id="rfile"       name="rfile"        value="<%=parRfile%>">
238
                        <input type="hidden" id="rfile"       name="rfile"        value="<%=parRfile%>">
242
                     </td>
239
                     </td>
243
                  </tr>
240
                  </tr>