Pular para o conteúdo principal

Postagens

Mostrando postagens de julho, 2014

Implantar lei 12.741 no Protheus

Conhecida como lei da transparência, que trata que todos os impostos devem vir descriminados no cupom fiscal. Para implantar, atualize o Protheus para última versão disponível no Portal da Totvs, em seguida execute as atualizações U_UPDLO112 e U_UMTFOFV9. Crie no menu a opção com o programa LJIMPNCM, com o nome de "Carrega Alíquota Imposto", que deverá importar o arquivo "IBPTax.0.0.2.csv", que está disponível no link  de olho no Imposto Estes impostos são ligados através do campo B1_POSIPI(SB1 - Produtos), YD_TEC e YD_ALIQIMP(SYD - Nomeclatura Merco Sul). Se tudo correr bem, será mostrada no cupom fiscal a mensagem "Valor aprox dos tributos R$ 14,36 (31.436%) Fonte:IBPT" por exemplo.

Substituindo Emulador Bematech pelo Sweda no Protheus

Resolvi substituir o emulador depois de vários problemas com a geração de títulos repetidos no emulador Bematech. Quando fiz a substituição, o problema acabou. Esse Emulador Sweda é muito estável, assim podemos testar melhor nossas customizações. Para começar acesse o site  Sweda  e faça os seguintes downloads: Connect/C : Windows - Biblioteca compatível com as DLLs de Alto Nível do Mercado. Connect/Sim :  Emulador da Impressora Sweda IF ST120.  Entre em outro link  lacrador Sweda  e faça o seguinte download: Instalar_Lacrador02.10.00 Agora acesse o site  Eterlogic  e faça o seguinte download: Virtual Serial Ports Emulator :  Emulador de serial. Configurando o Emulador de Serial Instale " Virtual Serial Ports Emulator ", depois abra-o, vá em "device", "create", na opção "Device Pair" escolha "Pair", em "avançar". Em "Virtual Serial Port 1" coloque "COM3" e na "Virtual Seria

Converter PDF para JPG no Protheus

Você pode converter PDF para JPG no Protheus, usando ADVPL, com a ajuda de dois utilitários (free) externos: ImageMagick e Ghostscript . Baixe-os e instale-os. IMPORTANTE: se você instalar em seu servidor, todos seus usuários do Protheus na rede poderão usar seu programa ADVPL.   Segue o programa ADVPL: static function fConvPDFJPG(cNomPDF, cNomJPG)    local lRet := .f.,;          cPathImgMgk := "C:\PROGRA~1\IMAGEM~1.9-Q\" ,;          cPathProth := "C:\PROTHEUS\PROTHE~1\TEMP\"    // ATENCAO: OS COMANDOS ABAIXO DEVEM FICAR EM MINUSCULO.    // OS PATHs DEVEM TER 8 DIGITOS (USE DIR /X NO CMD PARA VER O PATH REDUZIDO)    if waitrunsrv( cPathImgMgk + "convert -density 300 " + cPathProth + cNomPDF + " -quality 80 " + cPathProth + cNomJPG, .t., cPathImgMgk )       lRet := .t.    endif return lRet Observações: 1 - O programa ADVPL usa a função waitrunsrv para chamar o executável convert (que é parte do ImageMagik ). 2 - A