VASCON Posted April 19, 2004 Report Share Posted April 19, 2004 BOA NOITE PESSOAL Como acertar o alinhamento de valores em impressoras jato de tinta? Vide linha comando de impressão: oPrn:Say(nRow, 12*nColStep, TRANSFORM(SOMA1, "@E 999,999.99") ) Exemplo: quando SOMA1 é 10.000,00, o alinhamento é diferente de quando SOMA1 é 500,00, ou seja, o alinhamento altera-se de acordo com o número de casas. GRATO NILSON Quote Link to comment Share on other sites More sharing options...
cobas Posted April 20, 2004 Report Share Posted April 20, 2004 Oi Nilson, use o parametro PAD_RIGHT no comando say para alinhar os valores a direita. oPrn:Say(nRow, 12*nColStep, TRANSFORM(SOMA1, "@E 999,999.99"),,,,,PAD_RIGHT ) Obs: você vai ter que mudar o valor da nCol porque o alinhamento vai partir da direita para a esquerda. Cobas citação:id=quote>id=quote> Quote Link to comment Share on other sites More sharing options...
VASCON Posted April 20, 2004 Author Report Share Posted April 20, 2004 COBAS Obrigado pela resposta, mas preciso que você me de mais uma ajuda. Coloquei da seguinte forma: oPrn:Say(nRow, 12*nColStep, TRANSFORM(SOMA1, "@E 999,999.99"),PAD_RIGHT ) Só que esta sendo interpretado pelo sistema como se fosse uma variável (erro: variavel não existe). Qual a forma correto de se colocar? OBRIGADO NILSON Quote Link to comment Share on other sites More sharing options...
vagner Posted April 20, 2004 Report Share Posted April 20, 2004 citação:COBAS Obrigado pela resposta, mas preciso que você me de mais uma ajuda. Coloquei da seguinte forma: oPrn:Say(nRow, 12*nColStep, TRANSFORM(SOMA1, "@E 999,999.99"),PAD_RIGHT ) Só que esta sendo interpretado pelo sistema como se fosse uma variável (erro: variavel não existe). Qual a forma correto de se colocar? OBRIGADO NILSON id=quote>id=quote>Olá Nilson, Repare na quantidade de vÃrgulas Abraços Vagner Wirts São Paulo-Brasil Quote Link to comment Share on other sites More sharing options...
filizola Posted April 20, 2004 Report Share Posted April 20, 2004 o melhor desta postagem foi a carinha ao lado da resposta do vagner. heheheheheheheheheheheheh...... Quote Link to comment Share on other sites More sharing options...
VASCON Posted April 21, 2004 Author Report Share Posted April 21, 2004 COBAS x WAGNER Segui as informações que voces me deram, mas não resolveu. Continua dando mensagem de variavel inexistente. Inseri a quantidade de virgulas conforme orientação: oPrn:Say( nRow, 00*nColStep, TRANSFORM(PRICELA,"@E 999,999,999.99"),,,,,PAD_RIGHT ) GRATO NILSON Quote Link to comment Share on other sites More sharing options...
vagner Posted April 22, 2004 Report Share Posted April 22, 2004 Olá Vascon, oPrn:Say( nRow, 00*nColStep, TRANSFORM(PRICELA,"@E 999,999,999.99"),,,,1 ) PAD_LEFT := 0 PAD_RIGHT := 1 PAD_CENTER := 2 Abraços Vagner Wirts São Paulo-Brasil Quote Link to comment Share on other sites More sharing options...
VASCON Posted April 22, 2004 Author Report Share Posted April 22, 2004 VAGNER Desculpe a chateação. Fiz as seguintes alterações: #Define PAD_LEFT:=0 #Define PAD_RIGHT:=1 #Define PAD_CENTER:=2 oPrn:Say( nRow, 00*nColStep, TRANSFORM(PRICELA,"@E 999,999,999.99"),,,,1) Mas não alinhou, continua variando de acordo com o tamanho do campo. O que resta fazer? GRATO NILSON Quote Link to comment Share on other sites More sharing options...
vagner Posted April 22, 2004 Report Share Posted April 22, 2004 Olá Nilson, Tente especificar o tamanho que irá ter. :Say( , , , , , , , ) tipo no nWidhth, coloque um tamanho de 100, vc terá q fazer testes ok ? então ficaria +- assim : oPrn:Say( nRow, 00*nColStep, TRANSFORM(PRICELA,"@E 999,999,999.99"), ,100,,,1) o nBkMode pode ser para o fundo da escrita : 1 - Transparente 2 - Opaco espero q funcione Abraços Vagner Wirts São Paulo-Brasil Quote Link to comment Share on other sites More sharing options...
VASCON Posted April 22, 2004 Author Report Share Posted April 22, 2004 Vagner Não consegui resolver colocando da forma abaixo: oPrn:Say(nRow,00*nColStep, TRANSFORM(PRICELA,"@E 999,999,999.99"),100,, ) apresenta o seguinte erro: ERROR OBJECTS/8 NO OBJECTS MSG: NUMERIC:ACTIVATE Grato NILSON Quote Link to comment Share on other sites More sharing options...
vagner Posted April 23, 2004 Report Share Posted April 23, 2004 citação:Vagner Não consegui resolver colocando da forma abaixo: oPrn:Say(nRow,00*nColStep, TRANSFORM(PRICELA,"@E 999,999,999.99"),100,, ) apresenta o seguinte erro: ERROR OBJECTS/8 NO OBJECTS MSG: NUMERIC:ACTIVATE Grato NILSON id=quote>id=quote>Olá Nilson, Vc colocou o tamanho no lugar da font , ficaria assim : oPrn:Say(nRow,00*nColStep, TRANSFORM(PRICELA,"@E 999,999,999.99"), ,100, , ,PAD_RIGHT ) Abraços Vagner Wirts São Paulo-Brasil Ps.: Em Tempo, Coloque o AllTrim(), no Transform, para q elimine os espaços em branco Editado por - vagner on 23/04/2004 07:57:38 Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.