projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
clarify CDR skipping options only work with prefix rating, RT#81480
[freeside.git]
/
FS
/
FS
/
part_export
/
internal_diddb.pm
diff --git
a/FS/FS/part_export/internal_diddb.pm
b/FS/FS/part_export/internal_diddb.pm
index
b51f631
..
8771ae8
100644
(file)
--- a/
FS/FS/part_export/internal_diddb.pm
+++ b/
FS/FS/part_export/internal_diddb.pm
@@
-22,6
+22,8
@@
tie my %options, 'Tie::IxHash',
sub rebless { shift; }
sub rebless { shift; }
+sub can_get_dids { 1; }
+
sub get_dids {
my $self = shift;
my %opt = ref($_[0]) ? %{$_[0]} : @_;
sub get_dids {
my $self = shift;
my %opt = ref($_[0]) ? %{$_[0]} : @_;
@@
-79,7
+81,7
@@
sub get_dids {
})
];
})
];
- } elsif ( $opt{'state'} ) { #return aracodes
+ } elsif ( $opt{'state'} ) { #return ar
e
acodes
$hash{state} = $opt{state};
$hash{state} = $opt{state};
@@
-92,7
+94,15
@@
sub get_dids {
];
} else {
];
} else {
- die "FS::part_export::internal_diddb::get_dids called without options\n";
+
+ #die "FS::part_export::internal_diddb::get_dids called without options\n";
+ return [ map { $_->npa. '-'. $_->nxx. '-'. $_->station }
+ qsearch({ 'table' => 'phone_avail',
+ 'hashref' => \%hash,
+ 'order_by' => 'ORDER BY station',
+ })
+ ];
+
}
}
}
}