Projeto de Locadora de Automóveis

Prévia do material em texto

27
 
UNIVERSIDADE ANHANGUERA-UNIDERP
POLO: Brasília (DF) Fac. de Ciências e Tecnologia – FACITEB.
CURSO SUPERIOR DE TECNOLOGIA EM ANÁLISE E DESENVOLVIMENTO DE SISTEMAS - 1°SEMESTRE
FÁBIO MENDES RA: 2848238831
WESLEY CAVALCANTE RA: 2661136327
ALCINEIDE MIGUEL DOS SANTOS RA: 0109119284
PROJETO INTERDISCIPLINAR APLICADO AOS CURSOS SUPERIOR DE TECNOLOGIA (PROINTERII)
Locadora de Automóveis
FACULADE DE CIENCIA E TECNOLOGIA - FACITEB
TUTOR EAD - ALEX SALES.
TUTOR SEMIPRESENCIAL – WADNER LINS
Brasília /DF
2017
DISCIPLINAS NORTEADAS:
ANÁLISE DE ESTRUTURA DE SISTEMAS.
CONSTRUÇÃO DE ALGORÍTIMOS.
PROGRAMAÇÃO ESTRUTURADA I.
TEORIA GERAL DE SISTEMAS.
RESPONSABILIDADE SOCIAL E MEIO AMBIENTE
Sumário
INTRODUÇÃO	4
TEMA	5
TECNOLOGIA ENVOLVIDA	6
DIAGRAMA DA EMPRESA	7
DESENVOLVIMENTO DO SOFTWARE	8
DIAGRAMA FINANCEIRO	9
CADASTRO DE CLIENTES E AUTOMOVEIS	10
FLUXOGRAMA DO SOFTWARE DESENVOLVIDO	11
APRESENTAÇÃO DO SOFTWARE	12,13
RESPONSABILIDADE SOCIAL E MEIO AMBIENTE	14,15,16
CONCLUSÃO 	17
REFERENCIAS BIBLIOGRAFICAS	18,19
CÓDIGO FONTE	20,21,22,23,24,25,26,27
	
INTRODUÇÃO
Nas páginas seguintes iremos abordar o funcionamento de uma locadora de automóveis, seus sistemas de funcionamento, softwares que necessitam de atualização e os estudos necessários para efetuar as atualizações.
Ao longo dos anos a empresa cresceu e precisou se modernizar, para atender as necessidades de seus clientes e se atualizar junto ao mercado e seus principais concorrentes.
A importância do cadastro correto de clientes, os tipos de veículos existentes para locação, além da manutenção dos mesmos.
TEMA:
CARACTERIZAÇÃO DA EMPRESA
A Loc Mais Veículos é uma das maiores empresas de aluguel de veículos do Sudeste e foi fundada em 2010, no estado de São Paulo. Com uma frota superior a 12 mil veículos está presente em mais de 160 cidades do estado de São Paulo.
A locadora paulista é reconhecida pela qualidade nos serviços prestados e por seu atendimento excelente.
Também faz parte de sua história a inovação, já que ela foi a primeira a oferecer a locação de veículos a um público maior e a primeira a disponibilizar a opção de devolver o veículo em outra localidade.
A Loc Mais Veículos possui, em alguns destinos, em sua frota carros diferenciados como o Fiat Toro, a Amarok e outros carros de luxo. Além disso, você pode escolher qualquer veículo da Loc Mais Veículos através do nosso app ou do nosso site, e aproveitar todos os benefícios e o melhor preço.
O nosso programa de fidelidade é o mais atrativo do mercado, nossos clientes contam com descontos progressivos, upgrade de veículo, além de brindes exclusivos.
Em poucos minutos você escolhe seu carro e a melhor forma de pagamento, com rapidez e praticidade, contando com toda a experiência Loc Mais Veículos, basta um clique em nosso aplicativo.
TECNOLOGIA ENVOLVIDA
Inicialmente para administrar a cartela de clientes e veículos disponíveis foi implantado um software desenvolvido através do programa Visualg e recebeu o nome de LOC+. Um sistema de gestão de vendas e relação com clientes, com o principal objetivo de ajudar empresas a contatar com os consumidores.
 Tudo isso é conseguido através do armazenamento de informação detalhada sobre clientes, tornando-a facilmente acessível numa base de dados. Tal como escrever notas no verso de um cartão de visita de um cliente – mas muito mais organizado, detalhado e eficaz.
