#A4##BusinessGnutecaMulta##GetDatabase##BusinessGnutecaMulta##TotalMultas##$CodigoDaPessoa####ObtemMultasPorPessoa##$CodigoDaPessoa####FinalizaMulta##$CodigoDaMulta####CalculaValor##$Data####$Valor####ProximoCodigo##NovaMulta##$insertMulta####ListaMultas##&$range####ListaMultasNaoPagas##&$range####AlteraMulta##$objMulta####ObtemMulta##$CodigoDaPessoa####$CodigoDoEmprestimo####ObtemMultaPorTombo##$NumeroDoTombo###