Subversion Repositories DevTools

Rev

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

Rev 161 Rev 165
Line 918... Line 918...
918 
WScript.Echo "Making all READ ONLY from folder "& parPkg_Version &"/"
 918 
WScript.Echo "Making all READ ONLY from folder "& parPkg_Version &"/"
919 
objPkgFileSys.All_Read_Only  parPkg_name, parPkg_Version        ' Make sure all file and folders are read only. Starting from version folder.
 919 
objPkgFileSys.All_Read_Only  parPkg_name, parPkg_Version        ' Make sure all file and folders are read only. Starting from version folder.
920 
 
 920 
 
921 
Call Write_To_Release_Notes_Info ( parPv_id, notesLocation )
 921 
Call Write_To_Release_Notes_Info ( parPv_id, notesLocation )
922 
 
 922 
 
923 
'Run release changed script
 - 
 
924 
Call Get_Release_Info (parPv_id, outRTAG_ID, outPKG_ID)
 - 
 
925 
Call objPkgFileSys.Make_Release_Changed(parPkg_name,parPkg_version,outRTAG_ID,outPKG_ID,parPv_id,parProj_id)
 - 
 
926 
Set objPkgFileSys = Nothing
 923 
Set objPkgFileSys = Nothing
927 
 
 924 
 
928 
WScript.Echo "PostRun completed successfully!"
 925 
WScript.Echo "PostRun completed successfully!"
929 
]]>
 926 
]]>
930 
		</script>
 927 
		</script>
931 
	</job>
 928 
	</job>
- 
 
 929 
	<job id="ReleaseChanged" args="/pkg_name:jats_tutorial /pkg_version:1.0.0 /rtag_id:2 /pkg_id:30261 /pv_id:30261 /proj_id:3 /mode_id:1" prompt="no">
- 
 
 930 
		<?job error="true" debug="true" ?>
- 
 
 931 
		<runtime>
- 
 
 932 
			<named helpstring="Package Name" name="pkg_name" required="false" type="string"/>
- 
 
 933 
			<named helpstring="Package Version" name="pkg_version" required="false" type="string"/>
- 
 
 934 
			<named helpstring="Release Tag Id" name="rtag_id" required="false" type="string"/>
- 
 
 935 
			<named helpstring="Package Id" name="pkg_id" required="false" type="string"/>
- 
 
 936 
			<named helpstring="Package version Id" name="pv_id" required="false" type="string"/>
- 
 
 937 
			<named helpstring="Project Id" name="proj_id" required="false" type="string"/>
- 
 
 938 
			<named helpstring="Change Mode Id" name="mode_id" required="false" type="simple"/>
- 
 
 939 
			<usage>
- 
 
 940 
Usage:
- 
 
 941 
   on_Make_Official.wsf [/pv_id:value] [/pkg_name:"value"] [/pkg_version:"value"] [/rtag_id:value] [/pkg_id:value] [/pv_id:value] [/proj_id:value] [/mode_id:value]
- 
 
 942 
 
- 
 
 943 
Options:
- 
 
 944 
 
- 
 
 945 
pkg_name     : Package Name
- 
 
 946 
pkg_version  : Package Version
- 
 
 947 
rtag_id      : Release Tag Id
- 
 
 948 
pkg_id       : Package Id
- 
 
 949 
pv_id        : Package version Id
- 
 
 950 
proj_id      : Project Id
- 
 
 951 
mode_id      : Package Change Mode Id
- 
 
 952 
			</usage>
- 
 
 953 
		</runtime>
- 
 
 954 
		<object id="Object1" progid="OracleInProcServer.XOraSession" events="true"/>
- 
 
 955 
		<script language="VBScript" src="common_subs.vbs"/>
- 
 
 956 
		<script language="VBScript" src="config.vbs"/>
- 
 
 957 
		<script language="VBScript" src="pkg_archive.vbs"/>
- 
 
 958 
		<script id="ReleaseChanged" language="VBScript">
- 
 
 959 
