Improve output.
This commit is contained in:
		
							parent
							
								
									ace578089c
								
							
						
					
					
						commit
						5936b5eec5
					
				
					 1 changed files with 8 additions and 2 deletions
				
			
		|  | @ -238,6 +238,12 @@ while (my $file = readdir $dh) { | |||
|     } | ||||
|     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"; | ||||
|   if ($completedInternshipField ne $expectVal) { | ||||
|     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); | ||||
|   my $taxTicketStatus = GetStatusFromTicket($taxTicket); | ||||
|   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"; | ||||
|     next; | ||||
|   } | ||||
|   my $mainTicketStatus = GetStatusFromTicket($ticket); | ||||
|   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"; | ||||
|     next; | ||||
|   } | ||||
|  |  | |||
		Loading…
	
	Add table
		
		Reference in a new issue
	
	 Bradley M. Kuhn
						Bradley M. Kuhn