[freeside-commits] freeside/rt/share/html/Callbacks/CheckMandatoryFields/Ticket/Modify.html BeforeActionList, NONE, 1.1

[Mark Wells]

Update of /home/cvs/cvsroot/freeside/rt/share/html/Callbacks/CheckMandatoryFields/Ticket/Modify.html
In directory wavetail.420.am:/tmp/cvs-serv9525/share/html/Callbacks/CheckMandatoryFields/Ticket/Modify.html

Added Files:
	BeforeActionList 
Log Message:
RT mandatory custom fields, RT#9260

--- NEW FILE: BeforeActionList ---
<%init>
use Data::Dumper;
my $ARGSRef = $ARGS{'ARGSRef'};
my $TicketObj = $ARGS{'Ticket'};
my $results = $ARGS{'Actions'};
if(defined($ARGSRef->{'resolve'})) {
  my @errors =  
    $m->comp('/Ticket/Elements/CheckMandatoryFields', Ticket => $TicketObj);
  return if !@errors;
  my $msg = 'Missing required field'.(@errors > 1 ? 's' : '').': ' .
            join(', ', map { $_->Name } @errors);
  $m->notes( ('InvalidField-' . $_->Id) => 'Required' ) foreach @errors;
  push @$results, $msg;
}
</%init>