diff options
| author | ivan <ivan> | 2011-03-28 02:00:53 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2011-03-28 02:00:53 +0000 |
| commit | e0a26680d75fc2000bde195eba7946805a3aaa28 (patch) | |
| tree | a91f1afc3d19238f260c86fc5e315f7cb07d9bd8 /httemplate/view | |
| parent | e5d67ff80245eec9100e9fdacd94b95aa8157414 (diff) | |
finish existing customer dsl order, RT#7111
Diffstat (limited to 'httemplate/view')
| -rw-r--r-- | httemplate/view/cust_main/order_pkg_link.html | 11 | ||||
| -rw-r--r-- | httemplate/view/qual.cgi | 7 |
2 files changed, 10 insertions, 8 deletions
diff --git a/httemplate/view/cust_main/order_pkg_link.html b/httemplate/view/cust_main/order_pkg_link.html index 2e8b1dac1..ba731ae11 100644 --- a/httemplate/view/cust_main/order_pkg_link.html +++ b/httemplate/view/cust_main/order_pkg_link.html @@ -6,7 +6,7 @@ 'cust_main' => $cust_main, 'closetext' => 'Close', 'width' => 763, - 'height' => 538, + 'height' => $height, %optional, ) %> @@ -14,9 +14,10 @@ my($cust_main, %opt) = @_; -my %optional = (); -$optional{'pkgpart'} = $opt{'pkgpart'} if $opt{'pkgpart'}; -$optional{'locationnum'} = $opt{'locationnum'} if $opt{'locationnum'}; -$optional{'svcpart'} = $opt{'svcpart'} if $opt{'svcpart'}; +my %optional = map { $_ => $opt{$_} } + grep $opt{$_}, + qw( lock_pkgpart lock_locationnum qualnum svcpart ); + +my $height = $opt{'lock_locationnum'} ? 296 : 538; </%init> diff --git a/httemplate/view/qual.cgi b/httemplate/view/qual.cgi index 6998b8541..5c15ec0c3 100644 --- a/httemplate/view/qual.cgi +++ b/httemplate/view/qual.cgi @@ -46,9 +46,10 @@ % if($cust_or_prospect->custnum) { -% my %opt = ( 'label' => $pkglist->{$pkgpart}, -% 'pkgpart' => $pkgpart, -% 'locationnum' => $location{'locationnum'}, +% my %opt = ( 'label' => $pkglist->{$pkgpart}, +% 'lock_pkgpart' => $pkgpart, +% 'lock_locationnum' => $location{'locationnum'}, +% 'qualnum' => $qual->qualnum, % ); % if ( $export->exporttype eq 'ikano' ) { % my $pkg_svc = qsearchs('pkg_svc', { 'pkgpart' => $pkgpart, |