Subversion Repositories DevTools

Rev

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

Rev 6827 Rev 7286
Line 14... Line 14...
14
<!--#include file="common/globals.asp"-->
14
<!--#include file="common/globals.asp"-->
15
<!--#include file="common/formating.asp"-->
15
<!--#include file="common/formating.asp"-->
16
<!--#include file="common/qstr.asp"-->
16
<!--#include file="common/qstr.asp"-->
17
<!--#include file="common/common_subs.asp"-->
17
<!--#include file="common/common_subs.asp"-->
18
<!--#include file="common/common_dbedit.asp"-->
18
<!--#include file="common/common_dbedit.asp"-->
-
 
19
<!--#include file="common/_popup_window_common.asp"-->
19
<!--#include file="common/_form_window_common.asp"-->
20
<!--#include file="common/_form_window_common.asp"-->
20
<%
21
<%
21
'------------ ACCESS CONTROL ------------------
22
'------------ ACCESS CONTROL ------------------
22
%>
23
%>
23
 
24
 
Line 26... Line 27...
26
Dim rsPackages
27
Dim rsPackages
27
Dim FRview_id
28
Dim FRview_id
28
Dim	parProjId
29
Dim	parProjId
29
Dim	Query_String
30
Dim	Query_String
30
parProjId	=	Request("proj_id")
31
parProjId	=	Request("proj_id")
31
'Dim objFormCollector
-
 
32
'------------ CONSTANTS DECLARATION -----------
32
'------------ CONSTANTS DECLARATION -----------
33
'------------ VARIABLE INIT -------------------
33
'------------ VARIABLE INIT -------------------
34
Set objFormCollector = CreateObject("Scripting.Dictionary")
-
 
35
 
-
 
36
'------------ CONDITIONS ----------------------
34
'------------ CONDITIONS ----------------------
37
'----------------------------------------------
35
'----------------------------------------------
38
%>
36
%>
39
<%
37
<%
40
'--------------------------------------------------------------------------------------------------------------------------
38
'--------------------------------------------------------------------------------------------------------------------------