X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fmisc%2Fdid_order_confirmed.html;fp=httemplate%2Fmisc%2Fdid_order_confirmed.html;h=53a41a73809b304e6ac7ab1188b0ff6d366317a3;hb=2579dce95f2a41d7a162404f193545e9601c374d;hp=0000000000000000000000000000000000000000;hpb=6e3e6b1051bf8bc603a437a72d5272f61330af18;p=freeside.git diff --git a/httemplate/misc/did_order_confirmed.html b/httemplate/misc/did_order_confirmed.html new file mode 100644 index 000000000..53a41a738 --- /dev/null +++ b/httemplate/misc/did_order_confirmed.html @@ -0,0 +1,37 @@ +<% include('/elements/header-popup.html', "DID order confirmed") %> + + + +<%init> +die "access denied" + unless $FS::CurrentUser::CurrentUser->access_right('Import'); + +$cgi->param('ordernum') =~ /^(\d+)$/ or die 'illegal ordernum'; +my $ordernum = $1; +my $did_order = qsearchs( { + 'table' => 'did_order', + 'hashref' => { 'ordernum' => $ordernum }, +} ); +die "No order $ordernum" unless $did_order; + +my $confirmed = ''; +$confirmed = parse_datetime($cgi->param('confirmed')) + if $cgi->param('confirmed') && $cgi->param('confirmed') !~ /^\d+$/; +$confirmed = $1 + if $cgi->param('confirmed') && $cgi->param('confirmed') =~ /^(\d+)$/; + +die "invalid confirmation date" unless $confirmed; + +my $error = ''; +$did_order->confirmed($confirmed); +$did_order->vendor_order_id($cgi->param('vendor_order_id')); +$error = $did_order->replace; + +if ( $error ) { + $cgi->param('error', $error); + print $cgi->redirect(popurl(1). "did_order_confirm.html?". $cgi->query_string ); +} + +