microfly

ITAU AG 6915 C/C 12454-6 - CPF 812.138.758-20 Luiz Carlos Nogueira, Agradeço com antecedencia que DEUS lhe de muita saude a vc e toda sua familia muito obrigado me adicione no skype suporte.microfly

Obrigado pelas suas palavras muito obrigado e ref as pessoas que me ofenderam ja esta superado.

Me adicione no skype suporte.microfly

Obrigado amigo Oziel que DEUS lhe abençoe a vc e toda sua família muito obrigado

Agradeço de coração todos aqueles que me ajudaram, muito obrigado de coração que DEUS lhe de em dobro a vcs todos um obrigado especial ao meu amigo irmao Joao Santos. skype suporte.micorfly.com.br (19) 3844-8556 - Paulinia - Joao Aranha zap (11) 96969-3667 Obs: todos que me ajudaram eu gostaria que me adcionase no skype para eu enviar o sistema de bar independente do valor é uma maneira minha de agradecer a quem me ajudou

pode me indicar skype suporte.microfly (19) 3844-8556 - zap (11) 96969-3667 Obrigado

Obrigado pela força Jorge Andrade, e a todos que estão se esforçando para me ajudar, fiquem com DEUS

Obrigado a todos

Obrigado amigo fique com DEUS

Obrigado pela força fique com DEUS

Muito obrigado pelas palavras eu tb confio muito em DEUS e vou sair dessa grande abraço que DEUS lhe abençoe a vc e toda sua familia

Muito obrigado Joao de coracao

Bom Dia Amigos do Forum Estou vendendo um Sistema com fontes , este Sistema atende aos segmentos Agua/Gas / Adega / Bar / Perfumaria / Auto peças / Varejao isso com pequenos ajustes, a unica mudanca para cada segmento é apenas, o estoque o cupom nao é fiscal Preço do sistema acima mencionado 800,00 reais "Aqueles que não puderem pagar pelo sistema e quiserem me ajudar com contribuição de 100,00 ou acima enviarei o sistema completo com fontes em forma de agradecimento, pois estou precisando muito" Tenho Sistemas de Oficina e Guincho ambos emitem newletter automatico dos sistemas para os clientes cadastrados de Email , aniversario e datas comemorativas. pode tirar informaçoes minhas com o Joao Santos / Kleiber Derick / Gilmer / Gunafe / Joao Alpande / Ronaldo Minacapelli (Bazevani) Quem puder e tiver interesse em me ajudar, abaixo os contatos Minha conta : ITAU - AGENCIA 6915 - C/C 12454-6 - Luiz Carlos Nogueira (19) 3844-8556 - Paulinia www.microfly.com.br skype suporte.microfly ( com video e audio ) whatsapp (11) 96969-3667 email : suporte@microfly.com.br Agradeço antecipadamente a todos amigos. Como fui mal interpretado por dezenas de pessoas e recebendo varios emails me humilhando,me ofedendo resolvi tirar a razao pelo motivo que estou VENDENDO meu sistema Veja abaixo Ontem postei uma venda de um sistema com fontes de minha autoria e fui mal interpretado por alguns amigos do grupo que me enviaram emails me humilhando,me esculhambando, dando soluções absurdas para resolver meu problema, me chamando de estelionatario , que vao me processar e que aqui nao é lugar para pedir dinheiro. 1 - com certeza voces que me mandaram estes emails nao leram o post ate o fim. 2 - estou VENDENDO um sistema de minha autoria e relatei o motivo da venda deste sistema 3 - em momento algum pedi ajuda financeira, alguns amigos por livre iniciativa estao querendo me ajudar financeiramente. 4 - nao sou estelionatario tenho 62 anos e tem muita gente aqui que me conhece muito bem 5 - eu nao preciso me sentar na frente de uma igreja com um chapeu na mao como me foi sugerido 6 - nao preciso ir no farol jogar bolinhas para ganhar umas moedas como tb foi sugerido 7 - nao preciso traficar drogas como vc me sugeriu e ainda me disse se eu for preso resolveria todo meu problema Resumo : Não vou citar o nome de vcs aqui senao iria descer ao nivel de vcs , vcs tem que vir ao meu nivel que DEUS abençoe todos vcs e cuidado com que falam e escrevam. "ESTE RECADO É PARA QUEM ME ENVIOU EMAIL ME HUMILHANDO , ME ESCULHAMBANDO , E ME DANDO SOLUÇÕES ABSURDAS PARA MEUS PROBLEMAS" peço desculpas pelo desabafo aos meus verdadeiros amigos deste forum que nao sao poucos "Poderei fazer tudo com a ajuda de CRISTO , ele me dara FORÇAS" (Filipenses, 4:13)

Eu uso assim If nDatacliente>Date()+10 Memvar->oDlgForm:Update() Endif nVlr := ROUND((Memvar->nVlrParcelar) / nTotPc,2) nDif += ROUND(nVlr,2) FORMPGTO->DATA := nDataCliente //nDataVc Else FORMPGTO->(DBGOTOP()) //preciso apagar tudo que esta na lista WHILE(FORMPGTO->(!EOF())) FORMPGTO->(BloqReg(0)) FORMPGTO->(DBDELETE()) FORMPGTO->(DBSKIP()) END nTotPc := If(Valtype(Memvar->cLimitePC) <> "N", VAL(Memvar->cLimitePC), Memvar->cLimitePC) nDataVc := Date() FOR nNroPc := 1 TO nTotPc nVlr := ROUND((Memvar->nVlrParcelar) / nTotPc,2) nDif += ROUND(nVlr,2) FORMPGTO->(DBAPPEND()) FORMPGTO->FTNPEDI := Pedidos->Ftnpedi FORMPGTO->PARCELA := nNroPc FORMPGTO->DATA := nDataCliente //nDataVc FORMPGTO->VALOR := nVlr FORMPGTO->(DBCOMMIT()) nDataCliente := SOMAMES(nDataCliente,1) NEXT If nDif <> Memvar->nVlrParcelar // Aqui Calcula a diferença da parcela se houver FORMPGTO->(DBGOTOP()) FORMPGTO->(BLOQREG(0)) FORMPGTO->VALOR += (Memvar->nVlrParcelar-nDif) FORMPGTO->(DBUNLOCK()) Endif Endif Endif

