[interchange-cvs] interchange - heins modified dist/lib/UI/pages/admin/order_view.html
interchange-core@icdevgroup.org
interchange-core@icdevgroup.org
Sun Oct 27 00:37:01 2002
User: heins
Date: 2002-10-27 04:36:04 GMT
Modified: dist/lib/UI/pages/admin order_view.html
Log:
* Add ability to pick credit card out of order and send for
decrypting at the client.
Revision Changes Path
2.8 +30 -3 interchange/dist/lib/UI/pages/admin/order_view.html
rev 2.8, prev_rev 2.7
Index: order_view.html
===================================================================
RCS file: /var/cvs/interchange/dist/lib/UI/pages/admin/order_view.html,v
retrieving revision 2.7
retrieving revision 2.8
diff -u -r2.7 -r2.8
--- order_view.html 27 Sep 2002 14:55:06 -0000 2.7
+++ order_view.html 27 Oct 2002 04:36:04 -0000 2.8
@@ -6,7 +6,18 @@
@_UI_STD_HEAD_@
[calc]
delete $Scratch->{ui_bounce};
- return if $CGI->{order};
+ if ($CGI->{order}) {
+ if($CGI->{deliver_encrypted}) {
+ my $dir = q{__ORDER_DIRECTORY__} || 'orders';
+ my $ord = $Tag->filter('filesafe', $CGI->{order});
+ $Tag->deliver({
+ file => "orders/$ord",
+ get_encrypted => 1,
+ type => 'application/pgp-encrypted',
+ });
+ }
+ return;
+ }
$CGI->{order} = $CGI->{mv_arg}
or $Scratch->{ui_bounce} = '__UI_BASE__/order';
return;
@@ -109,9 +120,25 @@
mv_data_table=transactions
item_id=[loop-code]
ui_return_to=__UI_BASE__/order
- "]Edit order</a></tr>
+ "][L]Edit order[/L]</a>
+ </td>
</tr>
+[if type=file term="[either]__ORDER_DIRECTORY__[or]orders[/either]/[loop-code]"]
+<tr>
+ <td align=right> </td>
+ <td>[page href="process/[loop-code].pgp"
+ add_dot_html=0
+ form="
+ deliver_encrypted=1
+ mv_todo=return
+ mv_nextpage=@@MV_PAGE@@
+ order=[loop-code]
+ "][L]Decrypt Credit Card[/L]</a>
+ </td>
+</tr>
+[/if]
+
</table>
</td><td valign=top colspan=4>
@@ -427,4 +454,4 @@
<!-- ----- END REAL STUFF ----- -->
@_UI_STD_FOOTER_@
-<!-- page: @@MV_PAGE@@ -->
+<!-- page: @@MV_PAGE@@ version: $Id: order_view.html,v 2.8 2002/10/27 04:36:04 mheins Exp $ -->