X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=eg%2Fexport_template.pm;h=ca58d4bed887538a5b7ddfe828f6937176785d22;hp=1d441bda1f17a48db6424d7e8aecf3a0ee23554d;hb=e6f6f496883b8e8be42f4d92f01b61dbc2c590be;hpb=eb7c552dd8290d6b33a4e026c5dc21ebf01105cf diff --git a/eg/export_template.pm b/eg/export_template.pm index 1d441bda1..ca58d4bed 100644 --- a/eg/export_template.pm +++ b/eg/export_template.pm @@ -9,7 +9,7 @@ sub rebless { shift; } sub _export_insert { my($self, $svc_something) = (shift, shift); - $err_or_queue = $self->myexport_queue( $svc_acct->svcnum, 'insert', + $err_or_queue = $self->myexport_queue( $svc_something->svcnum, 'insert', $svc_something->username, $svc_something->_password ); ref($err_or_queue) ? '' : $err_or_queue; } @@ -26,7 +26,7 @@ sub _export_replace { sub _export_delete { my( $self, $svc_something ) = (shift, shift); - $err_or_queue = $self->myexport_queue( $svc_acct->svcnum, + $err_or_queue = $self->myexport_queue( $svc_something->svcnum, 'delete', $svc_something->username ); ref($err_or_queue) ? '' : $err_or_queue; } @@ -42,9 +42,15 @@ sub myexport_queue { } sub myexport_insert { #subroutine, not method + my( $username, $password ) = @_; + #do things with $username and $password } + sub myexport_replace { #subroutine, not method } + sub myexport_delete { #subroutine, not method + my( $username ) = @_; + #do things with $username }