luiz53

comando corta papel chr(27)+"m" Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

ve se ajuda... ************************ FUNCTION EPSON_GET_DATAHORA(DATA,HORA) ************************ LOCAL S_BUFFER := SPACE(30) LOCAL RETORNO := EPSON_OBTER_HORA_RELOGIO(@S_BUFFER) IF !EPSON_RETORNO(RETORNO) RETURN NIL ENDIF DATA := SUBSTR(S_BUFFER,1,8) HORA := SUBSTR(S_BUFFER,9,2)+":"+SUBSTR(S_BUFFER,11,2)+":"+SUBSTR(S_BUFFER,13,2) RETURN NIL ****************************** FUNCTION EPSON_RETORNO(VRET) ****************************** LOCAL RETORNO := .F. LOCAL MSGRETO DO CASE CASE VRET = 0 RETORNO := .T. OTHERWISE S_BUFFER := SPACE(20) MSGRETO := SPACE(100) EPSON_Obter_Estado_Impressora(@S_BUFFER) EPSON_Obter_Mensagem_Erro(SUBSTR(S_BUFFER,17,4),@MSGRETO) MSGINFO(MSGRETO,"Atenção...") ENDCASE //LOGFILE("EP.LOG",{RETORNO,zRaw(S_BUFFER)}) RETURN RETORNO Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

valor1 := strzero((12.53*100),12) ? valor1 Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

Putz esqueci o Mais importante com harbour ficou muito mais rapido.... valew o sacrificio... devo umas pro ALE SB;;; "DEVO NAO NEGO PAGO QUANDO PUDER" Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

Bom dia... Com o suporte do ALE SB. fiz uma migração de xharbour para harbour CVS... Testei o harbour com MSVC e com BCC usando ADS 8.1 com FWH 10.6 Obs: o Executável ficou 20 % menor(MSVC), mas sinceramente não achei que houve ganho de velocidade usando MSVC, testei durante uma semana... as duas opções e optei para o uso do BCC582. Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

Bom dia... Com o suporte do ALE SB. fiz uma migração de xharbour para harbour CVS... Testei o harbour com MSVC e com BCC usando ADS 8.1 com FWH 10.6 Obs: o Executável ficou 20 % menor(MSVC), mas sinceramente não achei que houve ganho de velocidade usando MSVC, testei durante uma semana... as duas opções e optei para o uso do BCC582. Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

Você Prefere ser Feliz ou Ter Razão É interessante como no cotidiano reclamamos de cansaço, stress, contas a pagar, muito trabalho, escola e do chefe.Enfim da luta pela sobrevivência, porém não deixamos de lado o fato de abrirmos mão ou de ter razão. Detestamos deixar que o ponto de vista do outro prevaleça, não é ? Quando uma outra pessoa nos questiona daquela idéia que você estava martelando a dias, esperando o seu melhor momento para expor.Usamos de várias artimanhas ; seduzindo,convencendo,persuadimos e até gritamos para nossa palavras não seja desacatadas ou seja a última. Quanta energia gastas ? Imagine uma pessoa sendo socorrida de um acidente de automóvel, preocupada em dizer que o ocorrido foi culpa do outro automóvel .O que adianta isto agora? Estar certo não vai consertar a situação e muito menos recuperá-lo .Logo é óbvio que estar feliz é muito melhor que ter razão. Quantos fatos corriqueiros defendemos nos quais o mais importante e ter razão do que ser feliz. Que tal inverter esta situação para um resultado propulsor para você? Atenção para não se acomodar com a situação,ter razão não é sinônimo de não expor idéias.Participar é opiniar, é mostrar !! Experimente agir durante um dia desta forma e observe. "Valdemir Vital" "Que Adianta ter Razão, muitas vezes ter razão me tomou boas amizades..." Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

