Imprimir serviço na impressora fiscal

[sicnet]

Caros amigos

Mais uma vez venho pedir ajuda , pois preciso imprimir servico na impressora fiscal bematech.

Para imprimir um item na imp. fiscal bematech , eu faco assim.

Código: Selecionar todos

// POSICAO NA IMPRESSORA FISCAL. POSICAO 01,02,03 ETC...
VCOD_12=''01''
vCOD_25=''02''
VCOD_5  ="03"


  // DEFININDO A ALICOTA ,  ICM_PE = COD.ALICOTA DO PRODUTO Q , SE FOR 1=17% 2=12, ETC...
IF                              Icm_PE="1"; wIcm:=Vcod_17  // 17%
                        ElseIf Icm_PE="2"; wIcm:=Vcod_12  // 12%
                        ElseIf Icm_PE="3"; wIcm:=Vcod_25  // 25%
                        ElseIf Icm_PE="4"; wIcm:=Vcod_5   //  5%
                        ElseIf Icm_PE="0"; wIcm:='II'          // Isento
                        Else                    ; wIcm:=Vcod_17 // 17%
  EndiF


 // IMPRIMINDO O ITEM NA IMP . FISCAL QUE TA TUDO OK, FUNCIONANDO MARAVILHA.
                        FSerial := FOpen (wCom, FO_READWRITE + FO_COMPAT)
                        wLeitura_x=Chr(27)+Chr(251)+"09|"+StrZero(Val(wPro_Not),13)+'|'+SubStr(WDes_Reduz,1,29)+'|'+wIcm+'|'+strzero(wqtd_Not*1000,7)+'|'+strzero(wPre_Not*100,8)+'|'+'00000000'+Chr(27)
                        FWrite(FSerial,@wLeitura_x,len(wLeitura_x))
*                       FClose (FSerial)

Obs : se isento eu uso wicm:=''ii'' ou wicm:='i1'' , como faco com o servico. que aqui na minha cidade a alicota de servico e de 5% , variando de cidade pra cidade 3% , 2% etc.... o problema 'e como fazer.

Pois na bematech ja tentei de tudo ex.......... wicm=''ss" ou algo assim.

Agradeco antecipadamente


Clovis L Costa

Nota de Moderação:
por Maligno: Mensagem editada para colocar a tag [ code ]
Veja como utilizar esta tag: https://pctoledo.org/forum/faq.ph ... bcode#f2r1
Mensagem editada para formatação de texto em letras minúsculas. Evite postar mensagens com texto TOTALMENTE EM LETRAS MAIÚSCULAS.
Veja as Regras do Fórum:
7 - Mensagens em letras MAIÚSCULAS poderão ser editadas sem aviso prévio.

[alaminojunior]

Bom dia Clovis,
primeiramente a impressora fiscal deve ter sido lacrada com a respectiva Inscrição Municipal configurada em sua memória, e ter as devidas alíquotas cadastradas.
Para vender itens com alíquota de serviço, basta você usar o índice da alíquota (01, 02, 03, etc ...) ou chamar com FS1,FS2,IS1,IS2,NS1 ou NS2. Procure na redução Z que lá constará cada uma delas com o seu identificador.

Agora, se lhe serve como dica: acredito que tornaría o codigo mais flexível, se você adotasse o uso de uma tabela ( dbf ) de alíquotas, e em cada produto/serviço houvesse um registro que identificasse esta alíquota, ao invéz de trazer estas informações (que são variáveis) embarcadas no código.
Abraço.