Subversion Repositories DevTools

Rev

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

Rev 7244 Rev 7277
Line 1174... Line 1174...
1174 
                           "N",_
 1174 
                           "N",_
1175 
                           "N")
 1175 
                           "N")
1176 
         rsQry.AddNew varFields, varValues
 1176 
         rsQry.AddNew varFields, varValues
1177 
      End If
 1177 
      End If
1178 
 
 1178 
 
1179 
	 If isAbtnRequired(aAbtnList, "btnEditBuildPlatforms") Then
 - 
 
1180 
         varValues = Array("btnEditBuildPlatforms", null,_
 - 
 
1181 
                           """javascript:;""",_
 - 
 
1182 
                           """onClick=""""MM_openVixIFrame('wAddBuildPlatform.asp?type=edit&bp_id=""& bp_id &""&rfile=""& SCRIPT_NAME &""&""& objPMod.ComposeURL() &""','Edit Build Platform');""""""",_
 - 
 
1183 
                           "icons/i_edit.gif",_
 - 
 
1184 
                           NULL,_
 - 
 
1185 
                           "Edit Build Platform",_
 - 
 
1186 
                           "Y",_
 - 
 
1187 
                           "Y",_
 - 
 
1188 
                           "N",_
 - 
 
1189 
                           "N")
 - 
 
1190 
         rsQry.AddNew varFields, varValues
 - 
 
1191 
      End If
 - 
 
1192 
 
 - 
 
1193 
      If isAbtnRequired(aAbtnList, "btnDeleteBuildPlatforms") Then
 - 
 
1194 
         varValues = Array("btnDeleteBuildPlatforms", null,_
 - 
 
1195 
                           """_DeleteBuildPlatform.asp?rfile=""& SCRIPT_NAME &""&bp_id=""& bp_id &""&""& objPMod.ComposeURL()",_
 - 
 
1196 
                           """vixConfirm('Remove Build Platform \'""& bp_name &""\' from this list?',{title:'Delete Build Platform', button:'Delete', url: 'HREF'});""""""",_
 - 
 
1197 
                           "icons/i_remove.gif",_
 - 
 
1198 
                           null,_
 - 
 
1199 
                           "Delete Build Platform",_
 - 
 
1200 
                           "Y",_
 - 
 
1201 
                           "Y",_
 - 
 
1202 
                           "N",_
 - 
 
1203 
                           "N")
 - 
 
1204 
         rsQry.AddNew varFields, varValues
 - 
 
1205 
      End If
 - 
 
1206 
 
 - 
 
1207 
      ' Move cursor to the first record
 1179 
      ' Move cursor to the first record
1208 
      rsQry.MoveFirst
 1180 
      rsQry.MoveFirst
1209 
 
 1181 
 
1210 
      If ((NOT rsQry.BOF) AND (NOT rsQry.EOF)) Then
 1182 
      If ((NOT rsQry.BOF) AND (NOT rsQry.EOF)) Then
1211 
         Call LoadButtons ( rsQry.GetRows() )
 1183 
         Call LoadButtons ( rsQry.GetRows() )