gunafe

Boa Tarde, Aguiar, tenho rotina TEF homologada em impressora daruma, com multiplos cartões, entre em contato pelo email laugusto@acbusca.com Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa Noite a todos, Minha duvida é a seguinte: Se vendo um determinado produto e emito cupom fiscal, como eu devo proceder se este cliente retorna no dia seguinte e devolve o produto? Quem já homologou PAF, poderia me tirar esta duvida? Agradeço quem puder esclarecer. []´s Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa Noite a todos, Minha duvida é a seguinte: Se vendo um determinado produto e emito cupom fiscal, como eu devo proceder se este cliente retorna no dia seguinte e devolve o produto? Quem já homologou PAF, poderia me tirar esta duvida? Agradeço quem puder esclarecer. []´s Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa Noite, Porque voce não compra direto do Linhares, entre no forum intenacional e se informe, pelo menos por la, as coisas funcionam. Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa Noite, Veja se o código abaixo ajuda, migrei de uma tela delphi e estou usando no meu sistema: MENUFISCAL DIALOG 27, 20, 301, 213 STYLE DS_SYSMODAL | WS_POPUP | WS_VISIBLE | WS_CAPTION CAPTION " Menu Fiscal" FONT 9, "Arial" { PUSHBUTTON "LX", 68, 10, 8, 92, 18 PUSHBUTTON "Estoque", 74, 105, 8, 105, 18 GROUPBOX " Período/Intervalo", -1, 215, 58, 80, 39, BS_GROUPBOX GROUPBOX " Faixa de Dados ", -1, 215, 6, 81, 48, BS_GROUPBOX PUSHBUTTON "LMFC", 69, 10, 27, 92, 18 PUSHBUTTON "Movimento por ECF", 75, 105, 27, 105, 18 PUSHBUTTON "LMFS", 70, 10, 46, 92, 18 PUSHBUTTON "Meios de Pagto.", 76, 105, 46, 105, 18 PUSHBUTTON "Espelho MFD", 71, 10, 65, 92, 18 PUSHBUTTON "Vendas do Período", 77, 105, 65, 105, 18 PUSHBUTTON "Arq. MFD", 72, 10, 84, 92, 18 PUSHBUTTON "Tab.Ãndice Técnico Produção", 78, 105, 84, 105, 18 PUSHBUTTON "Tab. Produtos", 73, 10, 103, 92, 18 PUSHBUTTON "", 79, 105, 103, 105, 18 PUSHBUTTON "Identificação do PAF-ECF", 80, 10, 122, 200, 18 PUSHBUTTON " Esc - Sai", 81, 10, 145, 200, 21 CHECKBOX " 0 - Período", 60, 220, 18, 60, 10, BS_CHECKBOX | NOT WS_TABSTOP CHECKBOX " 2 - COO", 62, 220, 40, 60, 10, BS_CHECKBOX | NOT WS_TABSTOP GROUPBOX " Tipo de Saida", -1, 215, 100, 80, 39, BS_GROUPBOX CHECKBOX " 0 - Impressora", 65, 220, 110, 60, 12, BS_CHECKBOX | NOT WS_TABSTOP CHECKBOX " 1 - Arquivo", 66, 220, 122, 60, 12, BS_CHECKBOX | NOT WS_TABSTOP EDITTEXT 63, 236, 70, 42, 10 EDITTEXT 64, 236, 82, 42, 10 LTEXT "De", -1, 221, 70, 12, 10 LTEXT "Até", -1, 220, 82, 12, 10 CHECKBOX " 1 - CRZ", 61, 220, 29, 60, 10, BS_CHECKBOX | NOT WS_TABSTOP GROUPBOX " Assinatura Digital", -1, 215, 143, 80, 24, BS_GROUPBOX CHECKBOX " EAD", 67, 220, 152, 60, 12, BS_CHECKBOX | NOT WS_TABSTOP EDITTEXT 83, 236, 70, 42, 10 EDITTEXT 84, 236, 82, 42, 10 } id=code>id=code>Espero que ajude, estas são as opções pra quem não usa DAV( que é o meu caso ). Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa Tarde, Se bem me lembro, cada linha tem 48 caracteres, neste caso, voce não coloca quebra de linha, voce imprime cada linha com 48 caracteres. Que tipo de relatorio voce esta querendo imprimir, comprovante TEF? []´s Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa Noite, Segue abaixo um exemplo prático: //-------------------------------------------------------------------------- Function _Mensa( linha, aviso ) local oFont, oFont1, oBmp, oBar DEFINE FONT oFont NAME 'Courier News' SIZE 0, -13 BOLD DEFINE FONT oFont1 NAME 'Courier News' SIZE 0, -12 BOLD DEFINE DIALOG oDlgESP FROM 00, 00 TO 100, 500; STYLE nOr( DS_MODALFRAME, WS_POPUP ) PIXEL COLOR nRGB( 000, 000, 000 ), nRGB( 247, 214, 115 ) @ 10, 01 SAY oSay[ 1] PROMPT PADC( Space(80), 80 ) OF oDlgESP FONT oFont; COLOR nRGB( 255, 000, 000 ), nRGB( 247, 214, 115 ) UPDATE PIXEL @ 31, 01 SAY oSay[ 2] PROMPT PADC( aviso, 80 ) OF oDlgESP FONT oFont1; COLOR nRGB( 255, 000, 000 ), nRGB( 247, 214, 115 ) UPDATE PIXEL ACTIVATE DIALOG oDlgESP CENTER NOWAIT; ON INIT( oDlgESP:lHelpIcon := .f.,; oDlgESP:Move( 296, 252 ) ) oSay[ 1]:SetText( PADC( aviso, 80 ) ) // eliminacao de fontes usadas oFont:End() oFont1:End() Return nil id=code>id=code>Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa Noite a Todos, Não compatilho do titulo desta mensagem, não sou solidario nem com A ou B, o que entendo é que aqui neste forum não é o lugar de lavar roupa suja, por isso solicito ao administrador que retire esta mensagem e que o problema seja resolvido por outro meio, não aqui! Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Bom dia, Somente para complementar, lDiscolor := .T. NÃO FUNCIONA COM CAMPO MEMO! teste assim: REDEFINE GET oTips VAR cTips MEMO ID 67 OF oDlg_3 UPDATE NO MODIFY //When .f. oTips:SetColor( nRGB( 0, 0, 0 ), nRGB( 255, 255, 255 ) ) //oTips:lDisColors := .f. não funciona para campo MEMO oTips:cTooltip := "Selecione o Serviço " --> Ou use o FGET // Conclusão Médica REDEFINE GET oFGet VAR tMemo MEMO ID 65 OF oDlg_3 FONT oFont oFGet:bKeyDown := { |nKey|; IF( nKey = VK_RETURN,( oFGet:SetColor( ,CLR_WHITE ), oFGet:Refresh(), oFld:SetOption( 1), xSetFocus( btnf5 ) ),; IF( nKey = VK_F5 ,( PROD_AG(), xSetFocus( oFGet ) ),; IF( nKey = VK_F6 ,( Ficha_09( oDlg_3, oFld ), xSetFocus( _ANA[ 1] ) ),; IF( nKey = VK_F12,( oFld:SetOption( 1), ANAM_03_05( oDlg_3, oFld ) ),; IF( nKey = VK_ESCAPE,( oFGet:SetColor( ,CLR_WHITE ), oFGet:Refresh(), oFld:SetOption( 1), xSetFocus( _ANA[ 1] ) ), nil ))))) } oFGet:bGotFocus := { || oFGet:SetSel( 0, 0 ), oFGet:SetPos( 0, 0 ), oFGet:SetColor( nRGB( 0, 0, 185 ), nRGB( 249, 251, 151 ) ),; oFGet:Goto( oFGet:GetLineCount() ), __Keyboard( Chr( VK_END ) ) } oFGet:cTooltip := "Preencha o Campo de Conclusão " id=code>id=code>Espero que ajude, Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Tiao, Ja consegui o anexo VI. Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Tiao, mais uma coisa Entao, a cada movimento que executo no ecf, eu gravo as informaçoes, eh isso. Agora, minha duvida e o seguinte, eu crio um arquivo pra cada R, pra na hora de gerar o relatorio juntar por data, como voce montou o seu Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Tiao, obrigado por responder Agora me diz uma coisa, onde consigo este anexo VI. Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa tarde a todos, Estou com duvidas na montagem do relatorio movimento por ecf, a saber: Para quem ja homologou PAF-ECF essa eh moleza - De onde vem os dados para a montagem dos R01 a R07 Na realidade a maioria dos comandos ja estao implementados nos registros, contudo, o que quero dizer com a pergunta eh que no R04 os dados que devem ser informados nos campos de 10 a 19 sao de responsabilidade da aplicacao. Ate ai, tudo bem, mas qual o criterio de geracao destas informacoes; ou seja, vem da ultima reducaoZ, vem de um periodo de data, vem de intervalo de COO, eh comandado automaticamente apos a reducaoZ ou por intervensao de um fiscal ou operador. Agradecemos antecipadamente qualquer ajuda para esclarecer as duvidas. Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa tarde a todos, Estou com duvidas na montagem do relatorio movimento por ecf, a saber: Para quem ja homologou PAF-ECF essa eh moleza - De onde vem os dados para a montagem dos R01 a R07 Na realidade a maioria dos comandos ja estao implementados nos registros, contudo, o que quero dizer com a pergunta eh que no R04 os dados que devem ser informados nos campos de 10 a 19 sao de responsabilidade da aplicacao. Ate ai, tudo bem, mas qual o criterio de geracao destas informacoes; ou seja, vem da ultima reducaoZ, vem de um periodo de data, vem de intervalo de COO, eh comandado automaticamente apos a reducaoZ ou por intervensao de um fiscal ou operador. Agradecemos antecipadamente qualquer ajuda para esclarecer as duvidas. Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Bom dia a todos, Daniel, o que eu quiz dizer é que em breve teremos CFe, ou seja, cupom fiscal eletronico, que será trasmitido para a sefaz e poderá ser impresso em impressora comum, nada alem. []´s em todos, Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa Noite a todos, Obrigado Luiz e Toya pelo esclarecimento sobre o assunto. Quanto a CF-e, eu lembro que este assunto ainda estava em discursão publica, não sabia que já estava tão adiantada assim, o que é muito bom. Só não é bom pra quem vende IF, mas isso é o de menos, basta se adaptar que da tudo certo. O negocio é montar o seu programa pra emitir o CF-e( Cupom Fiscal eletronico ), que basicamente é uma NFe, só que menos rigida. []´s Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa tarde, Pra quem não sabe, o Linhares liberou a versão 6.12 do fivewin, "di gratis" mesmo, não deixa nada a desejar em relação a outras versões, use este link http://www.fivetechsoft.com/spanish/downloads.html []´s Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa tarde a Todos, Alquem poderia me esclarecer qual a diferença, ou se simplesmente não há diferença? []´s Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa tarde a Todos, Alquem poderia me esclarecer qual a diferença, ou se simplesmente não há diferença? []´s Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Bom dia, Entre na configuração da impressora do windows e mande imprimir direto pra porta, retire o spool. []´s Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa Noite, Tião, somente este ano já fui tres vezes na redecard e na visa e nas tres fiz da maneira que falei, usei o pinpad das homologadoras, por isso eu digo que não é necessário comprar. Rossine, entre em contato com as homologadoras e tire a duvida, o tel pra falar direto na sala de homologação visa é este: 11 35496723 Patricia ou 11 35496730 Fábio, tenho certeza que eles vão esclarecer suas duvidas. []´s Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa Noite, Não precisa comprar pinpad para desenvolver TEF, a não ser que voce já tenha um comprador para o pinpad após a homologação, porque voce não vai ter nenhuma utilidade pra ele. Quanto aos testes, voce pode fazer todos sem o pinpad, exceção das transações de débito, que precisa do pinpad, neste caso, voce faz os testes do débito no crédito e para a homologação voce reserva um pinpad junto as homologadoras que eles emprestam, já fiz quatro homologações desta maneira. []´s Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa Tarde, Li em algum lugar o seguinte: "Ensina a pescar, não dê o peixe!" O que quero dizer com isso, que é mais facil reclamar do que procurar aonde esta o problema! Gente, o Wagner "DEU" os fontes, vamos fazer por merecer. Amigo Wagner, sucesso, volte logo! []´s Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Boa Noite, Estive nos dias 5 e 6 de abril certificando TEF, foi relativamente tranquilo, digo isso porque, por conta da maneira de interpretar do homologador visa o teste 31 do cheklist, precisei ficar mais um dia, mas felizmente correu tudo bem. Como disse o amigo, se voce seguir a risca o que diz o checklist, passa tranquilo em todos os testes e homologa seu sistema sem stress. []´s Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"

Parece mais comida de sapo, Fog Creek, eu hein!! []´s Luiz Augusto São José dos Pinhais - PR xHarbour + Fivewin + Workshop + Sql via Odbc Vamos Aderir:"Retorne avisando se a dica funcionou"