| Line 14... |
Line 14... |
| 14 |
<!--#include file="common/qstr.asp"-->
|
14 |
<!--#include file="common/qstr.asp"-->
|
| 15 |
<!--#include file="common/common_subs.asp"-->
|
15 |
<!--#include file="common/common_subs.asp"-->
|
| 16 |
<!--#include file="common/common_dbedit.asp"-->
|
16 |
<!--#include file="common/common_dbedit.asp"-->
|
| 17 |
<!--#include file="controls/ERGFormComponent/classFormComponent.asp"-->
|
17 |
<!--#include file="controls/ERGFormComponent/classFormComponent.asp"-->
|
| 18 |
<!--#include file="common/_popup_window_common.asp"-->
|
18 |
<!--#include file="common/_popup_window_common.asp"-->
|
| - |
|
19 |
<!--#include file="common/_form_window_common.asp"-->
|
| 19 |
<%
|
20 |
<%
|
| 20 |
'------------ ACCESS CONTROL ------------------
|
21 |
'------------ ACCESS CONTROL ------------------
|
| 21 |
%>
|
22 |
%>
|
| 22 |
<!--#include file="_access_control_login.asp"-->
|
23 |
<!--#include file="_access_control_login.asp"-->
|
| 23 |
<!--#include file="_access_control_general.asp"-->
|
24 |
<!--#include file="_access_control_general.asp"-->
|
| 24 |
<!--#include file="_access_control_project.asp"-->
|
25 |
<!--#include file="_access_control_project.asp"-->
|
| 25 |
<%
|
26 |
<%
|
| 26 |
'------------ Variable Definition -------------
|
27 |
'------------ Variable Definition -------------
|
| 27 |
Dim parPv_id
|
28 |
Dim parPv_id
|
| 28 |
Dim objFormComponent
|
- |
|
| 29 |
Dim patchRecCount
|
29 |
Dim patchRecCount
|
| 30 |
Dim rsTemp
|
30 |
Dim rsTemp
|
| 31 |
Dim parRfile
|
31 |
Dim parRfile
|
| 32 |
'------------ Constants Declaration -----------
|
32 |
'------------ Constants Declaration -----------
|
| 33 |
'------------ Variable Init -------------------
|
33 |
'------------ Variable Init -------------------
|
| 34 |
parPv_id = QStrPar("pv_id")
|
34 |
parPv_id = QStrPar("pv_id")
|
| 35 |
parRfile = QStrPar("rfile")
|
35 |
parRfile = QStrPar("rfile")
|
| 36 |
Set objFormComponent = New FormComponent
|
- |
|
| 37 |
'----------------------------------------------
|
36 |
'----------------------------------------------
|
| 38 |
%>
|
37 |
%>
|
| 39 |
<%
|
38 |
<%
|
| 40 |
'----------------------------------------------------------------------------------------------------
|
39 |
'----------------------------------------------------------------------------------------------------
|
| 41 |
Sub Run_onMakeOfficial ( nPv_id, nRtag_id )
|
40 |
Sub Run_onMakeOfficial ( nPv_id, nRtag_id )
|