summaryrefslogtreecommitdiff
path: root/fs_selfservice
diff options
context:
space:
mode:
authorIvan Kohler <ivan@freeside.biz>2019-01-01 10:48:43 -0800
committerIvan Kohler <ivan@freeside.biz>2019-01-01 10:48:43 -0800
commit6b0c4f9f90b299dabe3e946ad8ea00ca94efa7de (patch)
treeed36652ab715f07705f3340c3481b9b25e66a453 /fs_selfservice
parent70e755503b3cb5d921c90caf1a6e513301200355 (diff)
parent0ec0b91b7c383d626dd75b0c2b2d3969e5bdcbc7 (diff)
Merge branch 'master' of git.freeside.biz:/home/git/freeside
Diffstat (limited to 'fs_selfservice')
-rw-r--r--fs_selfservice/FS-SelfService/cgi/change_pay.html4
-rw-r--r--fs_selfservice/FS-SelfService/cgi/check.html6
2 files changed, 8 insertions, 2 deletions
diff --git a/fs_selfservice/FS-SelfService/cgi/change_pay.html b/fs_selfservice/FS-SelfService/cgi/change_pay.html
index e272669dc..2b3142f4a 100644
--- a/fs_selfservice/FS-SelfService/cgi/change_pay.html
+++ b/fs_selfservice/FS-SelfService/cgi/change_pay.html
@@ -39,8 +39,8 @@
);
## Don't show CHEK or DCHK option if ACH is read only
- delete( $payby_index{'CHEK'} ) unless !$ach_read_only;
- delete( $payby_index{'DCHK'} ) unless !$ach_read_only;
+ delete( $payby_index{'CHEK'} ) if ($ach_read_only && $payby ne "CHEK");
+ delete( $payby_index{'DCHK'} ) if ($ach_read_only && $payby ne "DCHK");
tie my %options, 'Tie::IxHash', ();
foreach my $payby_option ( grep { exists( $payby_index{$_} ) } @paybys ) {
diff --git a/fs_selfservice/FS-SelfService/cgi/check.html b/fs_selfservice/FS-SelfService/cgi/check.html
index 17635c306..b6fead12a 100644
--- a/fs_selfservice/FS-SelfService/cgi/check.html
+++ b/fs_selfservice/FS-SelfService/cgi/check.html
@@ -1,3 +1,9 @@
+<%=
+ $OUT = '';
+ if ($ach_read_only) {
+ $OUT .= qq!<TR><TD COLSPAN=2><FONT COLOR="red">You only have read only access</TD></TR>!;
+ }
+%>
<TR>
<TD ALIGN="right">Account&nbsp;type</TD>
<TD <%= ($ach_read_only ? ' BGCOLOR="#ffffff"' : '') %> >