diff --git a/old/bin/aa.pl b/old/bin/aa.pl
index 14a12960f9..2ab345ad24 100644
--- a/old/bin/aa.pl
+++ b/old/bin/aa.pl
@@ -176,6 +176,9 @@ sub reverse {
     $form->{title}     = $locale->text('Add');
     $form->{reversing_reference} = $form->{invnumber};
     $form->{invnumber} .= '-VOID';
+    my $wf = $form->{_wire}->get( 'workflows' )
+        ->fetch_workflow( 'AR/AP', $form->{workflow_id} );
+    $wf->execute_action( 'reverse' );
 
     &create_links;