Eduardo Motta Muito Obrigado pela Ajuda... Valew Mesmo... citação:É facil, mas voce terá que mudar o fonte padrao do fivewin RPREVIEW.PRG. 1-Copie o fonte RPREVIEW.PRG da pasta \FWH\SOURCE\CLASSES\RPREVIEW.PRG para a pasta do seu sistema 2-Abre o RPREVIEW.PRG da pasta do seu sistema. 3-Localiza o METHOD PRINTPRV 4-Antes do comando StartDoc( oDevice:hDC, oDevice:cDocument ) coloque a seguinte linha: oDevice:hDC := PrinterSetup() vai ficar assim entao: CursorWait() // JA EXISTIA oDevice:hDC := PrinterSetup() // LINHA ACRESCENTADA. StartDoc( oDevice:hDC, oDevice:cDocument ) // JA EXISTIA 5-Compile a nova RPREVIEW.PRG no seu sistema. É facil, dificil foi descobrir isso no codigo. Abraço, EMotta Sistemas Eduardo Motta emotta@gmail.com.br FWH 9.09 - xHARBOUR 1.2.1 Editado por - emotta on 22/07/2010 10:45:31 id=quote>id=quote>Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

Verdade ... Todo Mundo Pede isso !!! Também gostaria de saber sobre isso ! Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

herberson muito obrigado pela ajuda... vou testar... esta informação Por um acaso vc nao teria os 2 Xmls da nfe NORMAL e da REFERENCIADA para me enviar pro email ?????? Mesmo agradeço pela atenção. Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

se for cpf oNFe:SetValue("dest" , "CPF" , CPF ) CASO CONTRARIO oNFe:SetValue("dest" , "CNPJ" , CNPJ ) Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

isso... Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

alguem já fez NFE complementar poderia me da uma dica ????? Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

alguem já fez NFE complementar poderia me da uma dica ????? Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

Valew pela Dica, agora sim consegui gerar meu sistema em harbour ... Graças ao download : http://www.4shared.com/file/146161231/870a79c8/HbBc_110.html Muito obrigado pela ajuda !!! Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

Qual o CST ?? Se não me engano "60" não imprime mesmo, pois 60 é "ICMS COBRADO ANTERIORMENTE POR S.T." Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

ALGUEM USA VIACORAL COM FIVEWIN 9.07 PODERIA ME AJUDAR ? ESTOU TENDO ERRO DE PCODE !!! Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

ALGUEM USA VIACORAL COM FIVEWIN 9.07 PODERIA ME AJUDAR ? ESTOU TENDO ERRO DE PCODE !!! Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 9.07 / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

alguem já Homologou com TEF DA DIREÇÃO do RIO GRANDE DO SUL ? Esse Tef é Dedicado e Via IP sem Custos de Roteadores e X25 ... Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 8.?? / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br Editado por - luiz53 on 18/08/2009 10:47:55

alguem já Homologou com TEF DA DIREÇÃO do RIO GRANDE DO SUL ? Esse Tef é Dedicado e Via IP sem Custos de Roteadores e X25 ... Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 8.?? / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br Editado por - luiz53 on 18/08/2009 10:47:55

Postei em Dicas... http://fivewin.com.br/exibedicas.asp?id=975 Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 8.?? / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

Por favor Me mande um email que te mando as declacoes da EPSON TM-81 Se ainda não consegui... Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 8.?? / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

alguem usa HARBOUR BOLETO COM BOLETO HSBC QUANDO O DIGITO VERIFICADOR = 1 DA ERRO NO PAGAMENTO NO CAIXA execmplo 8990500996-1 nao recebe em nenhum banco !!!! ALGUMA SUGESTAO ? Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 8.?? / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

alguem usa HARBOUR BOLETO COM BOLETO HSBC QUANDO O DIGITO VERIFICADOR = 1 DA ERRO NO PAGAMENTO NO CAIXA execmplo 8990500996-1 nao recebe em nenhum banco !!!! ALGUMA SUGESTAO ? Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 8.?? / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br

A dll. Faz conexao com o webservice ????? Messager luizantoniooliveira@hotmail.com Skype luizantoniooliveira Xhb 1.0 / FW 8.?? / WorkShop / HbMake / Xmate / Clipper 5.3b / Blinker 5.1 / LLibg www.omega-store.com.br