Luiz Fernando

Eduardo no fivewin não tem classe própria para Dashboard, pode até se criar algo parecido, mais o Dashboard em si não tem. Abraços

Rapaz muito triste sua historia, infelizmente qualquer um de nós esta sujeito a isto, mais se Deus quiser vc ira sair desta, não desista, estarei vendo o que posso fazer para ajudar financeiramente, e principalmente orar pela sua recuperação, muita força ai para vc colega.

kkkkkk nossa nem percebi isto, Rochinha e não Rocinha, e olha que sempre acompanho post dele no pctoledo, um grande contribuidor para comunidade , não irei errar mais rsrsrsrs Abraços

Resolvido com a ajuda do Marcio da infomais, vlw Marcio obrigado pela força. Agradeço tb aos amigo Jorge e Rocinha pela disposição em querer ajudar.

Colegas estou com um backup feito neste banco, para aqueles que trabalha com firebird poderia me indicar alguma ferramenta que consiga abrir o mesmo, para poder importar os dados, obrigado.

Ola Manoel, realmente existe algum detalhe mesmo neste sentido, aqui uso a 1104, já analisei versões mais recente para ver se compensava eu atualizar e me deparei com isto tb. Abraços

Perfeito Jmsilva, o caminho esta por ai, usando o onchange tb e ver o tempo da digitação entre um caracter e outro, vou trabalhar em cima disto, assim que tiver um resultado irei voltar ao tópico e mostrar a solução, obrigado.

Pessoal queria agradecer as dicas de vcs acima, hoje já tenho senha e contra chave como mencionados pelos colegas acima, inclusive é muito pratica a tela, pois o gerente só digita a senha, e pela senha o sistema já sabe quem é o gerente, o duro que um cliente meu esta com consultoria, e eles quer que quer usar o cartão com código de barra, pois em redes grandes é assim que funciona, caso eu chegar a alguma conclusão, volto ao tópico. Obrigado a todos

Colega não entendi, pq se o usuario digitar o que esta no código de barra, o sistema ira pegar somente as posição corretas colocando-os na sequência correta , como vc mencionou acima da mesma forma que tivesse passado o cartão.

Colegas veja se alguém pode me ajudar nisto, tipo num PDV de vendas, ao excluir um item já lançado ou abandonar uma tela de venda em andamento, precisa chamar o gerente, e o mesmo com seu cartão(cartão simples com um código de barra impresso pelo meu programa) vai até la e passa o cartão, se ele esta em horario de almoço deixa o cartão com outro , mais o que ocorre que se alguém entrar num editor(bloco de notas) e passar o cartão , pronto já era, la estará a senha, sera que alguém tem uma ideia do que posso fazer para resolver esta questão. Obrigado

Show de bola deu certinho, Vlw Rone obrigado

só para fica mais claro DEFINE DIALOG oVenda "TESTE" oVenda:bKeyDown := {|nkey| tarefa(oVenda,nkey,oGet,aDados,@mDados,oBrw_ve,@x,aItens,oGet[14]) } redefine buttonbmp obtn[5] id 314 of oVenda ; action iif(fecha2(aDados,@aParcelas,cCli,aTerminal,@aCredito_cli),(aDados[D_CONDICAO]:='2',oVenda:Cargo:=.t.,oVenda:End()),.t.) cancel ACTIVATE DIALOG oVenda la na função externa tarefa static function tarefa(oDlg4,nkey,oGet,aDados,mDados,oBrw_ve,x,aItens,oBjeto14) do case case nkey == VK_F2 EXECUTAR O BUTTON obTN[5] endcase

Colegas é possivel executar um Buttom com algum comando numa função externa tipo numa função externa queria executar o buttom abaixo que esta numa dialog redefine buttonbmp obtn[5] id 314 of oVenda ; action iif(fecha2(aDados,@aParcelas,cCli,aTerminal,@aCredito_cli),(aDados[D_CONDICAO]:='2',oVenda:Cargo:=.t.,oVenda:End()),.t.) cancel when aDados[D_SUBTOTAL]<>0 ; .and. cIden[21]=1 prompt "Fechar a Prazo" Obrigado

Ola Edutraini, vc não teria um exemplo igual ao de cima, para o preenchimento do PIS e COFINS Obrigado

Pessoal resolvido GroupHeader2.startnewpage := true caso alguém venha precisar, com isto fica facil fazer imprimir dois pedido numa folha A4, se tiver muitos itens inicializa nova pagina.

