Subversion Repositories DevTools

Rev

Rev 5902 | Rev 5930 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5902 Rev 5929
Line 636... Line 636...
636
      End If
636
      End If
637
 
637
 
638
      If isAbtnRequired(aAbtnList, "btnRecycleBin") Then
638
      If isAbtnRequired(aAbtnList, "btnRecycleBin") Then
639
         varValues = Array(22, "btnRecycleBin", null,_
639
         varValues = Array(22, "btnRecycleBin", null,_
640
                           """_destroy_package.asp?pv_id=""& pkgInfoHash.Item(""pv_id"") &""&bfile=""& ScriptName &""&pkg_id=""& parPkgId &""&listby=""& parListBy &""""",_
640
                           """_destroy_package.asp?pv_id=""& pkgInfoHash.Item(""pv_id"") &""&bfile=""& ScriptName &""&pkg_id=""& parPkgId &""&listby=""& parListBy &""""",_
641
                           """vixConfirm('You are about to destroy ""& pkgInfoHash.Item (""pkg_name"") &"" ""& pkgInfoHash.Item (""pkg_version"") &"".<p>You cannot undo this operation.',{title:'Destroy Package Version', button:'Destroy', url: 'HREF'});""""""",_
641
                           """vixConfirm('You are about to destroy [""& pkgInfoHash.Item (""pkg_name"") &"" ""& pkgInfoHash.Item (""pkg_version"") &""].<p>You cannot undo this operation.<br>Do you want to proceed?',{title:'Destroy Package Version', button:'Destroy', url: 'HREF', icon : 'images/i_critical.gif'});""""""",_
642
                           "icons/i_destroy_package.gif",_
642
                           "icons/i_destroy_package.gif",_
643
                           "i_destroy_package_off",_
643
                           "icons/i_destroy_package_off.gif",_
-
 
644
                           "Destroy this package version",_
644
                           null,_
645
                           "Y",_
645
                           "Y",_
646
                           "Y",_
646
                           "Y",_
647
                           "Y",_
647
                           "N",_
-
 
648
                           "N")
648
                           "N")
649
         rsQry.AddNew varFields, varValues
649
         rsQry.AddNew varFields, varValues
650
      End If
650
      End If
651
 
651
 
652
      If isAbtnRequired(aAbtnList, "btnDeprecation") Then
652
      If isAbtnRequired(aAbtnList, "btnDeprecation") Then
Line 1199... Line 1199...
1199
   Public Sub Visible ( sItemName, Value )
1199
   Public Sub Visible ( sItemName, Value )
1200
      'Response.write sItemName &"here"& mobjNameDefMap.Item (Cstr(sItemName))
1200
      'Response.write sItemName &"here"& mobjNameDefMap.Item (Cstr(sItemName))
1201
      Call SetItemPropertyByIndex ( mobjNameDefMap.Item (Cstr(sItemName)), InxVisible, Value )
1201
      Call SetItemPropertyByIndex ( mobjNameDefMap.Item (Cstr(sItemName)), InxVisible, Value )
1202
   End Sub
1202
   End Sub
1203
   '-----------------------------------------------------------------------------------------------------------------
1203
   '-----------------------------------------------------------------------------------------------------------------
-
 
1204
   Public Sub ReadOnly ( sItemName, Value )
-
 
1205
      Call SetItemPropertyByIndex ( mobjNameDefMap.Item (Cstr(sItemName)), InxIsReadonlyAction, Value )
-
 
1206
   End Sub
-
 
1207
   '-----------------------------------------------------------------------------------------------------------------
1204
   Public Function IsVisible ( sItemName )
1208
   Public Function IsVisible ( sItemName )
1205
      'Response.write sItemName &"here"& mobjNameDefMap.Item (Cstr(sItemName))
1209
      'Response.write sItemName &"here"& mobjNameDefMap.Item (Cstr(sItemName))
1206
      IsVisible = GetItemPropertyByIndex ( mobjNameDefMap.Item (Cstr(sItemName)), InxVisible )
1210
      IsVisible = GetItemPropertyByIndex ( mobjNameDefMap.Item (Cstr(sItemName)), InxVisible )
1207
   End Function
1211
   End Function
1208
   '-----------------------------------------------------------------------------------------------------------------
1212
   '-----------------------------------------------------------------------------------------------------------------