É possível separar potenciais clientes daqueles que efetivamente são fiéis ao negócio, controlar cada interação com funcionários, desde o início até ao fim do funil de vendas.
Foi um processo trabalhoso, pois foi necessário cadastrar todos os clientes na nova plataforma de atendimento, além de programar o envio de propagandas e promoções para cativar os clientes antigos e conquistar novos clientes.
DIAGRAMA DA EMPRESA
Tendências.
Software de gerenciamento.
Dados de clientes e veículos.
- Mercado.
-Clientes.
- Veículos.
- E-mail.
-Relatórios de clientes.
-Relatórios de veículos.
-Quilometragem de veículos.
- Dados financeiros.
 
Relações
Vantagem competitiva.
Problemas.
Necessidades.
Concorrentes.
Soluções.
	
Clientes.
Satisfação.
Veículos.
Marcas dos veículos
	
 
DESENVOLVIMENTO DO SOFWARE
O desenvolvimento do software foi feito pensando em todos, pois além de facilitar o cadastro de clientes, facilita o trabalho dos funcionários, com a implantação de uma central de atendimento que vem para ampliar as locações de veículos, o projeto para 2018 e implantar filiais em dois estados: Rio de Janeiro e Espírito Santo.
Todas as transações e interações serão registradas, nunca vai existir perguntas sobre a forma qual carro determinado cliente alugou, há quanto tempo é cliente, se paga pelo serviço por cartão de crédito ou boleto bancário e se está satisfeito.
Isto vai tornar a colaboração entre funcionários muito mais rápida e intuitiva, pois todos os dados vão ser registrados e nunca será necessário que o cliente fique repetindo as mesmas informações para atendentes diferentes.
Em vez de participar em cadeias de e-mail entre um número sem fim de funcionários, todos os colaboradores podem aceder à base de dados do Loc+ para descobrirem toda a informação de que precisam.
E possível inclusive administrar o cadastro de acordo com o gosto do cliente por determinadas marcas ou modelos e quando mesmo fizer o contato para locação o atendente já estará preparado para oferecer um veículo de acordo com o seu perfil e surpreender o cliente.
 Torna, também, mais fácil a interação a nível pessoal. De cada vez que um cliente liga, toda a sua informação pode ser acedida numa questão de segundos – os carros favoritos há quanto tempo é cliente, até a sua cartela de cores favorita no quesito veículo.
Para concluir a modernização o software para gerenciar os dados financeiros também foi moldado e integrado dentro do nosso LOC+ através do Visualg, que Além de organizar os lançamentos financeiros esse software administra o estoque e está adequado e legislação fiscal brasileira, além de facilitar o fechamento dos caixas.
DIAGRAMA FINANCEIRO
 
Lançamentos financeiros.
Filial Sudeste 3.
MATRIZ
Filial Sudeste 1.
Filial Sudeste 4.
Filial Sudeste 2.
CADASTRO DE CLIENTES E AUTOMOVÉIS
O cadastro dos clientes será feito de acordo com o seu perfil de veículo:
Básico, intermediário ou executivo, conforme abaixo:
	BÁSICOS
	MOTORES: 1.0 Flex e 1.3 Flex.
	MONTADORAS: , Fiat, Chevrolet e Renault.
	MODELOS: Palio Attractive, Uno Way, Renault Clio e Onix 
	INTERMEDIÁRIOS
	MOTORES: 1.4 FleRTx, 1.6 Flex e 1.8 Flex.
	MONTADORAS: Toyota, Chevrolet, Ford, Fiat, Renault e Peugeot.
	MODELOS: Etios, , Gran Siena, Peugeot 307, Fiat Argo e Fiat Mobi.
	EXECUTIVOS
	MOTORES: 1.6 Flex, 1.8 Flex, 2.0 Flex e 2.2 Flex.
	MONTADORAS: Toyota, Chevrolet, Ford, Fiat, Volvo, Audi e Nissan.
	MODELOS: Corolla, Volvo S60, Audi A3, Cruze, Cruze Sedan, Frontier, Amarok, Fiat Toro e Fiat 500.
FLUXOGRAMA DO SOFTWARE DESENVOLVIDO:
 
APRESENTAÇÃO DO SOFTWARE
RESPONSABILIDADE SOCIAL E MEIO AMBIENTE
CONCIENTIZAÇÃO.
Quando falamos de veículo uma das coisas mais importantes é a sua manutenção, que é essencial por diversos aspectos, a segurança, pois um veículo revisado evita acidentes, o econômico, quando o veículo está bem cuidado, precisa de menos recursos para fazer o seu papel, gasta menos combustível, não faz ruídos desagradáveis e evita surpresas, como por exemplo, que o veículo apresente falha no meio do trajeto, fato que seria uma calamidade para uma pessoa que aluga um veículo.
Esses são os itens mais importantes quando falamos de manutenção veicular preventiva: Calibragem e alinhamento de pneus, suspensão e vida útil, fluído de freios é a troca de óleo, a manutenção tem como objetivo corrigir os problemase falhas antes mesmo de acontecerem, assim auxiliando na redução de custos e aumentando a eficiência da manutenção.
No entanto, para uma empresa que está em pleno crescimento, não é possível pensar apenas no fator econômico, manutenção preventiva dos veículos proporciona inúmeros benefícios aos motoristas e a população. Pois é uma foram de garantir a segurança, o bom funcionamento do veículo e a preservação do meio ambiente que é o assunto principal, quando temos a intenção de ser uma empresa sustentável.
O dióxido de nitrogênio (NO2), resultante dos processos de combustão de veículos automotores, leva à formação de chuva ácida, provoca danos à vegetação e à colheita, é isso pode ser evitado quando fazemos a manutenção veicular, quando o carro consome menos combustível ele libera menos gases poluentes no meio ambiente.
As partículas inaláveis de materiais poluentes provocam câncer e contaminam o solo. Por isso, o mundo inteiro está tomando medidas para reduzir a emissão de poluentes e também os riscos da exposição à poluição. Na Cidade do México, onde foi constatado que os carros respondem por 75% da poluição atmosférica, o governo local tomou uma medida interessante. Ao constatar que ¼ dos carros que estão na rua de manhã são de pais levando seus filhos para a escola, simplesmente obrigou os alunos de colégios particulares a usar o ônibus escolar. O resultado: cada ônibus evita que 35 carros saiam às ruas para o trajeto casa-escola-casa, exemplo esse que poderia ser seguido pelo Brasil, ou até mesmo construir escolas mais próximas da população.
Com certeza a manutenção preventiva do veículo é muito mais barata que a corretiva (aquela que você só faz quando o problema já aconteceu). Mas, além disso, ela é boa para o meio ambiente. Carro em bom estado de manutenção polui menos, tem um desgaste menor de peças e uma vida útil mais longa. Quer ajudar o planeta e, ainda por cima, economizar dinheiro? Faça periodicamente essas ações de manutenção preventiva: - Evite que os pneus do seu carro acabem precocemente num aterro sanitário. Faça a calibragem uma vez por semana, pelo menos – e quando eles estiverem frios. Pneu calibrado corretamente evita desgaste excessivo. - Para um melhor aproveitamento do combustível e economia de consumo, faça uma manutenção periódica que inclua: troca de filtros de ar, de filtro de combustível, verificação de velas, de cabos de velas e de injetores de combustível. - Troque o óleo com a periodicidade recomendada pelo fabricante. A lubrificação adequada diminui o atrito e o esforço do motor para funcionar. - Fique atento ao combustível que você utiliza. Falhas na aceleração, dificuldade na partida e falta de potência podem ser indícios de combustível adulterado, prejudicando seu bolso e poluindo o meio ambiente.
Se tratando de uma empresa que está em expansão e procura crescimento nacional e muito importante que a manutenção esteja em dia, além de todos os benefícios econômicos e para o meio ambiente, a propaganda positiva atrai muitos clientes, pois nos dias de hoje as pessoas estão cada vez mais preocupadas com a preservação do meio ambiente, e isso faz com que elas busquem empresas com esse mesmo pensamento.
Deste modo podemos concluir que um software que auxilie nessa manutenção é extremamente importante, ele pode verificar as necessidades de manutenção dos veículos com precisão e antecedência, evitando falhas, acidentes e o desgaste desnecessário da frota, além do mais importante, a confiança do cliente na empresa, pois ninguém quer alugar um carro que vá quebrar no meio do caminho, sem dúvida, alguém que passou por essa experiência não voltaria a alugar um carro com a empresa que teve problemas e com certeza faria propaganda negativa da empresa.
Com tudo que foi exposto acima, podemos concluir que a manutenção veicular deve estar associada à tecnologia, pois com um sistema que agende os itens que devem ser revisados no tempo correto, que analise o tempo de vida útil de cada componente do veículo, bem como o seu consumo. Esses fatores podem ser trabalhosos no início, pois um sistema que inclua todas essas funcionalidades pode demorar para ser implantado, porém é essencial para empresa, por diversos fatores, que vai muito além da economia, mas também da preservação do meio ambiente, é a boa imagem da empresa diante da sociedade.
CONCLUSÃO
Com a realização das 2 etapas do Prointer foi possível confirmar a importância da implantação de um software de gerenciamento em qualquer empresa, pois além de facilitar o trabalho dos funcionários, agilizar as solicitações dos clientes e gerenciar os recursos das empresas.
A implantação na Loc Mais Veículos ocorreu de forma gradual para que todos os setores se ajustem ao novo sistema sem que exista prejuízo aos clientes e também funcionários, o novo sistema consegue organizar todo o estoque de carros e cadastro de clientes, isso vai contribuir com a melhoria do atendimento, pois teremos em sistema o registro das preferências de cada cliente e assim fazer um atendimento personalizado e surpreender o cliente, saber seu perfil de automóvel e oferecer ao cliente um carro de acordo com o seu perfil.
Para o gerenciamento de recursos financeiros a implantação do software foi muito positiva, pois foi possível alinhar todos os lançamentos financeiros com agilidade e eficiência, sem deixar furos nas planilhas.
A implantação dos sistemas de software foi com certeza um dos passos mais importantes dados pela Loc Mais Veículos pois modernizou e agilizou todos os processos, desde o cadastro dos clientes até a devolução dos veículos.
REFERÊNCIAS BIBLIOGRÁFICAS 
· Site: http://www.accelerated-ideas.com – acesso em 10/10/2017 ás 19h20.
· Site: http://www.ufpa.br/dicas/progra/protipos.htm - acesso em 12/10/2017 ás 22h17.
· Site: https://www.tecmundo.com.br - acesso em 13/10/2017 ás 18h50.
· Site: http://www.superdownloads.com.br - acesso em 14/10/2017 ás 19h30.
· Site: https://www.infoescola.com/informatica/software/ - acesso em 14/10/2017 ás 20h20.
· Site: https://www.schneider-electric.com.br/pt/product-category/5100-software-de-programa%C3%A7%C3%A3o-e-configura%C3%A7%C3%A3o/ - acesso em 15/10/2017 ás 20h50.
· Site: http://w3.siemens.com.br/automation/br/pt/automacao-e-controle/softwares/sw-control/pages/default.aspx - acesso em 15/10/2017 ás 21h20.
· Site: http://www.software.com.br/c/programacao- acesso em ás 15/10/2017 ás 23h30.
· Site: https://docs.microsoft.com/pt-br/dotnet/visual-basic/ - acesso em 16/10/2017 ás 18h20.
· Site: https://msdn.microsoft.com/pt-br/library/xk24xdbe(v=vs.90).aspx – acesso em 16/10/2017 ás 19h20.
· Site: https://educacaoautomotiva.com/2015/03/01/a-importancia-da-manutencao-preventiva/ - acesso em 16/10/2017 ás 19h40.
· http://khronosrastreamento.com.br/web/noticia.php?id=19-a-importancia-de-fazer-a-manutencao-preventiva-veicular – acesso em 18/10/2017 ás 17h40.
· Site: http://www.administradores.com.br/artigos/negocios/a-importancia-da-manutencao-preventiva-para-empresas-de-transporte-rodoviario-de-cargas/49241/ - acesso em 19/10/2017 ás 18h20.
· Site: https://gestaoclick.com.br/ - acesso em 05/11/2017 ás 18h20.
· Site: https://gestaoclick.com.br/blog/melhor-software-de-gestao-empresarial - acesso em 06/11/2017 ás 11h45.
· Site: https://contaazul.com/funcionalidades/ - acesso em 06/11/2017 ás 18h50.
· Site: https://www.sagestart.com.br - acesso em 07/11/2017 ás 19h45.
· https://canaldoensino.com.br/blog/8-programas-gratuitos-de-gestao-para-empresas - acesso em 08/11/2017 ás 12h30.
· https://exame.abril.com.br/pme/6-softwares-gratuitos-para-sua-empresa/ - acesso em 09/11/2017 ás 14h40.
algoritmo "LOCADORA"
// Função :
// Autor :
// Data : 17/10/2009
// Seção de Declarações
var
CPF,RG,TEL,END,NAC,ALUGUEL,MARC,MODE,ANO,MARCACARRO,NOME:VETOR [1..20] DE CARACTER
CARRO1,CLIENTE1,opc,cod,qtd,ALUGUEL1,DEV,CODCARRO:INTEIRO
OPC1,Q:CARACTER
A1,A2,A3,total:REAL
PROCEDIMENTO MENUPRINCIPAL
INICIO
repita
 ESCREVAL("|=========== LOC MAIS AUTOMOVEIS==========|")
 ESCREVAL("|==========================================|")
 ESCREVAL("| MENU RPINCIPAL |")
 ESCREVAL("|==========================================|")
 ESCREVAL("| 1- MENU AUTOMÓVEIS |")
 ESCREVAL("| 2- MENU CLIENTES |")
 ESCREVAL("| 3- FINANCEIRO |")
 ESCREVAL("|==========================================|")
 ESCREVA("ESCOLHA UMA OPÇÃO! ")
 LEIA(OPC)
 LIMPATELA
 ESCOLHA OPC
 CASO 1
 MCARRO
 CASO 2
 MCLIENTE
 
 CASO 3
 FINANCEIRO
 OUTROCASO
 ESCREVAL("OPÇÃO INVÁLIDA PRESSIONE 'ENTER' PARA VOLTAR")
 LEIA(OPC)
 FIMESCOLHA
 LIMPATELA
 ATE(OPC>=1)E(OPC<=2)
FIMPROCEDIMENTO
PROCEDIMENTO MCARRO
INICIO
repita
ESCREVAL("|============== LOC MAIS ================|")
ESCREVAL("| |")
ESCREVAL("|=============================================|")
ESCREVAL("| 1- CADASTRAR |")
ESCREVAL("| 2- ALUGAR AGORA |")
ESCREVAL("| 3- DEVOLVER CARRO |")
ESCREVAL("| 4- VOLTAR |")
ESCREVAL("| |")
ESCREVAL("|=============================================|")
repita
 ESCREVA("ESCOLHA UMA OPÇÃO:")
 leia(OPC)
ate (OPC>=1)e(OPC<=4)
LIMPATELA
escolha OPC
CASO 1
 CADASTROCARRO
CASO 2
 LISTARCARRO
CASO 3
 DEVOLVER
CASO 4
 MENUPRINCIPAL
 
OUTROCASO
 ESCREVAL("OPÇÃO INVALIDA ESCOLHA UMA OPÇÃO DE 1 ATE 3 ")
FIMESCOLHA
//FIMREPITA
FIMPROCEDIMENTO
PROCEDIMENTO CADASTROCARRO
INICIO
REPITA
 ESCREVAL("|==========================================|")
 ESCREVAL("| |")
 ESCREVAL("| CADASTRO AUTOMÓVEIS |")
 ESCREVAL("| |")
 ESCREVAL("|==========================================|")
 ESCREVA("DIGITE A MARCA DO AUTOMÓVEL : ")
 CARRO1<-CARRO1+1
 LEIA(MARC[CARRO1])
 ESCREVA("DIGITE O MODELO : ")
 LEIA(MODE[CARRO1])
 ESCREVA("DIGITE O ANO/FAB : ")
 LEIA(ANO[CARRO1])
 ESCREVAL("---------------------------------------")
 ESCREVAL(" CADASTRO REALIZADO COM SUCESSO !! ")
 ESCREVAL("---------------------------------------")
 ESCREVAL("---------------------------------------")
 ESCREVAL("| 1- NOVO CADASTRO | 2- VOLTAR AO MENU|")
 ESCREVAL("---------------------------------------")
 ESCREVA("DIGITE A OPÇÃO:")
 LEIA(OPC)
 LIMPATELA
 ESCOLHA OPC
 CASO 1
 CADASTROCARRO
 CASO 2
 MENUPRINCIPAL
FIMPROCEDIMENTO
PROCEDIMENTO LISTARCARRO
inicio
 repita
ESCREVAL("|===============================================================|")
ESCREVAL("| ALUGAR AGORA |")
ESCREVAL("|===============================================================|")
ESCREVAL("| LISTAGEM DE CARROS |")
ESCREVAL("| |")
ESCREVAL("|COD| MARCA | MODELO | CATE | ANO | VALOR | STATUS |")
ESCREVAL("|===============================================================|")
ESCREVAL("| 1 | FIAT | PALIO 1.0flex | BASICO | 2017 |80,00 | DISP |")
ESCREVAL("| 2 | FIAT | UNO way 1.0 | BASICO | 2016 |80,00 | DISP |")
ESCREVAL("| 3 |CHEVROL| ONIX 1.4 flex | BASICO | 2017 |80,00 | DISP |")
ESCREVAL("| 4 |TOYOTA | ETIOS 1.0 | INTERM | 2017 |150,00 | DISP |")
ESCREVAL("| 5 |FIAT | GRAN SIENA 1.4 | INTERM | 2017 |150,00 | DISP |")
ESCREVAL("| 6 |RENAULT| LOGAN 1.0 | INTERM | 2018 |150,00 | DISP |")
ESCREVAL("| 7 |TOYOTA | COROLA 1.8flex | EXECUT | 2017 |300,00 | DISP |")
ESCREVAL("| 8 | FIAT | TORO FREED 1.8 | EXECUT | 2017 |300,00 | DISP |")
ESCREVAL("| 9 |VOLKS | AMAROK | EXECUT | 2018 |300,00 | DISP |")
ESCREVAL("|===============================================================|")
 escreva("DIGITE O CODIGO DO VEÍCULO QUE DESEJA ALUGAR -> ")
 leia (OPC)
 LIMPATELA
 escolha OPC
 caso 1
 escreval ("|-----------------------------------------------|")
 escreval ("| FIAT PALIO 1.0 ALUGADO COM SUCESSO !! |")
 escreval ("| VALOR A PAGAR 80,00 |")
 escreval ("| DIRIJA-SE AO FINANCEIRO |")
 escreval ("|-----------------------------------------------|")
 caso 2
 escreval ("|-----------------------------------------------|")
 escreval ("| FIAT UNO way 1.0 ALUGADO COM SUCESSO !! |")
 escreval ("| VALOR A PAGAR 80,00 |")
 escreval ("| DIRIJA-SE AO FINANCEIRO |")
 escreval ("|-----------------------------------------------|")
 caso 3
 escreval ("|------------------------------------------------|")
 escreval ("| CHEVROLET ONIX 1.4 ALUGADO COM SUCESSO !! |")
 escreval ("| VALOR A PAGAR 80,00 |")
 escreval ("| DIRIJA-SE AO FINANCEIRO |")
 escreval ("|-----------------------------------------------|")
 caso 4
 escreval ("|-----------------------------------------------|")
 escreval ("| TOYOTA ETIOS 1.0 ALUGADO COM SUCESSO !! |")
 escreval ("| VALOR A PAGAR 150,00 |")
 escreval ("| DIRIJA-SE AO FINANCEIRO |")
 escreval ("|-----------------------------------------------|")
 caso 5
 escreval ("|-----------------------------------------------|")
 escreval ("| FIAT GRAN SIENA 1.4 ALUGADO COM SUCESSO !! |")
 escreval ("| VALOR A PAGAR 150,00 |")
 escreval ("| DIRIJA-SE AO FINANCEIRO |")
 escreval ("|-----------------------------------------------|")
 caso 6
 escreval ("|-----------------------------------------------|")
 escreval ("|VEICULO RENAULT LOGAN 1.0 ALUGADO COM SUCESSO !|")
 escreval ("| VALOR A PAGAR 150,00 |")
 escreval ("| DIRIJA-SE AO FINANCEIRO |")
 escreval ("|-----------------------------------------------|")
 caso 7
 escreval ("|-----------------------------------------------|")
 escreval ("| TOYOTA COROLA 1.8 ALUGADO COM SUCESSO !! |")
 escreval ("| VALOR A PAGAR 300,00 |")
 escreval ("| DIRIJA-SE AO FINANCEIRO |")
 escreval ("|-----------------------------------------------|")
 caso 8
 escreval ("|-----------------------------------------------|")
 escreval ("| FIAT TORO FREEDON 1.8 ALUGADO COM SUCESSO !! |")
 escreval ("| VALOR A PAGAR 300,00 |")
 escreval ("| DIRIJA-SE AO FINANCEIRO |")
 escreval ("|-----------------------------------------------|")
 caso 9
 escreval ("|-----------------------------------------------|")
 escreval ("| VOLKSWAGEN AMAROK ALUGADO COM SUCESSO !! |")
 escreval ("| VALOR A PAGAR 300,00 |")
 escreval ("| DIRIJA-SE AO FINANCEIRO |")
 escreval ("|-----------------------------------------------|")
 outrocaso
 escreval ("Código do item invalido")
 FIMESCOLHA
 
 ATE (OPC<=9)
 escreval(" ")
ESCREVAL("------------------------------------------------------")
ESCREVAL("| 1- ALUGAR OUTRO | 2- FINANCEIRO | 3- VOLTAR AO MENU|")
ESCREVAL("------------------------------------------------------")
ESCREVA("ESCOLHA UMA OPÇÃO:")
 LEIA(OPC)
 LIMPATELA
 ESCOLHA OPC
 CASO 1
 LISTARCARRO
 CASO 2
 FINANCEIRO
 CASO 3
 MENUPRINCIPAL
LIMPATELA
FIMPROCEDIMENTO
PROCEDIMENTO MCLIENTE
INICIO
REPITA
 ESCREVAL("|================ CLIENTE ================|")
 ESCREVAL("| |")
 ESCREVAL("|=========================================|")ESCREVAL("| 1- CADASTRAR |")
 ESCREVAL("| 2- SAIR |")
 ESCREVAL("| |")
 ESCREVAL("|=========================================|")
 REPITA
 ESCREVA("ESCOLHA UMA OPÇÃO:")
 LEIA(OPC)
 ATE (OPC>=1)e(OPC<=2)
 LIMPATELA
 ESCOLHA OPC
 CASO 1
 CADASTROCLIENTE
 CASO 2
 MENUPRINCIPAL
 OUTROCASO
 ESCREVAL("OPÇÃO INVALIDA ESCOLHA UMA OPÇÃO DE 1 ATE 3 ")
 FIMESCOLHA
 FIMREPITA
 fimprocedimento
 PROCEDIMENTO CADASTROCLIENTE
 INICIO
 REPITA
 ESCREVAL("|===========================================|")
 ESCREVAL("| |")
 ESCREVAL("| CADASTRO DO CLIENTE |")
 ESCREVAL("| |")
 ESCREVAL("|===========================================|")
 ESCREVA("DIGITE O NOME DO CLIENTE : ")
 CLIENTE1<-CLIENTE1+1
 LEIA(NOME[CLIENTE1])
 ESCREVA("DIGITE O CPF DO CLIENTE : ")
 LEIA(CPF[CLIENTE1])
 ESCREVA("DIGITE O RG DO CLIENTE : ")
 LEIA(RG[CLIENTE1])
 ESCREVA("DIGITE O ENDEREÇO DO CLIENTE : ")
 LEIA(END[CLIENTE1])
 ESCREVA("DIGITE O TELEFONE DO CLIENTE : ")
 LEIA(TEL[CLIENTE1])
 ESCREVA("DIGITE A DATA DE NASCIMENTO : ")
 LEIA(NAC[CLIENTE1])
 ESCREVAL("---------------------------------------")
 ESCREVAL(" CADASTRO REALIZADO COM SUCESSO !! ")
 ESCREVAL("---------------------------------------")
 ESCREVAL("---------------------------------------")
 ESCREVAL("| 1- NOVO CADASTRO | 2- VOLTAR AO MENU ")
 ESCREVAL("---------------------------------------")
 ESCREVA("ESCOLHA UMA OPÇÃO:")
 LEIA(OPC)
 LIMPATELA
 ESCOLHA OPC
 CASO 1
 CADASTROCLIENTE
 CASO 2
 MENUPRINCIPAL
 FIMPROCEDIMENTO
 PROCEDIMENTO FINANCEIRO
INICIO
escreval("================================================")
escreval("| BEM-VINDO AO FINANCEIRO |")
escreval("=============================================== ")
escreval("| CÓDIGO | PRODUTO | VALOR |")
escreval("------------------------------------------------")
escreval("|231 | AUT/BÁSICO | R$ 80,00 |")
escreval("|237 | AUT/INTERMEDIÁRIO | R$ 150,00 |")
escreval("|331 | AUT/EXECUTIVO | R$ 300,00 |")
escreval("================================================")
escreval("| (1) - ADD | (2) - TOTAL |")
escreval("================================================")
escreval(" ")
repita
 escreva("DIGITE '1' PARA ADICIONAR VEICULO E '2'PARA FINALIZAR -> ")
 leia (opc)
 se (opc = 1) entao
 escreval("")
 escreva ("DIGITE O CÓDIGO DO VEÍCULO - ")
 leia(cod)
 escreva("DIGITE A QUANTIDADE - ")
 leia (qtd)
 escreval("")
 escolha cod
 caso 231
 total <- total + (qtd * 80)
 caso 237
 total <- total + (qtd * 150)
 caso 331
 total <- total + (qtd * 300)
 outrocaso
 escreval ("Código do item invalido")
 fimescolha
 senao
 se (opc<>2)entao
 escreval("opçao invalida")
 fimse
 fimse
 ate (opc = 2)
 
 ESCREVAL("---------------------------------------")
 escreval(" TOTAL A PAGAR : R$", total)
 ESCREVAL("---------------------------------------")
 ESCREVAL("")
 ESCREVAL("---------------------------------------")
 ESCREVAL("| 1- FINANCEIRO | 2- MENU PRINCIPAL|")
 ESCREVAL("---------------------------------------")
ESCREVA("ESCOLHA OPÇÃO:")
 LEIA(OPC)
 LIMPATELA
 ESCOLHA OPC
 CASO 1
 FINANCEIRO
 CASO 2
 MENUPRINCIPAL
LIMPATELA
 
 
 FIMPROCEDIMENTO
 PROCEDIMENTO DEVOLVER
 inicio
 REPITA
ESCREVAL("|===============================================================|")
ESCREVAL("| DEVOLVER VEÍCULO |")
ESCREVAL("|===============================================================|")
ESCREVAL("| LISTAGEM DE CARROS |")
ESCREVAL("| |")
ESCREVAL("|COD| MARCA | MODELO | CATE | ANO | VALOR | STATUS |")
ESCREVAL("|===============================================================|")
ESCREVAL("| 1 | FIAT | PALIO 1.0flex | BASICO | 2017 |80,00 | DISP |")
ESCREVAL("| 2 | FIAT | UNO way 1.0 | BASICO | 2016 |80,00 | DISP |")
ESCREVAL("| 3 |CHEVROL| ONIX 1.4 flex | BASICO | 2017 |80,00 | DISP |")
ESCREVAL("| 4 |TOYOTA | ETIOS 1.0 | INTERM | 2017 |150,00 | DISP |")
ESCREVAL("| 5 |FIAT | GRAN SIENA 1.4 | INTERM | 2017 |150,00 | DISP |")
ESCREVAL("| 6 |RENAULT| LOGAN 1.0 | INTERM | 2018 |150,00 | DISP |")
ESCREVAL("| 7 |TOYOTA | COROLA 1.8flex | EXECUT | 2017 |300,00 | DISP |")
ESCREVAL("| 8 | FIAT | TORO FREED 1.8 | EXECUT | 2017 |300,00 | DISP |")
ESCREVAL("| 9 |VOLKS | AMAROK | EXECUT | 2018 |300,00 | DISP |")
ESCREVAL("|===============================================================|")
 
escreva("Digite o codigo do Veículo que será devolvido -> ")
 leia (DEV)
 LIMPATELA
 escolha DEV
 caso 1
 ESCREVAL("|===================================================|")
 escreval("| VEICULO FIAT PALIO 1.0 FLEX DEVOLVIDO COM SUCESSO !")
 ESCREVAL("|===================================================|")
 caso 2
 ESCREVAL("|===================================================|")
 escreval("| VEICULO FIAT UNO way 1.0 DEVOLVIDO COM SUCESSO ! |")
 ESCREVAL("|===================================================|")
 caso 3
 ESCREVAL("|===================================================|")
 escreval("| VEICULO CHEVROLET ONIX 1.4 DEVOLVIDO COM SUCESSO! |")
 ESCREVAL("|===================================================|")
 caso 4
 ESCREVAL("|===================================================|")
 escreval("| VEICULO TOYOTA ETIOS 1.0 DEVOLVIDO COM SUCESSO !! |")
 ESCREVAL("|===================================================|")
 caso 5
 ESCREVAL("|======================================================|")
 escreval("| VEICULO FIAT GRAN SIENA 1.4 DEVOLVIDO COM SUCESSO !! |")
 ESCREVAL("|======================================================|")
 caso 6
 ESCREVAL("|====================================================|")
 escreval("| VEICULO RENAULT LOGAN 1.0 DEVOLVIDO COM SUCESSO !! |")
 ESCREVAL("|====================================================|")
 caso 7
 ESCREVAL("|====================================================|")
 escreval("| VEICULO TOYOTA COROLA 1.8 DEVOLVIDO COM SUCESSO !! |")
 ESCREVAL("|====================================================|")
 caso 8
 ESCREVAL("|========================================================|")
 escreval("| VEICULO FIAT TORO FREEDON 1.8 DEVOLVIDO COM SUCESSO !! |")
 ESCREVAL("|========================================================|")
 caso 9
 ESCREVAL("|========================================================|")
 escreval("| VEICULO VOLKSWAGEN AMAROK DEVOLVIDO COM SUCESSO !! |")
 ESCREVAL("|========================================================|")
 outrocaso
 escreval ("CÓDIGO DE ÍTEM INVÁLIDO !!")
 FIMESCOLHA
 ATE (DEV<=9)
 escreval(" ")
 ESCREVAL("")
 ESCREVAL("| 1- DEVOLVER OUTRO | 2- SAIR |")
 ESCREVAL("")
ESCREVA("ESCOLHA UMA OPÇÃO:")
 LEIA(OPC)
 LIMPATELA
 ESCOLHA OPC
 CASO 1
 DEVOLVER
 CASO 2
 MENUPRINCIPAL
LIMPATELA
 FIMPROCEDIMENTO
 INICIO
 MENUPRINCIPAL
 inicio
 //escreval("ENTER PARA CONTINUAR")
 //leia(Q)
 limpatela
 fimrepita
 fimalgoritmo