diff options
| author | Mark Wells <mark@freeside.biz> | 2015-08-29 13:58:58 -0700 |
|---|---|---|
| committer | Mark Wells <mark@freeside.biz> | 2015-08-30 17:48:55 -0700 |
| commit | 179b05af5cc54a0295c65323b0a23b6c9426d6a5 (patch) | |
| tree | a0f12f3b9dc4f9dff65cf5739907f02ed2055011 | |
| parent | 5a2a2f8a6f95738758b43cdbbfa48dd7830de2d5 (diff) | |
#21564: queueable sending
| -rw-r--r-- | FS/FS/cust_msg.pm | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/FS/FS/cust_msg.pm b/FS/FS/cust_msg.pm index ec2c961a3..db026808c 100644 --- a/FS/FS/cust_msg.pm +++ b/FS/FS/cust_msg.pm @@ -205,6 +205,25 @@ sub parts { =back +=head1 SUBROUTINES + +=over 4 + +=item process_send CUSTMSGNUM + +Given a C<cust_msg.custmsgnum> value, sends the message. It must already +have been prepared (via L<FS::msg_template/prepare>). + +=cut + +sub process_send { + my $custmsgnum = shift; + my $cust_msg = FS::cust_msg->by_key($custmsgnum) + or die "cust_msg #$custmsgnum not found"; + my $error = $cust_msg->send; + die $error if $error; +} + =head1 SEE ALSO L<FS::msg_template>, L<FS::cust_main>, L<FS::Record>. |