Subversion Repositories DevTools

Rev

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

Rev 6579 Rev 6770
Line 718... Line 718...
718 
                           "N",_
 718 
                           "N",_
719 
                           "N")
 719 
                           "N")
720 
         rsQry.AddNew varFields, varValues
 720 
         rsQry.AddNew varFields, varValues
721 
      End If
 721 
      End If
722 
 
 722 
 
- 
 
 723 
      If isAbtnRequired(aAbtnList, "btnProjectReplication") Then
- 
 
 724 
         varValues = Array(25, "btnProjectReplication", null,_
- 
 
 725 
                           """form_project_replication.asp?proj_id=""& parProjId &""""",_
- 
 
 726 
                           null,_
- 
 
 727 
                           "images/project_replication.gif",_
- 
 
 728 
                           null,_
- 
 
 729 
                           "Display the project replication information.",_
- 
 
 730 
                           "Y",_
- 
 
 731 
                           "Y",_
- 
 
 732 
                           "N",_
- 
 
 733 
                           "N")
- 
 
 734 
         rsQry.AddNew varFields, varValues
- 
 
 735 
      End If
723 
 
 736 
 
724 
      ' NOTE: I do not think this one is ever used
 737 
      ' NOTE: I do not think this one is ever used
725 
      If isAbtnRequired(aAbtnList, "btnAddProc") Then
 738 
      If isAbtnRequired(aAbtnList, "btnAddProc") Then
726 
         varValues = Array(26, "btnAddProc", "Add Process",_
 739 
         varValues = Array(26, "btnAddProc", "Add Process",_
727 
                           """javascript:;""",_
 740 
                           """javascript:;""",_
Line 830... Line 843...
830 
                           "Y",_
 843 
                           "Y",_
831 
                           "Y",_
 844 
                           "Y",_
832 
                           "N",_
 845 
                           "N",_
833 
                           "N")
 846 
                           "N")
834 
         rsQry.AddNew varFields, varValues
 847 
         rsQry.AddNew varFields, varValues
- 
 
 848 
      End If
- 
 
 849 
 
- 
 
 850 
      If isAbtnRequired(aAbtnList, "btnEditBlatMachine") Then
- 
 
 851 
         varValues = Array(29, "btnEditBlatMachine", null,_
- 
 
 852 
                           """javascript:;""",_
- 
 
 853 
                           """onClick=""""MM_openVixIFrame('wAddPkgReplica.asp?type=edit&server_id=""& server_id &""&rfile=""& SCRIPT_NAME &""&""& objPMod.ComposeURL() &""','Edit Package Replica');""""""",_
- 
 
 854 
                           "icons/i_edit.gif",_
- 
 
 855 
                           NULL,_
- 
 
 856 
                           "Edit Package Replica",_
- 
 
 857 
                           "Y",_
- 
 
 858 
                           "Y",_
- 
 
 859 
                           "N",_
- 
 
 860 
                           "N")
- 
 
 861 
         rsQry.AddNew varFields, varValues
- 
 
 862 
      End If
- 
 
 863 
 
- 
 
 864 
      If isAbtnRequired(aAbtnList, "btnDeleteBlatMachine") Then
- 
 
 865 
         varValues = Array(30, "btnDeleteBlatMachine", null,_
- 
 
 866 
                           """_DeletePkgReplica.asp?rfile=""& SCRIPT_NAME &""&server_id=""& server_id &""&""& objPMod.ComposeURL()",_
- 
 
 867 
                           """vixConfirm('Remove Package Replica \'""& display_name &""\' from this list?',{title:'Delete Package Replica', button:'Delete', url: 'HREF'});""""""",_
- 
 
 868 
                           "icons/i_remove.gif",_
- 
 
 869 
                           null,_
- 
 
 870 
                           "Delete Package Replica",_
- 
 
 871 
                           "Y",_
- 
 
 872 
                           "Y",_
- 
 
 873 
                           "N",_
- 
 
 874 
                           "N")
- 
 
 875 
         rsQry.AddNew varFields, varValues
835 
      End If
 876 
      End If
836 
 
 877 
 
837 
      If isAbtnRequired(aAbtnList, "btnPendingIntegration") Then
 878 
      If isAbtnRequired(aAbtnList, "btnPendingIntegration") Then
838 
         varValues = Array(32, "btnPendingIntegration", null,_
 879 
         varValues = Array(32, "btnPendingIntegration", null,_
839 
                           """_modify_product_state.asp?state_id=1&rfile=""& ScriptName &""&pv_id=""& parPv_id &""&rtag_id=""& parRtag_id",_
 880 
                           """_modify_product_state.asp?state_id=1&rfile=""& ScriptName &""&pv_id=""& parPv_id &""&rtag_id=""& parRtag_id",_