httemplate/browse/part_export.cgi

   1 <!-- mason kludge -->
   2 <%= header("Export Listing", menubar( 'Main Menu' => "$p#sysadmin" )) %>
   3 Provisioning services to external machines, databases and APIs.<BR><BR>
   4 <A HREF="<%= $p %>edit/part_export.cgi"><I>Add a new export</I></A><BR><BR>
   5 <SCRIPT>
   6 function part_export_areyousure(href) {
   7   if (confirm("Are you sure you want to delete this export?") == true)
   8     window.location.href = href;
   9 }
  10 </SCRIPT>
  11
  12 <%= table() %>
  13   <TR>
  14     <TH COLSPAN=2>Export</TH>
  15     <TH>Options</TH>
  16   </TR>
  17
  18 <% foreach my $part_export ( sort {
  19      $a->getfield('exportnum') <=> $b->getfield('exportnum')
  20    } qsearch('part_export',{}) ) {
  21 %>
  22   <TR>
  23     <TD><A HREF="<%= $p %>edit/part_export.cgi?<%= $part_export->exportnum %>"><%= $part_export->exportnum %></A></TD>
  24     <TD><%= $part_export->exporttype %> to <%= $part_export->machine %> (<A HREF="<%= $p %>edit/part_export.cgi?<%= $part_export->exportnum %>">edit</A>&nbsp;|&nbsp;<A HREF="javascript:part_export_areyousure('<%= $p %>misc/delete-part_export.cgi?<%= $part_export->exportnum %>')">delete</A>)</TD>
  25     <TD>
  26       <%= itable() %>
  27       <% my %opt = $part_export->options;
  28          foreach my $opt ( keys %opt ) { %>
  29            <TR><TD><%= $opt %></TD><TD><%= encode_entities($opt{$opt}) %></TD></TR>
  30       <% } %>
  31       </TABLE>
  32     </TD>
  33   </TR>
  34
  35 <% } %>
  36
  37 </TABLE>
  38 </BODY>
  39 </HTML>