implemented API for transaction and supplier log
This commit is contained in:
parent
1c942f0be7
commit
9c79e50eba
3 changed files with 100 additions and 2 deletions
|
@ -189,6 +189,8 @@ sub startup {
|
||||||
$api_v1_org->post('/supplier/add')->to('api-organisation#post_supplier_add');
|
$api_v1_org->post('/supplier/add')->to('api-organisation#post_supplier_add');
|
||||||
$api_v1_org->post('/employee')->to('api-organisation#post_employee_read');
|
$api_v1_org->post('/employee')->to('api-organisation#post_employee_read');
|
||||||
$api_v1_org->post('/employee/add')->to('api-organisation#post_employee_add');
|
$api_v1_org->post('/employee/add')->to('api-organisation#post_employee_add');
|
||||||
|
$api_v1_org->post('/external/transactions')->to('api-external#post_lcc_transactions');
|
||||||
|
$api_v1_org->post('/external/suppliers')->to('api-external#post_lcc_suppliers');
|
||||||
|
|
||||||
my $api_v1_cust = $api_v1->under('/customer')->to('api-v1-customer#auth');
|
my $api_v1_cust = $api_v1->under('/customer')->to('api-v1-customer#auth');
|
||||||
|
|
||||||
|
|
|
@ -32,7 +32,7 @@ sub post_suppliers {
|
||||||
|
|
||||||
my $job_id = $c->minion->enqueue('csv_supplier_import' => [$filename] );
|
my $job_id = $c->minion->enqueue('csv_supplier_import' => [$filename] );
|
||||||
|
|
||||||
my $job_url = $c->url_for("/admin/minionjobs?id=$job_id")->to_abs;
|
my $job_url = $c->url_for("/admin/minion/jobs?id=$job_id")->to_abs;
|
||||||
|
|
||||||
$c->flash(success => "CSV import started, see status of minion job at: $job_url");
|
$c->flash(success => "CSV import started, see status of minion job at: $job_url");
|
||||||
return $c->redirect_to( '/admin/import_from' );
|
return $c->redirect_to( '/admin/import_from' );
|
||||||
|
@ -60,7 +60,7 @@ sub post_transactions {
|
||||||
|
|
||||||
my $job_id = $c->minion->enqueue('csv_transaction_import' => [$filename] );
|
my $job_id = $c->minion->enqueue('csv_transaction_import' => [$filename] );
|
||||||
|
|
||||||
my $job_url = $c->url_for("/admin/minionjobs?id=$job_id")->to_abs;
|
my $job_url = $c->url_for("/admin/minion/jobs?id=$job_id")->to_abs;
|
||||||
|
|
||||||
$c->flash(success => "CSV import started, see status of minion job at: $job_url");
|
$c->flash(success => "CSV import started, see status of minion job at: $job_url");
|
||||||
return $c->redirect_to( '/admin/import_from' );
|
return $c->redirect_to( '/admin/import_from' );
|
||||||
|
|
96
lib/Pear/LocalLoop/Controller/Api/External.pm
Normal file
96
lib/Pear/LocalLoop/Controller/Api/External.pm
Normal file
|
@ -0,0 +1,96 @@
|
||||||
|
package Pear::LocalLoop::Controller::Api::External;
|
||||||
|
use Mojo::Base 'Mojolicious::Controller';
|
||||||
|
use Mojo::JSON;
|
||||||
|
|
||||||
|
sub post_lcc_transactions {
|
||||||
|
my $c = shift;
|
||||||
|
|
||||||
|
use Devel::Dwarn;
|
||||||
|
Dwarn "hello";
|
||||||
|
|
||||||
|
my $user = $c->stash->{api_user};
|
||||||
|
|
||||||
|
# TODO Check the user is lancaster city council
|
||||||
|
|
||||||
|
my $validation = $c->validation;
|
||||||
|
$validation->input( $c->stash->{api_json} );
|
||||||
|
$validation->optional('page')->number;
|
||||||
|
|
||||||
|
return $c->api_validation_error if $validation->has_error;
|
||||||
|
|
||||||
|
my $lcc_import_ext_ref = $self->schema->resultset('ExternalReference')->find_or_create({ name => 'LCC CSV' });
|
||||||
|
|
||||||
|
my $lcc_transactions = $lcc_import_ext_ref->search_related('transactions',
|
||||||
|
undef,
|
||||||
|
{
|
||||||
|
page => $validation->param('page') || 1,
|
||||||
|
rows => 10,
|
||||||
|
order_by => { -desc => 'purchase_time' },
|
||||||
|
},
|
||||||
|
);
|
||||||
|
|
||||||
|
# purchase_time needs timezone attached to it
|
||||||
|
my @transaction_list = (
|
||||||
|
map {{
|
||||||
|
transaction_external_id => $_->external_id,
|
||||||
|
seller => $_->transaction->seller->name,
|
||||||
|
net_value => $_->transaction->value,
|
||||||
|
gross_value => $_->transaction->meta->gross_value,
|
||||||
|
sales_tax_value => $_->transaction->meta->sales_tax_value,
|
||||||
|
purchase_time => $c->transaction->format_iso_datetime($_->purchase_time),
|
||||||
|
}} $transactions->all
|
||||||
|
);
|
||||||
|
|
||||||
|
return $c->render( json => {
|
||||||
|
success => Mojo::JSON->true,
|
||||||
|
transactions => \@transaction_list,
|
||||||
|
page_no => $lcc_transactions->pager->total_entries,
|
||||||
|
});
|
||||||
|
}
|
||||||
|
|
||||||
|
sub post_lcc_suppliers {
|
||||||
|
my $c = shift;
|
||||||
|
|
||||||
|
my $user = $c->stash->{api_user};
|
||||||
|
|
||||||
|
# TODO give an error if user is not of Lancashire County Council
|
||||||
|
|
||||||
|
my $is_lcc = $self->entity->organisation->count({ name => "Lancashire County Council" });
|
||||||
|
|
||||||
|
my $validation = $c->validation;
|
||||||
|
$validation->input( $c->stash->{api_json} );
|
||||||
|
$validation->optional('page')->number;
|
||||||
|
|
||||||
|
return $c->api_validation_error if $validation->has_error;
|
||||||
|
|
||||||
|
my $lcc_import_ext_ref = $self->schema->resultset('ExternalReference')->find_or_create({ name => 'LCC CSV' });
|
||||||
|
|
||||||
|
my $lcc_suppliers = $lcc_import_ext_ref->search_related('organisations',
|
||||||
|
undef,
|
||||||
|
{
|
||||||
|
page => $validation->param('page') || 1,
|
||||||
|
rows => 10,
|
||||||
|
order_by => { -desc => 'organisation.name' },
|
||||||
|
},
|
||||||
|
);
|
||||||
|
|
||||||
|
# purchase_time needs timezone attached to it
|
||||||
|
my @supplier_list = (
|
||||||
|
map {{
|
||||||
|
supplier_external_id => $_->external_id,
|
||||||
|
name => $_->organisation->name,
|
||||||
|
street => $_->organisation->street_name,
|
||||||
|
town => $_->organisation->town,
|
||||||
|
postcode => $_->organisation->post_code,
|
||||||
|
country => $_->organisation->country,
|
||||||
|
}} $lcc_suppliers->all
|
||||||
|
);
|
||||||
|
|
||||||
|
return $c->render( json => {
|
||||||
|
success => Mojo::JSON->true,
|
||||||
|
suppliers => \@supplier_list,
|
||||||
|
page_no => $lcc_suppliers->pager->total_entries,
|
||||||
|
});
|
||||||
|
}
|
||||||
|
|
||||||
|
1;
|
Reference in a new issue