Clique abaixo para nos ajudar
Conectar-se

Esqueci minha senha

Estamos no Facebook
Buscar
 
 

Resultados por:
 


Rechercher Busca avançada

Quem está conectado
4 usuários online :: Nenhum usuário registrado, Nenhum Invisível e 4 Visitantes

Nenhum

[ Ver toda a lista ]


O recorde de usuários online foi de 468 em 1/3/2012, 10:43
Informações CPF e CNPJ

21/2/2014, 09:46 por mauro victoria

Por favor,
fiquei sabendo da possibilidade de ao digitar o CPF ou CNPJ, o sistema vai no site da …

Comentários: 6

automação do mozilla e chrome

15/1/2017, 12:16 por Handerson Mildroz

Boa tarde a todos!

Sou iniciante no VFP. Preciso de ajuda, pois tenho um código que usa o …

Comentários: 1

ListBox

23/5/2017, 10:37 por Rosangela Pires

Ola Amigos.

Para se movimentar na grid com as setas colocamos no Metodo AfterChange da grid …

Comentários: 0

TRY BEGIN E FLOCK()

17/4/2017, 10:32 por AJC

Pessoal estou tendo alguns problemas de gravação em rede, estou usando
try begin, mas vi algo na …

Comentários: 0

Exportar Dados Campo Memo Tabela DBF

10/4/2017, 10:28 por fcampos

Olá bom dia.

Estou tentando exportar os dados de algumas tabelas em formato dbf pelo foxpro.
O …

Comentários: 2

Estatísticas
Temos 7095 usuários registrados
O último usuário registrado atende pelo nome de Robson0

Os nossos membros postaram um total de 12250 mensagens em 1552 assuntos

Impressora Ticket

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

Re: Impressora Ticket

Mensagem por Conteúdo patrocinado


Conteúdo patrocinado


Voltar ao Topo Ir em baixo

Voltar ao Topo


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