1 <% include('/edit/elements/edit.html',
2 'embed' => $opt{cust_main},
4 'table' => 'cust_main',
6 'html_table_class' => 'fsinnerbox',
7 'labels' => { 'custpaybynum' => '',
8 #'locationnum' => ' ',
11 { 'field' => 'custpaybynum',
12 'type' => 'cust_payby',
14 #'custnum' => $opt{cust_main}->custnum,
15 'm2m_method' => 'cust_payby',
16 'm2m_dstcol' => 'custpaybynum',
18 'm2_error_callback' => $m2_error_callback,
28 my $m2_error_callback = sub {
29 my($cgi, $object) = @_;
31 #process_o2m fields in process/cust_main-cust_payby.html
32 my $fields = FS::cust_payby->cgi_cust_payby_fields;
33 my @gfields = ( '', map "_$_", grep $_ !~ /^(payby|paydate_)/, @$fields );
36 if ( /^custpaybynum(\d+)$/ ) {
38 if ( grep $cgi->param("custpaybynum$num$_"), @gfields ) {
40 'custpaybynum' => scalar($cgi->param("custpaybynum$num")),
41 map { $_ => scalar($cgi->param("custpaybynum${num}_$_")) }
44 FS::cust_payby::cgi_hash_callback( \%hash );
45 FS::cust_payby->new( \%hash );