RT-Plugins/RT-Client-Tools
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Improve output.

Browse source
This commit is contained in:
Bradley M. Kuhn 2018-07-22 16:02:07 -07:00
parent ace578089c
commit 5936b5eec5
1 changed files with 8 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
scripts/rt-outreachy-payment-next.plx
View file

@ -238,6 +238,12 @@ while (my $file = readdir $dh) {
} }
next; next;
} }
my $expectVal = 'payment-' . $PAYMENT_NUMBER . "-approved";
if ($completedInternshipField eq $expectVal) {
print STDERR "\"$file\": \"$ticket\": $PAYMENT_NUMBER PAYMENT-DONE: Skipped: completed-internship is ",
"\"$completedInternshipField\" which indicates this payment round is in process.\n";
next;
}
my $expectVal = 'payment-' . $prevPayNum . "-approved"; my $expectVal = 'payment-' . $prevPayNum . "-approved";
if ($completedInternshipField ne $expectVal) { if ($completedInternshipField ne $expectVal) {
print STDERR "\"$file\": \"$ticket\": Skipped: completed-internship field was ", print STDERR "\"$file\": \"$ticket\": Skipped: completed-internship field was ",
@ -257,13 +263,13 @@ while (my $file = readdir $dh) {
print STDERR "\"$file\": \"$ticket\": found a tax ticket of \"$taxTicket\"\n" if ($VERBOSE > 5); print STDERR "\"$file\": \"$ticket\": found a tax ticket of \"$taxTicket\"\n" if ($VERBOSE > 5);
my $taxTicketStatus = GetStatusFromTicket($taxTicket); my $taxTicketStatus = GetStatusFromTicket($taxTicket);
if ($taxTicketStatus ne "resolved") { if ($taxTicketStatus ne "resolved") {
print STDERR "\"$file\": \"$ticket\": Tax Ticket: \"$taxTicket\": Skipped: ", print STDERR "\"$file\": \"$ticket\": TAX-TICKET-PENDING: \"$taxTicket\": Skipped: ",
"tax ticket is in status \"$taxTicketStatus\" instead of \"resolved\"\n"; "tax ticket is in status \"$taxTicketStatus\" instead of \"resolved\"\n";
next; next;
} }
my $mainTicketStatus = GetStatusFromTicket($ticket); my $mainTicketStatus = GetStatusFromTicket($ticket);
if ($mainTicketStatus ne "needs-project-ok") { if ($mainTicketStatus ne "needs-project-ok") {
print STDERR "\"$file\": \"$ticket\": Skipped: ", print STDERR "\"$file\": \"$ticket\": PREV-PAYMENT-INCOMPLETE: Skipped: ",
"ticket is in status \"$mainTicketStatus\" instead of \"needs-project-ok\"\n"; "ticket is in status \"$mainTicketStatus\" instead of \"needs-project-ok\"\n";
next; next;
} }