Clique abaixo para nos ajudar
Login

Esqueci minha senha

Estamos no Facebook
Buscar
 
 

Resultados por:
 


Rechercher Busca avançada

Quem está conectado
9 usuários online :: Nenhum usuário registrado, Nenhum Invisível e 9 Visitantes :: 2 Motores de busca

Nenhum

[ Ver toda a lista ]


O recorde de usuários online foi de 468 em 1/3/2012, 10:43
Como preencher campos vazios

9/2/2017, 11:55 por Linghston

Pessoal boa tarde,

É o seguinte, eu preciso preencher os campos de uma coluna da tabela DBF que …

Comentários: 2

Enviar msg para WhatsAPP via VFP

7/2/2017, 10:31 por Eliana

Olá Pessoal!

Alguém sabe se é possível enviar mensagem para o WhatsAPP via VFP?


Grata


Comentários: 0

Tudo dá errado

3/2/2017, 16:50 por Douglas Pascini

Troquei de maquina, achei que seria uma boa, [Você precisa estar registrado e conectado para ver esta imagem.]  pois passei para uma maquina melhor.

Instalei o …

Comentários: 1

URGENTE - Instalação do aplicativo

24/1/2017, 08:51 por Douglas Pascini

Bom dia. Estou com um problema, ao fazer a instalação (colocar os arquivo) do aplicativo na …

Comentários: 0

USAR REPORT FORM

30/12/2016, 09:06 por AJC

Pessoal bom dia,
Estou com um grande problema, já pesquisei muita coisa sobre report form, mas o …

Comentários: 3

Estatísticas
Temos 7014 usuários registrados
O último usuário registrado atende pelo nome de Jhoniker Braulio (IOTech)

Os nossos membros postaram um total de 20 mensagens em 11 assuntos

Impressora Ticket

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Impressora Ticket

Mensagem por clima238 em 15/11/2016, 09:20

Bom dia,
Por favor alguém me explique porque o código abaixo imprime no ecrã em vez do printer: Obrigado desde já.

SET ENGINEBEHAVIOR 80 && Desactivo o Foxprewier

SET CONSOLE OFF
SET PRINTER ON
SET PRINTER TO NAME (m.a_impressora)

@ PRow(),01 say a_empresa
@ PRow()+1,01 say a_morada
@ PRow()+1,01 say o_nif
@ PRow()+1,01 say o_telefone

@ PROW()+3,01 say "Venda a dinheiro em " + DTOC(a_data)+" as "+time()

@ PROW()+2,01 say "----------------------------- ----------------------"
@ PROW()+1,01 say "QUANT ARTIGO VALOR"
@ PROW()+1,01 say "----------------------------- ----------------------"

&& Propositado
tem_decimais = .F.

SELECT itens_venda
LOCATE

SCAN
if tem_decimais = .T.
@ PRow()+1,01 say LTRIM(STR(itens_venda. quantidade)) PICTURE "999.999"
else
@ PRow()+1,01 say LTRIM(STR(itens_venda. quantidade)) PICTURE "9999"
endif
@ PROW(),07 say LEFT(itens_venda.descricao, 35)
@ PROW(),42 say itens_venda.valor_venda PICTURE "999,999.99"
ENDSCAN

@ PROW()+1,01 say "----------------------------- ----------------------"

IF a_comissao_servicos > 0
@ PROW()+1,20 say "Comisssão Serviços"
@ PROW(),42 say a_comissao_servicos PICTURE "999,999.99"
@ PROW(),52 say " Cve"
ENDIF

IF a_comissao_lubrificantes > 0
@ PROW()+1,20 say "Comisssão Lubrificantes"
@ PROW(),42 say a_comissao_lubrificantes PICTURE "999,999.99"
@ PROW(),52 say " Cve"
ENDIF

@ PROW()+1,01 say "TOTAL"
@ PROW(),42 say o_total PICTURE "999,999.99"
@ PROW(),52 say " Cve"

@ PROW()+1,42 say o_total / 110.265 PICTURE "999,999.99"
@ PROW(),52 say " Eur"
@ PROW()+2,01 say "Iva Incluido"


o_comprimento = "Obrigado(a) pela preferência, volte sempre"
o_operador = IIF(!EMPTY(nome_oper)," Atendido por ", "") + decCryptar(m.nome_oper,a_ senha)

@ PROW()+2,01 say o_operador
@ PROW()+1,01 say o_comprimento

*@ PROW()+3,01 say '' + CHR(29)+CHR(86)+CHR(48) && CUT paper

SET PRINTER TO
SET PRINTER OFF
SET CONSOLE ON
SET PRINTER TO DEFAULT && Se necesita para que no quede la cola de impresión ocupada


clima238
Começando a Participar
Começando a Participar


Voltar ao Topo Ir em baixo

Re: Impressora Ticket

Mensagem por FERNANDOMATRELLA em 16/12/2016, 11:35

porque vc esta usando say ao inves de usar tres interrogações ???



FERNANDOMATRELLA
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Re: Impressora Ticket

Mensagem por ImRicoh em 20/1/2017, 08:25

Adicionar

SET DEVICE TO PRINTER

ImRicoh
Participa Pouco
Participa Pouco


Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum