//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ //³ Rotinas ³ //ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ aAdd(aRotTot,"001="+STR0012) // Abertura de OS aAdd(aRotTot,"002="+STR0013) // Agendamento Oficina aAdd(aRotTot,"003="+STR0014) // Apontamento Eletronico aAdd(aRotTot,"004="+STR0010) // Atendimento de Veiculos aAdd(aRotTot,"005="+STR0015) // Cadastro de Veiculos aAdd(aRotTot,"006="+STR0016) // Cancelamento de OS aAdd(aRotTot,"007="+STR0017) // CEV aAdd(aRotTot,"008="+STR0018) // Consulta de OS aAdd(aRotTot,"009="+STR0019) // Consulta de Painel de Oficina aAdd(aRotTot,"010="+STR0020) // Contagem de Estoque aAdd(aRotTot,"011="+STR0021) // Fechamento de OS aAdd(aRotTot,"012="+STR0011) // Integracao John Deere aAdd(aRotTot,"013="+STR0022) // Liberacao de OS aAdd(aRotTot,"014="+STR0023) // Movimentacoes de Veiculos aAdd(aRotTot,"015="+STR0024) // Orcamento aAdd(aRotTot,"016="+STR0025) // Requisicao de Pecas aAdd(aRotTot,"017="+STR0026) // Requisicao de Servicos aAdd(aRotTot,"018="+STR0027) // Sugestao de Compras aAdd(aRotTot,"019="+STR0031) // Liberacao de Credito do Oficina aAdd(aRotTot,"020="+STR0032) // Requisição e Devolução de Ferramentas //ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ //³ PE para manipular vetor das Rotinas ³ //ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ If ExistBlock("VA350ROT") aRotTot := ExecBlock("VA350ROT",.f.,.f.,{aRotTot}) EndIf // |