+sub invoice {
+ my ($invoice, %params) = @_;
+
+ if ( $invoice->is_sales ) {
+ if ( $invoice->invoice ) {
+ return _is_ir_record($invoice, 'is', %params);
+ } else {
+ return _is_ir_record($invoice, 'ar', %params);
+ }
+ } else {
+ if ( $invoice->invoice ) {
+ return _is_ir_record($invoice, 'ir', %params);
+ } else {
+ return _is_ir_record($invoice, 'ap', %params);
+ }
+ };
+};
+