Meu amigo Joao mais explicado do que esta ai eu acho que tu ta loira ao cubo kkkkkkkkkkkk

vlw mano João

Alguém poderia me dar uma dica de como e como obter resultados calculando datas tenho um contrato que foi entregue o veiculo em 02/04/2016 as 10.00 e a devolução esta prevista para dia 12/04/2016 as 23.59 , teria que dar 11 diárias como obter esse resultado via sistema vc tem alguma funcao? eu estou fazendo assim mais não esta correto só vem 9 dias -------------------------------------------------------------------------------- Function Ver_hora( oDbfctr) -------------------------------------------------------------------------------- local dData2,dData1 local nHoras, nSec1, nSec2, nSobra, cH, cM, cS Local nDiae,nMese,nAnoe,nDiad,nMesd,nAnod Local nDias:= 0,cHora1,cHora2,nTothrtra:=0 nDias:= (oDbfctr:Dtdevfl-oDbfctr:Dataent) If oDbfctr:Tipoctr=1 .and. nTipmot=1 cHora1:= oDbfctr:Horaent cHora2:= oDbfctr:Hrdevfl nDiae:=Day(oDbfctr:Dataent) nMese:=Month(oDbfctr:Dataent) nAnoe:=Year(oDbfctr:Dataent) nDiad:=Day(oDbfctr:Dtdevfl) nMesd:=Month(oDbfctr:Dtdevfl) nAnod:=Year(oDbfctr:Dtdevfl) dData1 := CtoD(Strzero(nDiae,2)+"/"+Strzero(nMese,2)+"/"+Str(nAnoe,4)) dData2 := CtoD(Strzero(nDiad,2)+"/"+Strzero(nMesd,2)+"/"+Str(nAnod,4)) nSec1 := Segundos(oDbfctr:Horaent) nSec2 := Segundos(oDbfctr:Hrdevfl) if nSec1 > nSec2 nDias-- nSobra := Segundos("24:00:00")-nSec1 + nSec2 else nSobra := nSec2 - nSec1 endif cH := StrZero(( nDias*24+int(nSobra/3600)),3) cM := StrZero( int( nSobra%3600/60 ), 2 ) nTothrtra:=" : " nTothrtra:=cH+":"+cM oDbfctr:Diarias:=nDias oDbfctr:Tothrtra:=(nDias*Val(oDbfctr:Limitehora)) oDbfctr:Horaextra:=Val(nTothrtra)-vAL(oDbfctr:Limitehora) oDbfctr:Tothrfinal:=(oDbfctr:Tothrtra+oDbfctr:Horaextra) oDbfctr:Hrlimprev:=oDbfctr:Tothrfinal Endif oDataent:Refresh() oDtdevfl:Refresh() oDiarias:Refresh() oHoraextra:Refresh() oTothrfinal:Refresh() oTothrtra:Refresh() oHrlimprev:Refresh() Return (.t.) ------------------------------------------------------------------------------- Function Segundos( cHora ) Return ( Val(Left(cHora,2))*3600 + Val(SubStr(cHora, 4,2))*60 ) ------------------------------------------------------------------------------- Luiz Carlos Nogueira (Batata) www.microfly.com.br suporte@microfly.com.br Skype suporte.microfly São Paulo - Capital - Zona Norte Obrigado a todos , fico no aguardo

Vlw, é uma boa ideia , vou tentar obrigado

Mano Joao veja seu skype mandei la a img vlw

Bom Dia a todos, queria saber se no FWH tem alguma opção para copiar e colar, tipo tenho varias opções eu queria que qdo eu clicar com o mouse na opção ex R(iscado) e eu fosse na img e clicava novamente ele colocaria na img o que selecionei alguém poderia me dar uma dica?

Bom Dia a todos, queria saber se no FWH tem alguma opção para copiar e colar, tipo tenho varias opções eu queria que qdo eu clicar com o mouse na opção ex R(iscado) e eu fosse na img e clicava novamente ele colocaria na img o que selecionei alguém poderia me dar uma dica?

Obrigado amigo Toya

to com uma bucha, um motorista sai com um carro da empresa dia 20/01/2016 as 13:00 e so voltou 25/01/2016 as 23:00 , preciso saber a quantidades de horas geral do dia 20 ate o dia 25 tem alguma funcao? Se tiver algum exemplo poderia me enviar no meu email ou postaraqui mesmo fico no aguardo, se puderem me ajudar eu agradeço antecipadamente skype suporte.microfly Microfly Infomatica Ltda www.microfly.com.br suporte@microfly.com.br (11) 97304-1773 Jarinu - São Paulo

RESOLVIDO

é o que vou fazer pois nem o Manuel Mercado que fez sabe da solução kkkkkkk