projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
dc2442a
)
add pkgnum var to phone_shellcommands export, RT#20725
author
Ivan Kohler
<ivan@freeside.biz>
Thu, 20 Dec 2012 18:59:05 +0000
(10:59 -0800)
committer
Ivan Kohler
<ivan@freeside.biz>
Thu, 20 Dec 2012 18:59:05 +0000
(10:59 -0800)
FS/FS/part_export/phone_shellcommands.pm
patch
|
blob
|
history
diff --git
a/FS/FS/part_export/phone_shellcommands.pm
b/FS/FS/part_export/phone_shellcommands.pm
index
5c1ae01
..
9ace213
100644
(file)
--- a/
FS/FS/part_export/phone_shellcommands.pm
+++ b/
FS/FS/part_export/phone_shellcommands.pm
@@
-49,6
+49,7
@@
old_ for replace operations):
<LI><code>$sip_password</code> - SIP secret (quoted for the shell)
<LI><code>$pin</code> - Personal identification number
<LI><code>$cust_name</code> - Customer name (quoted for the shell)
<LI><code>$sip_password</code> - SIP secret (quoted for the shell)
<LI><code>$pin</code> - Personal identification number
<LI><code>$cust_name</code> - Customer name (quoted for the shell)
+ <LI><code>$pkgnum</code> - Internal package number
</UL>
END
);
</UL>
END
);
@@
-87,6
+88,7
@@
sub _export_command {
${$_} = $svc_phone->getfield($_) foreach $svc_phone->fields;
}
my $cust_pkg = $svc_phone->cust_svc->cust_pkg;
${$_} = $svc_phone->getfield($_) foreach $svc_phone->fields;
}
my $cust_pkg = $svc_phone->cust_svc->cust_pkg;
+ my $pkgnum = $cust_pkg ? $cust_pkg->pkgnum : '';
my $cust_name = $cust_pkg ? $cust_pkg->cust_main->name : '';
$cust_name = shell_quote $cust_name;
my $sip_password = shell_quote $svc_phone->sip_password;
my $cust_name = $cust_pkg ? $cust_pkg->cust_main->name : '';
$cust_name = shell_quote $cust_name;
my $sip_password = shell_quote $svc_phone->sip_password;
@@
-111,7
+113,10
@@
sub _export_replace {
${"new_$_"} = $new->getfield($_) foreach $new->fields;
}
${"new_$_"} = $new->getfield($_) foreach $new->fields;
}
+ my $old_cust_pkg = $old->cust_svc->cust_pkg;
+ my $old_pkgnum = $old_cust_pkg ? $old_cust_pkg->pkgnum : '';
my $cust_pkg = $new->cust_svc->cust_pkg;
my $cust_pkg = $new->cust_svc->cust_pkg;
+ my $new_pkgnum = $cust_pkg ? $cust_pkg->pkgnum : '';
my $new_cust_name = $cust_pkg ? $cust_pkg->cust_main->name : '';
$new_cust_name = shell_quote $new_cust_name;
#done setting variables for the command
my $new_cust_name = $cust_pkg ? $cust_pkg->cust_main->name : '';
$new_cust_name = shell_quote $new_cust_name;
#done setting variables for the command