Colegas alguém saberia me informar se via comando dentro do fr3 consigo mandar imprimir em nova pagina, o fastreport tem como opção direto no header, mais preciso fazer uma comparação e imprimir em nova pagina em algumas situações. abrindo o fastreport.prg tem uma classe newpage, só não consigo acertar sua sintaxe Obrigado

Vlw edutraini, agora ficou facil. Abs Luiz Fernando

Jorge na verdade ainda não tenho o código, queria ver um exemplo de tag, tipo com calculo de ICMS, pq somente trocar o CSOSN por CST não resolve precisa de mais informação. Obrigado Luiz Fernando

Colegas todos clientes que eu trabalho hoje com SAT é simples nacional, agora me surgiu uma de regime normal, minha duvida é esta parte no xml mtexto+='<ICMSSN102>' mtexto+='<Orig>0</Orig>' mTexto+='<CSOSN>'+aItens[i,29]+'</CSOSN>' mtexto+='</ICMSSN102>' eu mudei de CSOSN para CST mais da erro de validação, a mudança seria só isto mesmo. Obrigado Luiz Fernando

Kapiaba ficou assim cmsgResultado := .f. cUltNsu := "0" cRetorno := '' oNfeUtil:ConsultaNFDest("SP","01356052000100","0","0",cUltNsu,@cRetorno,@cmsgResultado) oFile1 = TTxtFile():New( cPath1+"XML.TXT" ) wlin := cRetorno oFile1:PutStr( wlin ) oFile:= TTxtFile():New("XML.TXT") oFile:GoTop() while !oFile:eof() cLine:=oFile:ReadLine() aTemp:=HB_aTokens(cLine,"|") aadd( aNotas, { space(15),space(44),space(14),space(60),space(20),0,ctod(""),space(8) } ) x++ aNotas[x,1]:=aTemp[1] // tipo de operação NFE, cancelamento, carta de correção aNotas[x,2]:=aTemp[3] // chave aNotas[x,3]:=aTemp[4] // cnpj aNotas[x,4]:=aTemp[6] // nome do emitente aNotas[x,5]:=aTemp[7] // inscrição estadual do emitente aNotas[x,6]:=val(aTemp[10]) // valor da NFE aNotas[x,7]:=substr(aTemp[12],9,2)+"/"+substr(aTemp[12],6,2)+"/"+substr(aTemp[12],1,4) // data aNotas[x,8]:=substr(aTemp[12],12,8) // hora oFile:skip() enddo xbrowse(aNotas) Observe que esta é primeira etapa, pegar os dados das NFE, agora é criar a rotina para baixar estes XML, e depois fazer o manifesto Abs Luiz Fernando

Kapiaba perfeito deu certo aqui deixei com .f., embora o retorno esta sempre vindo como .f., mais esta me trazendo os dados de todas as NFE, agora é trabalhar com este arquivo cmsgResultado := .f. //{} //cDataRecebimento := "" cUltNsu := "0" //"" cRetorno := '' oNfeUtil:ConsultaNFDest("SP","01456052000200","0","0",cUltNsu,@cRetorno,@cmsgResultado) ? cmsgresultado // aqui esta sempre vindo .f. ? cRetorno // aqui já tem todos dados das nfe conforme mencionado acima pelo GUNAFE Luiz Fernando

Kapiaba observe que esta variavel é passada como parametro, acredito que o erro deve estar na forma que declarei a mesma, tentei com := "" e tb com := {} Method ConsultaNFDest(cSiglaUFDestinado,cCNPJDestinatario,nIndicadorNFe,nIndicadorEmissor,cUltNsu,uRetorno,lRetArray) Class TVoNFeUtil2G Obs: coloquei a variavel cmsgResultado := .f. agora não da mais o erro, vou continuar aqui , vlw Kapiaba Obrigado

Pessoal sera que alguém consegue visualizar o que estou fazendo de errado. cmsgResultado := {} // aqui tb tentei cmsgresultado := "" cUltNsu := "0" oNfeUtil:ConsultaNFDest("SP","01452073000100","0","0",cUltNsu,,@cmsgResultado) da erro la na funcao CONSULTANFDEST nesta linha If !Empty(cRetTxt) ::lAutorizada:=.t. If lRetArray // exatamente aqui uRetorno:={} mensagem do erro Argument error: conditional Luiz Fernando

Kapiaba o que o edutraini quis dizer, é visualizar todas NFE emitida para um determinado CNPJ, para dai poder fazer o manifesto, ou o pessoal do setor de compra já ir trabalhando com XML nos processo de entrada, tb estou precisando fazer esta rotina. Abraços

Ola Kapiaba, vc consegue enxergar todas notas emitidas para um CNPJ nesta sua função, usando a flexdocs.