X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fmisc%2Fchange_pkg.cgi;h=323784554c8eae3ed3f4db2905049da509e9d2a9;hp=923be71b141e7589c20b6335bdc4d46a2a46237d;hb=5f2c3a88d92952d13a5231a230e332e1a8e94016;hpb=98ea745e4b55a38ad8b5ba3749c56327d641d65d diff --git a/httemplate/misc/change_pkg.cgi b/httemplate/misc/change_pkg.cgi index 923be71b1..323784554 100755 --- a/httemplate/misc/change_pkg.cgi +++ b/httemplate/misc/change_pkg.cgi @@ -6,59 +6,119 @@
@@ -94,6 +154,8 @@ my $part_pkg = $cust_pkg->part_pkg; my $title = "Change Package"; +my $use_contract_end = $cust_pkg->get('contract_end') ? 1 : 0; + # if there's already a package change ordered, preload it if ( $cust_pkg->change_to_pkgnum ) { my $change_to = FS::cust_pkg->by_key($cust_pkg->change_to_pkgnum); @@ -101,6 +163,9 @@ if ( $cust_pkg->change_to_pkgnum ) { foreach(qw( start_date pkgpart locationnum quantity )) { $cgi->param($_, $change_to->get($_)); } + if ($use_contract_end) { + $cgi->param('contract_end', $change_to->get('contract_end')); + } $title = "Edit Scheduled Package Change"; } %init>