httemplate/browse/part_export.cgi

   1 <!-- mason kludge -->
   2 <% include("/elements/header.html","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 % foreach my $part_export ( sort {
  18 %     $a->getfield('exportnum') <=> $b->getfield('exportnum')
  19 %   } qsearch('part_export',{}) ) {
  20 %
  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
  30            <TR><TD><% $opt %></TD><TD><% encode_entities($opt{$opt}) %></TD></TR>
  31 % }
  32
  33       </TABLE>
  34     </TD>
  35   </TR>
  36 % }
  37
  38
  39 </TABLE>
  40 </BODY>
  41 </HTML>