<![CDATA[
- 
 
 960 
Option Explicit
- 
 
 961 
'=====================================================
- 
 
 962 
'        Name: 	ReleaseChanged
- 
 
 963 
' Description:	Process that is called after the content of a release has changed
- 
 
 964 
' 		INPUT:
- 
 
 965 
'               pkg_name
- 
 
 966 
'               pkg_version
- 
 
 967 
'               rtag_id
- 
 
 968 
'               pkg_id
- 
 
 969 
'               pv_id
- 
 
 970 
'               proj_id
- 
 
 971 
'               mode_id
- 
 
 972 
'=====================================================
- 
 
 973 
 
- 
 
 974 
'================ Variable Definition ================
- 
 
 975 
Dim objArgs
- 
 
 976 
Dim parPkg_name,parPkg_version,parRtag_id,parPkg_id,parPv_id,parProj_id,parMode_id
- 
 
 977 
Dim objPkgFileSys
- 
 
 978 
'=============== Constants Declaration ===============
- 
 
 979 
'-----------------------------------------------------------------------------------------------------------------
- 
 
 980 
'================== Variable Init ====================
- 
 
 981 
Set objPkgFileSys = New PkgArchive
- 
 
 982 
'=====================================================
- 
 
 983 
'-------------------- MAIN LINE ----------------------
- 
 
 984 
WScript.Echo "==================== job:ReleaseChanged ===================="
- 
 
 985 
 
- 
 
 986 
Set objArgs = WScript.Arguments
- 
 
 987 
 
- 
 
 988 
If (objArgs.Unnamed.Count > 0) Then
- 
 
 989 
	Wscript.Echo "ERROR: Unnamed parameters!"
- 
 
 990 
	objArgs.ShowUsage
- 
 
 991 
   	WScript.Quit
- 
 
 992 
Else
- 
 
 993 
	parPkg_name = objArgs.Named.Item("pkg_name")
- 
 
 994 
	parPkg_Version = objArgs.Named.Item("pkg_version")
- 
 
 995 
	parRtag_id = objArgs.Named.Item("rtag_id")
- 
 
 996 
	parPkg_id = objArgs.Named.Item("pkg_id")
- 
 
 997 
	parPv_id = objArgs.Named.Item("pv_id")
- 
 
 998 
	parProj_id = objArgs.Named.Item("proj_id")
- 
 
 999 
	parMode_id = objArgs.Named.Item("mode_id")
- 
 
 1000 
   	If parPv_id = ""  Then
- 
 
 1001 
   	  objArgs.ShowUsage
- 
 
 1002 
   	  WScript.Quit
- 
 
 1003 
   	End If
- 
 
 1004 
End If
- 
 
 1005 
 
- 
 
 1006 
Dim nPkgType
- 
 
 1007 
objPkgFileSys.Map_Network_Drive  UNC_ARCHIVE, MappedDrive 	' Map Drive if required
- 
 
 1008 
 
- 
 
 1009 
nPkgType = Get_Package_Type ( parPv_id )
- 
 
 1010 
 
- 
 
 1011 
' Is this package ERG PRODUCT
- 
 
 1012 
objPkgFileSys.Remote_Host = TELNET_MACHINE
- 
 
 1013 
If nPkgType = enumPKG_TYPE_ERG_PRODUCT Then
- 
 
 1014 
  objPkgFileSys.Archive_Path = TELNET_DEPLOY_ARCHIVE
- 
 
 1015 
Else
- 
 
 1016 
  objPkgFileSys.Archive_Path = TELNET_DPKG_ARCHIVE
- 
 
 1017 
End If
- 
 
 1018 
 
- 
 
 1019 
Call objPkgFileSys.Make_Release_Changed(parPkg_name,parPkg_version,parRtag_id,parPkg_id,parPv_id,parProj_id,parMode_id,false)
- 
 
 1020 
 
- 
 
 1021 
Set objPkgFileSys = Nothing
- 
 
 1022 
 
- 
 
 1023 
WScript.Echo "ReleaseChanged completed successfully!"
- 
 
 1024 
 
- 
 
 1025 
]]>
- 
 
 1026 
		</script>
- 
 
 1027 
	</job>
932 
</package>
 1028 
</package>