-
Posts
523 -
Joined
-
Last visited
-
Days Won
9
Posts posted by Ladinilson
-
-
Em 04/10/2021 at 10:32, hcunha disse:
Bom dia a todos,
"452-Rejeicao: Solicitada resposta assincrona para lote com somente '(uma) nfc-e"
Alguem já está recebendo a mensagem acima da sefaz ? Se receberam, como resolveram? Nos ajude por favor pois meus clientes estão pra me bater aqui, Rssssssss
Bom dia,
Para quem usa ACBR a solução esta neste link...
E resolvi mudando a linha do comando acrescentando ",0,,1" na linha de envio como no exemplo...
NFE.ENVIARNFE("c:\35XXXXXXXXXXXXXXXX550010000000050000000058-nfe.xml",1,1,0,,1)
Espero qaue lhe ajude ou ajude alguém.
-
2 minutos atrás, kapiaba disse:
É só pedir, né tonto? kkkkkkkkkkkkkkkkkkkkkkkkkkkkk
kkk, achei dele mesmo mas o link não esta funcionando para baixar
inclusive fez várias versões -
17 minutos atrás, kapiaba disse:
Boa, mas se tive sse o envio ficaria completa.
Vou testar!
-
18 horas atrás, Theotokos disse:
Boa Tarde!!! o Driver do google disponibiliza 15gb, e agora ele instalado no micro, cria uma unidade para ser usado (exemplo no meu criou a unidade G:\)
Pergunto: É possível instalar o meu sistema nesta unidade para ser utilizado? ou seja, os dados serão sicronizados na nuvem e outros micros que estiverem tmb login n no drive poderá usar... com se vc sistema em rede... mas na nuvem... sera?
Ah! pensei nisto para um sistema bem simples, que utilizo arquivo DBF´s e é pequeno a movimentação dos dados....
Fiz com o RaiDrive que cria uma unidade no pc e criei uma rotina onde as filiais enviam para o Google Drive imagens e baixo na unidade do pc criada pelo RaiDrive.
Fiz isso porque com FTP ficou até mais "trabalhoso" mas sei que a velocidade é melhor.
Não sei se isso que estas pretendendo mas comigo funcionou legal.Vou fazer um teste pelo Backup do Drive.
Abs
-
Ftp
in Programação
21 horas atrás, Jorge Andrade disse:Amigo, boa tarde. Eu tenho uma rotina antiga desenvolvida em console que eu utilizava, quem sabe serve pra vc migrar para FW. Tem a conexão, download, upload, rename de arquivos, pasta e etc...
Se te interessa, passa o email que te mando.
[]s,
Bom dia meu caro,
Poderia me mandar também para uma análise pois fiz um com RaiDrive ficou bom por criar uma unidade da pasta do Google Drive mas quaria lgo mais nativo.
ladinilson@hotmail.com
Obrigado
-
49 minutos atrás, kapiaba disse:
//-> Rejeicoes da nota fiscal eletronica - 08/10/2009 //-> Modificado em: 26/02/2020 Joao #Include 'Fivewin.Ch' FUNCTION REJEICAO_NFE( NX ) LOCAL cSefazRS, cReijicao494, cReijicao246, cReijacao481, cRejeicao699, cMensa LOCAL cRejeicao777 DO CASE CASE NX=NIL NX=999 ENDCASE DO CASE CASE NX = 90 cMensa := STR(NX,3,0)+ " Rejeição: Processamento da NF-e interrompido (quantidade máxima de tentativas alcançada)" CASE NX = 105 // MODIFICADO EM: 03/01/2018 - Joao - para variar, Bete(Silco) cMensa := STR(NX,3,0)+ " - Lote em Processamento na SEFAZ Estadual. " + ; "Veja se a SEFAZ Não Está em Contingência SVC-AN. " + ; "Tela Principal da NF-e, Botão: <Ver Sefaz> " + ; "Botão: <Testar a Conexão com o Web Service da " + ; "SEFAZ. Tente Consultar o Lote de 30 em 30 Minutos. "+ ; "Isto Não é um Erro, Problemas na SEFAZ Estadual." CASE NX = 106 cMensa := STR(NX,3,0)+" - Lote Não Localizado na SEFAZ" CASE NX = 108 cMensa := STR(NX,3,0)+" - Serviço Paralisado Momentaneamente (Curto Prazo)" CASE NX = 109 cMensa := STR(NX,3,0)+" - Serviço Paralisado sem Previsão - Espere 15 Minutos Antes de Tentar Enviar" CASE NX = 110 cMensa := STR(NX,3,0)+" - Uso Denegado - Indeferido - Denegar no Pleno: Faturamento - Cancelamentos - Denegacao - I.E. Suspensa - I.E. Cancelada - I.E. Baixada - I.E. Em Processo de Baixa." CASE NX = 111 cMensa := STR(NX,3,0)+" - Consulta cadastro com uma ocorrência" CASE NX = 112 cMensa := STR(NX,3,0)+" - Consulta cadastro com mais de uma ocorrência" CASE NX = 113 cMensa := STR(NX,3,0)+" - SVC/AN em processo de desativação. SVC será desabilitada para a SEFAZ-XX em dd/mm/aa às hh:mm horas - este retorno será apresentado, quando estiver se encerrando a disponibilidade do servidor de emissão SVC/AN." CASE NX = 114 cMensa := STR(NX,3,0)+" - SVC/AN desabilitada pela SEFAZ de Origem - este retorno será apresentado quando for realizado uma consulta de status, e o servidor de emissão SVC não estiver disponível para emissão, pois o serviço de emissão para o SVC/AN, só será liberado quando a Sefaz habilitar a emissão, então, ele não estará sempre disponível." CASE NX = 151 cMensa := STR(NX,3,0)+" Cancelamento de NF-e homologado fora de prazo" CASE NX = 155 cMensa := STR(NX,3,0)+" Cancelamento de NF-e homologado fora de prazo" CASE NX = 201 cMensa := STR(NX,3,0)+" Rejeição: O numero máximo de numeração de NF-e a inutilizar ultrapassou o limite" CASE NX = 202 cMensa := STR(NX,3,0)+" Rejeição: Falha no reconhecimento da autoria ou integridade do arquivo digital" CASE NX = 203 cMensa := STR(NX,3,0)+" Rejeição: Emissor não habilitado para emissão da NF-e - Fale com o Seu Contador." CASE NX = 204 cMensa := STR(NX,3,0)+" Rejeição: Duplicidade de NF-e" CASE NX = 205 cMensa := STR(NX,3,0)+" Rejeição: NF-e está denegada na base de dados da SEFAZ - Denegar no Pleno: Faturamento - Cancelamentos - Denegacao - I.E. Suspensa - I.E. Cancelada - I.E. Baixada - I.E. Em Processo de Baixa." CASE NX = 206 cMensa := STR(NX,3,0)+" Rejeição: NF-e já está inutilizada na Base de dados da SEFAZ" CASE NX = 207 cMensa := STR(NX,3,0)+" Rejeição: CNPJ do emitente inválido" CASE NX = 208 cMensa := STR(NX,3,0)+" Rejeição: CNPJ do destinatário inválido" CASE NX = 209 cMensa := STR(NX,3,0)+" Rejeição: IE do emitente inválida" CASE NX = 210 cMensa := STR(NX,3,0)+" Rejeição: IE do destinatário inválida" CASE NX = 211 cMensa := STR(NX,3,0)+" Rejeição: IE do substituto inválida" CASE NX = 212 cMensa := STR(NX,3,0)+" Rejeição: Data de Emissão NF-e Posterior a Data de Recebimento ou Data: Saida/Entrada Vazia? Digite as Datas Corretas e Veja a Hora?" CASE NX = 213 cMensa := STR(NX,3,0)+" Rejeição: CNPJ-Base do Emitente difere do CNPJ-Base do Certificado Digital" CASE NX = 214 cMensa := STR(NX,3,0)+" Rejeição: Tamanho da mensagem excedeu o limite estabelecido" + ; " uma NF-e aceita até 990 itens de produto mas há também um" + ; " limite de tamanho do arquivo que deve ser transmitido à" + ; " SEFAZ para obter a autorização de utilização os arquivos" + ; " XML não poderão exceder 500 Kbytes." + ; " Diminua a Qtde. de itens na NF-e para uma quantidade menor" + ; " a fim de evitar que o tamanho do arquivo xml ultrapasse 500kb" CASE NX = 215 cMensa := STR(NX,3,0)+" Rejeição: Falha no schema XML-Este erro indica"+ ; " que o arquivo xml da NF-e está corrompido," + ; " sendo necessário verificar as informações do" + ; " arquivo XML da nota fiscal." CASE NX = 216 cMensa := STR(NX,3,0)+" Rejeição: Chave de Acesso difere da cadastrada" CASE NX = 217 cMensa := STR(NX,3,0)+" Rejeição: NF-e não consta na base de dados da "+; "SEFAZ - a NF-e ainda não foi autorizada Pela " +; "SEFAZ. " +; "A primeira coisa a se fazer, é consultar a " +; "Chave de Acesso no Portal Nacional da Sefaz ou "+; "no Portal Estadual da Sefaz. " +; "Verifique a Causa que provocou essa Rejeição." CASE NX = 218 cMensa := STR(NX,3,0)+" Rejeição: NF-e já esta cancelada na base de dados da SEFAZ" CASE NX = 219 cMensa := STR(NX,3,0)+" Rejeição: Circulação da NF-e verificada" CASE NX = 220 cMensa := STR(NX,3,0)+" Rejeição: NF-e autorizada há mais de 60 dias" CASE NX = 221 cMensa := STR(NX,3,0)+" Rejeição: Confirmado o recebimento da NF-e pelo destinatário" CASE NX = 222 cMensa := STR(NX,3,0)+" Rejeição: Protocolo de Autorização de Uso difere do cadastrado" CASE NX = 223 cMensa := STR(NX,3,0)+" Rejeição: CNPJ do transmissor do lote difere do CNPJ do transmissor da consulta" CASE NX = 224 cMensa := STR(NX,3,0)+" Rejeição: A faixa inicial é maior que a faixa final" CASE NX = 225 // cMensa := STR(NX,3,0)+" Rejeição: Falha no Schema XML da NFe-Atualizar Schemas da SEFAZ" cMensa := STR(NX,3,0)+" Rejeição: Falha no Schema XML do lote NF-e" // EM: 27/02/2019 - Mudei. Joao MsgInfo( "Verifique: CEP do emitente. "+CRLF+ ; "hora da saída/entrada "+CRLF+ ; "código EAN (GTIN) do produto "+CRLF+ ; "placa do veículo/reboque ", ; "225-Rejeição: Falha no Schema XML do lote NF-e" ) // link com as causas provaveis: // http://www.flexdocs.com.br/suporte/knowledgebase.php?article=129 CASE NX = 226 cMensa := STR(NX,3,0)+" Rejeição: Código da UF do Emitente diverge da UF autorizadora" CASE NX = 227 cMensa := STR(NX,3,0)+" Rejeição: Erro na Chave de Acesso - Campo ID" CASE NX = 228 cMensa := STR(NX,3,0)+" Rejeição: Data de Emissão Muito Atrasada Identificação da Nota Fiscal ou Data: Saida/Entrada Vazia? Digite as Datas Corretas e Veja a Hora?" CASE NX = 229 cMensa := STR(NX,3,0)+" Rejeição: IE do emitente não informada" CASE NX = 230 cMensa := STR(NX,3,0)+" Rejeição: IE do emitente não cadastrada" CASE NX = 231 cMensa := STR(NX,3,0)+" Rejeição: IE do emitente não vinculada ao CNPJ" CASE NX = 232 cMensa := STR(NX,3,0)+" Rejeição: IE do destinatário não informada" CASE NX = 233 cMensa := STR(NX,3,0)+" Rejeição: IE do destinatário não cadastrada - Verifique SINTEGRA para Ver se se o Cliente Nao esta com USO DENEGADO. - I.E. Suspensa - I.E. Cancelada - I.E. Baixada - I.E. Em Processo de Baixa." CASE NX = 234 cMensa := STR(NX,3,0)+" Rejeição: IE do destinatário não vinculada ao CNPJ - Verifique SINTEGRA para Ver se se o Cliente Nao esta com USO DENEGADO. - I.E. Suspensa - I.E. Cancelada - I.E. Baixada - I.E. Em Processo de Baixa." CASE NX = 235 cMensa := STR(NX,3,0)+" Rejeição: Inscrição SUFRAMA inválida" CASE NX = 236 cMensa := STR(NX,3,0)+" Rejeição: Chave de Acesso com dígito verificador inválido" CASE NX = 237 cMensa := STR(NX,3,0)+" Rejeição: CPF do destinatário inválido" CASE NX = 238 cMensa := STR(NX,3,0)+" Rejeição: Cabeçalho - Versão do arquivo XML superior a Versão vigente" CASE NX = 239 cMensa := STR(NX,3,0)+" Rejeição: Cabeçalho - Versão do arquivo XML não suportada" CASE NX = 240 cMensa := STR(NX,3,0)+" Rejeição: Cancelamento/Inutilização - Irregularidade Fiscal do Emitente" CASE NX = 241 cMensa := STR(NX,3,0)+" Rejeição: Um número da faixa já foi utilizado" CASE NX = 242 cMensa := STR(NX,3,0)+" Rejeição: Cabeçalho - Falha no Schema XML" CASE NX = 243 cMensa := STR(NX,3,0)+" Rejeição: XML Mal Formado" CASE NX = 244 cMensa := STR(NX,3,0)+" Rejeição: CNPJ do Certificado Digital difere do CNPJ da Matriz e do CNPJ do Emitente" CASE NX = 245 cMensa := STR(NX,3,0)+" Rejeição: CNPJ Emitente não cadastrado - Seu Contador não Cadastrou o seu CNPJ na SEFAZ." CASE NX = 246 cMensa := STR(NX,3,0)+" Rejeição: CNPJ Destinatário Não Cadastrado - " + ; "O Seu Cliente Tem Que Falar Com o Contador Dele. " + ; "Verifique o SINTEGRA Para Ver Se a NFe Nao Esta " + ; "Denegada na SEFAZ do Estado de Origem." CASE NX = 247 cMensa := STR(NX,3,0)+" Rejeição: Sigla da UF do Emitente diverge da UF autorizadora" CASE NX = 248 cMensa := STR(NX,3,0)+" Rejeição: UF do Recibo diverge da UF autorizadora" CASE NX = 249 cMensa := STR(NX,3,0)+" Rejeição: UF da Chave de Acesso diverge da UF autorizadora" CASE NX = 250 cMensa := STR(NX,3,0)+" Rejeição: UF diverge da UF autorizadora" CASE NX = 251 cMensa := STR(NX,3,0)+" Rejeição: UF/Município destinatário não pertence a SUFRAMA" CASE NX = 252 cMensa := STR(NX,3,0)+" Rejeição: Ambiente informado diverge do Ambiente de recebimento" CASE NX = 253 cMensa := STR(NX,3,0)+" Rejeição: Digito Verificador da chave de acesso composta inválida" CASE NX = 254 cMensa := STR(NX,3,0)+" Rejeição: NF-e referenciada não informada para NF-e complementar" CASE NX = 255 cMensa := STR(NX,3,0)+" Rejeição: Informada mais de uma NF-e referenciada para NF-e complementar" CASE NX = 256 cMensa := STR(NX,3,0)+" Rejeição: Uma NF-e da faixa já está inutilizada na Base de dados da SEFAZ" CASE NX = 257 cMensa := STR(NX,3,0)+" Rejeição: Solicitante não habilitado para emissão da NF-e" CASE NX = 258 cMensa := STR(NX,3,0)+" Rejeição: CNPJ da consulta inválido" CASE NX = 259 cMensa := STR(NX,3,0)+" Rejeição: CNPJ da consulta não cadastrado como contribuinte na UF" CASE NX = 260 cMensa := STR(NX,3,0)+" Rejeição: IE da consulta inválida" CASE NX = 261 cMensa := STR(NX,3,0)+" Rejeição: IE da consulta não cadastrada como contribuinte na UF" CASE NX = 262 cMensa := STR(NX,3,0)+" Rejeição: UF não fornece consulta por CPF" CASE NX = 263 cMensa := STR(NX,3,0)+" Rejeição: CPF da consulta inválido" CASE NX = 264 cMensa := STR(NX,3,0)+" Rejeição: CPF da consulta não cadastrado como contribuinte na UF" CASE NX = 265 cMensa := STR(NX,3,0)+" Rejeição: Sigla da UF da consulta difere da UF do Web Service" CASE NX = 266 cMensa := STR(NX,3,0)+" Rejeição: Série utilizada não permitida no Web Service" CASE NX = 267 cMensa := STR(NX,3,0)+" Rejeição: NF Complementar referencia uma NF-e inexistente" CASE NX = 268 cMensa := STR(NX,3,0)+" Rejeição: NF Complementar referencia uma outra NF-e Complementar" CASE NX = 269 cMensa := STR(NX,3,0)+" Rejeição: CNPJ Emitente da NF Complementar difere do CNPJ da NF Referenciada" CASE NX = 270 cMensa := STR(NX,3,0)+" Rejeição: Código Município do Fato Gerador de ICMS inexistente Código IBGE" CASE NX = 271 cMensa := STR(NX,3,0)+" Rejeição: Código Município do Fato Gerador: difere da UF do emitente" CASE NX = 272 cMensa := STR(NX,3,0)+" Rejeição: Código Município do Emitente inválido/inexistente" CASE NX = 273 cMensa := STR(NX,3,0)+" Rejeição: Código Município do Emitente: difere da UF do emitente" CASE NX = 274 cMensa := STR(NX,3,0)+" Rejeição: Código Município do Destinatário inválido/inexistente" CASE NX = 275 cMensa := STR(NX,3,0)+" Rejeição: Código Município do Destinatário: difere da UF do Destinatário" CASE NX = 276 cMensa := STR(NX,3,0)+" Rejeição: Código Município do Local de Retirada inexistente Local da Retirada" CASE NX = 277 cMensa := STR(NX,3,0)+" Rejeição: Código Município do Local de Retirada: difere da UF do Local de Retirada" CASE NX = 278 cMensa := STR(NX,3,0)+" Rejeição: Código Município do Local de Entrega inexistente Local da Entrega" CASE NX = 279 cMensa := STR(NX,3,0)+" Rejeição: Código Município do Local de Entrega: difere da UF do Local de Entrega" CASE NX = 280 cMensa := STR(NX,3,0)+" Rejeição: Certificado Transmissor inválido" CASE NX = 281 cMensa := STR(NX,3,0)+" Rejeição: Certificado Transmissor Data Validade Esta Vencida?" CASE NX = 282 cMensa := STR(NX,3,0)+" Rejeição: Certificado Transmissor sem CNPJ" CASE NX = 283 cMensa := STR(NX,3,0)+" Rejeição: Certificado Transmissor - Erro Cadeia de Certificação" CASE NX = 284 cMensa := STR(NX,3,0)+" Rejeição: Certificado Transmissor revogado" CASE NX = 285 cMensa := STR(NX,3,0)+" Rejeição: Certificado Transmissor difere ICP-Brasil" CASE NX = 286 cMensa := STR(NX,3,0)+" Rejeição: Certificado Transmissor erro no acesso a LCR" CASE NX = 287 cMensa := STR(NX,3,0)+" Rejeição: Código Município do Fato Gerador de ISSQN inexistente [nItem:nnn] ISSQN" CASE NX = 288 cMensa := STR(NX,3,0)+" Rejeição: Código do Município do Fato Gerador do Transporte inexistente" CASE NX = 289 cMensa := STR(NX,3,0)+" Rejeição: Código da UF informada diverge da UF solicitada" CASE NX = 290 cMensa := STR(NX,3,0)+" Rejeição: Certificado Assinatura inválido" CASE NX = 291 cMensa := STR(NX,3,0)+" Rejeição: Certificado Assinatura Data Validade Esta Vencida?" CASE NX = 292 cMensa := STR(NX,3,0)+" Rejeição: Certificado Assinatura sem CNPJ" CASE NX = 293 cMensa := STR(NX,3,0)+" Rejeição: Certificado Assinatura - erro Cadeia de Certificação" CASE NX = 294 cMensa := STR(NX,3,0)+" Rejeição: Certificado Assinatura revogado" CASE NX = 295 cMensa := STR(NX,3,0)+" Rejeição: Certificado Assinatura difere ICP-Brasil" CASE NX = 296 cMensa := STR(NX,3,0)+" Rejeição: Certificado Assinatura erro no acesso a LCR" CASE NX = 297 cMensa := STR(NX,3,0)+" Rejeição: Assinatura difere do calculado" CASE NX = 298 cMensa := STR(NX,3,0)+" Rejeição: Assinatura difere do padrão do Projeto" CASE NX = 299 cMensa := STR(NX,3,0)+" Rejeição: XML da área de cabeçalho com codificação diferente de UTF-8" CASE NX = 301 cMensa := STR(NX,3,0)+" Uso Denegado : Irregularidade fiscal do emitente - Emitente e a sua Empresa(Voce)." CASE NX = 302 cMensa := STR(NX,3,0)+" Uso Denegado : Irregularidade fiscal do destinatário - I.E. Suspensa - I.E. Cancelada - I.E. Baixada - I.E. Em Processo de Baixa." CASE NX = 303 cMensa := STR(NX,3,0)+" Uso Denegado : Destinatário não habilitado a operar na UF - I.E. Suspensa - I.E. Cancelada - I.E. Baixada - I.E. Em Processo de Baixa." CASE NX = 304 cMensa := STR(NX,3,0)+" Rejeição: Pedido de Cancelamento para NF-e com evento da Suframa" CASE NX = 305 cMensa := STR(NX,3,0)+" Rejeição: Destinatário bloqueado na UF" CASE NX = 306 cMensa := STR(NX,3,0)+" Rejeição: IE do destinatário não está ativa na UF" CASE NX = 315 cMensa := STR(NX,3,0)+" Rejeição: Data de Emissão anterior ao início da autorização de Nota Fiscal na UF" CASE NX = 316 cMensa := STR(NX,3,0)+" Rejeição: Nota Fiscal referenciada com a mesma Chave de Acesso da Nota Fiscal atual" CASE NX = 317 cMensa := STR(NX,3,0)+" Rejeição: NF modelo 1 referenciada com data de emissão inválida" CASE NX = 318 cMensa := STR(NX,3,0)+" Rejeição: Contranota de Produtor sem Nota Fiscal referenciada" CASE NX = 319 cMensa := STR(NX,3,0)+" Rejeição: Contranota de Produtor referencia somente NF de entrada" CASE NX = 320 cMensa := STR(NX,3,0)+" Rejeição: Contranota de Produtor referencia somente NF de outro emitente" CASE NX = 321 cMensa := STR(NX,3,0)+" Rejeição: NF-e de devolução não possui conhecimento fiscal referenciado" CASE NX = 322 cMensa := STR(NX,3,0)+" Rejeição: NF de produtor referenciada com data de emissão inválida" CASE NX = 323 cMensa := STR(NX,3,0)+" Rejeição: CNPJ autorizado para download inválido" CASE NX = 324 cMensa := STR(NX,3,0)+" Rejeição: CNPJ do destinatário ja autorizado para download" CASE NX = 325 cMensa := STR(NX,3,0)+" Rejeição: CPF autorizado para download inválido" CASE NX = 326 cMensa := STR(NX,3,0)+" Rejeição: CPF do destinatário autorizado para download" CASE NX = 327 cMensa := STR(NX,3,0)+" Rejeição: CFOP inválido para Nota Fiscal com finalidade de devolução de mercadoria [nItem:nnn] Validação de Produtos e Serviços" CASE NX = 328 cMensa := STR(NX,3,0)+" Rejeição: CFOP inválido para NF-e que não tem finalidade de devolução" CASE NX = 329 cMensa := STR(NX,3,0)+" Rejeição: Número da DI/DSI inválido" CASE NX = 330 cMensa := STR(NX,3,0)+" Rejeição: Informar o valor da AFRMM na importação por via marítima" CASE NX = 331 cMensa := STR(NX,3,0)+" Rejeição: Informar o CNPJ do adquirente ou do encomendante nesta forma de importação" CASE NX = 332 cMensa := STR(NX,3,0)+" Rejeição: CNPJ do adquirente ou do encomendante da importação inválido" CASE NX = 333 cMensa := STR(NX,3,0)+" Rejeição: Informar a UF do adquirente ou do encomendante nesta forma de importação" CASE NX = 334 cMensa := STR(NX,3,0)+" Rejeição: Número do processo de drawback não informado na importação" CASE NX = 335 cMensa := STR(NX,3,0)+" Rejeição: Número do processo de drawback na importação inválido" CASE NX = 336 cMensa := STR(NX,3,0)+" Rejeição: Informado o grupo de exportação no item para CFOP que não é de exportação Grupo de Exportação" CASE NX = 337 cMensa := STR(NX,3,0)+" Rejeição: Não informado o grupo de exportação no item" CASE NX = 338 cMensa := STR(NX,3,0)+" Rejeição: Número de processo de drawback não informado na exportação" CASE NX = 339 cMensa := STR(NX,3,0)+" Rejeição: Número de processo de drawback na exportação inválido" CASE NX = 340 cMensa := STR(NX,3,0)+" Rejeição: Não informado o grupo de exportação indireta no item" CASE NX = 341 cMensa := STR(NX,3,0)+" Rejeição: Número do registro de exportação inválido" CASE NX = 342 cMensa := STR(NX,3,0)+" Rejeição: Chave de acesso informada na exportação indireta com DV inválido" CASE NX = 343 cMensa := STR(NX,3,0)+" Rejeição: Modelo da NF-e informada na exportação indireta diferente de 55" CASE NX = 344 cMensa := STR(NX,3,0)+" Rejeição: Duplicidade de NF-e informada na exportação indireta (chave acesso informada mais de uma vez)" CASE NX = 345 cMensa := STR(NX,3,0)+" Rejeição: Chave de acesso informada na exportação indireta não consta como NF-e referenciada" CASE NX = 346 cMensa := STR(NX,3,0)+" Rejeição: Somatório quantidades informadas na exportação indireta não corresponde total do item" CASE NX = 347 cMensa := STR(NX,3,0)+" Rejeição: Informada IE do substituto tributário em operação com Exterior" CASE NX = 349 cMensa := STR(NX,3,0)+" Rejeição: Número RECOPI não informado" CASE NX = 350 cMensa := STR(NX,3,0)+" Rejeição: Número RECOPI inválido" CASE NX = 351 cMensa := STR(NX,3,0)+" Rejeição: Valor do ICMS da operação no ICMS-ST=51 difere do produto BC e alíquota" CASE NX = 352 cMensa := STR(NX,3,0)+" Rejeição: Valor do ICMS diferido no CST=51 difere do produto Valor ICMS operação e ICMS diferido" CASE NX = 353 cMensa := STR(NX,3,0)+" Rejeição: Valor do ICMS no CST=51 não corresponde a diferença do ICMS operação e ICMS diferido" CASE NX = 354 cMensa := STR(NX,3,0)+" Rejeição: Informado grupo de devoluçãode tributos para NF-e e que não tem finalidade de devolução" CASE NX = 355 cMensa := STR(NX,3,0)+" Rejeição: Informar o local de saída do país no caso de exportação" CASE NX = 356 cMensa := STR(NX,3,0)+" Rejeição: Informar o clocal de saída do pís somente no caso de exportação" CASE NX = 357 cMensa := STR(NX,3,0)+" Rejeição: Chave de acesso do grupo de exportação indireta inexistente" CASE NX = 358 cMensa := STR(NX,3,0)+" Rejeição: Chave de acesso no grupo de exportação indireta cancelada ou denegada" CASE NX = 359 cMensa := STR(NX,3,0)+" Rejeição: NF-e de venda a Órgão público sem informar a Nota de Empenho" CASE NX = 360 cMensa := STR(NX,3,0)+" Rejeição: NF-e com Nota de Empenho inválida para UF" CASE NX = 361 cMensa := STR(NX,3,0)+" Rejeição: NF-e com Nota de Empenho inexistente na UF" CASE NX = 362 cMensa := STR(NX,3,0)+" Rejeição: Venda de combustível sem informação do Transportador Transporte da Nota Fiscal" CASE NX = 363 cMensa := STR(NX,3,0)+" Rejeição: IE do substituto tributário idêntica à IE do emitente ou do destinatário" CASE NX = 364 cMensa := STR(NX,3,0)+" Rejeição: Total do valor da dedução do ISS difere do somatório dos itens" CASE NX = 365 cMensa := STR(NX,3,0)+" Rejeição: Total de outras retenções difere do somatório dos itens" CASE NX = 366 cMensa := STR(NX,3,0)+" Rejeição: Total do desconto incondicionado do ISS difere do somatório dos itens" CASE NX = 367 cMensa := STR(NX,3,0)+" Rejeição: Total do desconto condicionado do ISS difere do somatório dos itens" CASE NX = 368 cMensa := STR(NX,3,0)+" Rejeição: Total do ISS retido difere do somatório dos itens" CASE NX = 369 cMensa := STR(NX,3,0)+" Rejeição: Não informado o grupo avulsa na emissão pelo Fisco" CASE NX = 370 cMensa := STR(NX,3,0)+" Rejeição: Nota Fiscal Avulsa com tipo de emissão inválido" CASE NX = 372 cMensa := STR(NX,3,0)+" Rejeição: Destinatário com identificação de estrangeiro com caracteres inválidos" CASE NX = 375 cMensa := STR(NX,3,0)+" Rejeição: NF-e com CFOP 5929 (Lançamento relativo a Cupom Fiscal) referencia uma NFC-e [nItem:nnn]" CASE NX = 376 cMensa := STR(NX,3,0)+" Rejeição: Data do Desembaraço Aduaneiro inválida [nItem:nnn] Declaração de Importação" CASE NX = 379 cMensa := STR(NX,3,0)+" Rejeição: Grupo de Encerrante na NF-e (modelo 55) para CFOP diferente de venda de combustível para consumidor final [nItem:nnn] Combustível" CASE NX = 380 cMensa := STR(NX,3,0)+" Rejeição: Valor do Encerrante final não é superior ao Encerrante inicial [nItem:nnn]" CASE NX = 387 cMensa := STR(NX,3,0)+" Rejeição: Código de Enquadramento Legal do IPI inválido [nItem:nnn] IPI" CASE NX = 388 cMensa := STR(NX,3,0)+" Rejeição: Código de Situação Tributária do IPI incompatível com o Código de Enquadramento Legal do IPI [nItem:nnn]" CASE NX = 389 cMensa := STR(NX,3,0)+" Rejeição: Código Município ISSQN inexistente[nItem:nnn]" CASE NX = 393 cMensa := STR(NX,3,0)+" Rejeição: NF-e com o grupo de Informações Suplementares Informações Suplementares da Nota Fiscal" CASE NX = 401 cMensa := STR(NX,3,0)+" Rejeição: CPF do remetente inválido" CASE NX = 402 cMensa := STR(NX,3,0)+" Rejeição: XML da área de dados com codificação diferente de UTF-8" CASE NX = 403 cMensa := STR(NX,3,0)+" Rejeição: O grupo de informações da NF-e avulsa é de uso exclusivo do Fisco" CASE NX = 404 cMensa := STR(NX,3,0)+" Rejeição: Uso de prefixo de namespace não permitido" CASE NX = 405 cMensa := STR(NX,3,0)+" Rejeição: Código do país do emitente: dígito inválido" CASE NX = 406 cMensa := STR(NX,3,0)+" Rejeição: Código do país do destinatário: dígito inválido" CASE NX = 407 cMensa := STR(NX,3,0)+" Rejeição: O CPF só pode ser informado no campo emitente para a NF-e avulsa Identificação do Emitente" CASE NX = 409 cMensa := STR(NX,3,0)+" Rejeição: Campo cUF inexistente no elemento nfeCabecMsg do SOAP Header" CASE NX = 410 cMensa := STR(NX,3,0)+" Rejeição: UF informada no campo cUF não é atendida pelo Web Service" CASE NX = 411 cMensa := STR(NX,3,0)+" Rejeição: Campo versaoDados inexistente no elemento nfeCabecMsg do SOAP Header" CASE NX = 417 cMensa := STR(NX,3,0)+" Rejeição: Total do ICMS superior ao valor limite estabelecido" CASE NX = 418 cMensa := STR(NX,3,0)+" Rejeição: Total do ICMS-ST superior ao limite estabelecido" CASE NX = 420 cMensa := STR(NX,3,0)+" Rejeição: Cancelamento para NF-e já cancelada" CASE NX = 450 cMensa := STR(NX,3,0)+" Rejeição: Modelo da NF-e diferente de 55" CASE NX = 451 cMensa := STR(NX,3,0)+" Rejeição: Processo de emissão informado inválido" CASE NX = 452 cMensa := STR(NX,3,0)+" Rejeição: Tipo Autorizador do Recibo diverge do Órgão Autorizador" CASE NX = 453 cMensa := STR(NX,3,0)+" Ano de Inutilizacao nao pode ser superior ao Ano Atual" CASE NX = 454 cMensa := STR(NX,3,0)+" Ano de Inutilizacao nao pode ser inferior a 2006" CASE NX = 461 cMensa := STR(NX,3,0)+" Rejeição: Informado percentual de gás natural na mistura para produto diferente de GLP" CASE NX = 465 cMensa := STR(NX,3,0)+" Rejeição: Número de controle da FCI inexistente" CASE NX = 478 cMensa := STR(NX,3,0)+" Local da entrega nao informado para faturamento direto de veiculos novos" CASE NX = 479 cMensa := STR(NX,3,0)+" Rejeição: Data de Emissão anterior a data de credenciamento ou anterior a Data de Abertura do estabelecimento Cadastro da SEFAZ situação irregular perante o fisco" CASE NX = 480 cMensa := STR(NX,3,0)+" Rejeição: Código Município do Emitente diverge do cadastrado na UF" CASE NX = 481 cMensa := STR(NX,3,0)+" Rejeição: Código Regime Tributário(CRT) do emitente diverge do cadastro na SEFAZ. Os códigos de regime tributário são: 1 = Simples Nacional; 3 = Regime Normal." CASE NX = 482 cMensa := STR(NX,3,0)+" Rejeição: Código do Município do Destinatário diverge do cadastrado na UF" CASE NX = 483 cMensa := STR(NX,3,0)+" Rejeição: Valor do desconto maior que valor do produto [nItem:nnn]" CASE NX = 484 cMensa := STR(NX,3,0)+" Rejeição: DPEC com tipo de emissão diferente de '4'(posição 35 da Chave de Acesso)" CASE NX = 485 cMensa := STR(NX,3,0)+" Rejeição: Número DPEC já existe no cadastro de DPEC" CASE NX = 486 cMensa := STR(NX,3,0)+" Rejeição: Não informado o Grupo de Autorização para UF que exige a identificação do Escritório de Contabilidade na Nota Fiscal" CASE NX = 487 cMensa := STR(NX,3,0)+" Rejeição: Escritório de Contabilidade não cadastrado na SEFAZ" CASE NX = 488 cMensa := STR(NX,3,0)+" Rejeição: Vendas do Emitente incompatíveis com o Porte da Empresa Acompanhamento do Contribuinte" CASE NX = 489 cMensa := STR(NX,3,0)+" Rejeição: CNPJ informado inválido (DV ou zeros)" CASE NX = 490 cMensa := STR(NX,3,0)+" Rejeição: CPF informado inválido (DV ou zeros)" CASE NX = 491 cMensa := STR(NX,3,0)+" Rejeição: O tpEvento informado inválido" CASE NX = 492 cMensa := STR(NX,3,0)+" Rejeição: O verEvento informado inválido" CASE NX = 493 cMensa := STR(NX,3,0)+" Rejeição: Evento não atende o Schema XML específico" CASE NX = 494 cMensa := STR(NX,3,0)+" Rejeição: Chave de Acesso inexistente para o TPEVENTO" CASE NX = 501 cMensa := STR(NX,3,0)+" Rejeição: Verificar NFe autorizada há mais de 30 dias (720) horas" CASE NX = 502 cMensa := STR(NX,3,0)+" Rejeição: Erro na Chave de Acesso - Campo Id não corresponde à concatenação dos campos correspondentes" CASE NX = 503 cMensa := STR(NX,3,0)+" Rejeição: Série utilizada fora da faixa permitida no SCAN (900-999)" CASE NX = 504 cMensa := STR(NX,3,0)+" Rejeição: Data de Entrada/Saída posterior ao permitido ou Data: Saida/Entrada Vazia? Digite as Datas Corretas e Veja a Hora?" CASE NX = 505 cMensa := STR(NX,3,0)+" Rejeição: Data de Entrada/Saída anterior ao permitido ou Data: Saida/Entrada Vazia? Digite as Datas Corretas e Veja a Hora?" CASE NX = 506 cMensa := STR(NX,3,0)+" Rejeição: Data de Saída menor que a Data de Emissão ou Data: Saida/Entrada Vazia? Digite as Datas Corretas e Veja a Hora?" CASE NX = 507 cMensa := STR(NX,3,0)+" Rejeição: CNPJ destinatário/remetente ñ deve ser inform. em operação c/ exterior" CASE NX = 508 cMensa := STR(NX,3,0)+" Rejeição: CST incompatível na operação com Não Contribuinte [nItem:999]" CASE NX = 509 cMensa := STR(NX,3,0)+" Rejeição: Inform. cód.município diferente de '9999999' para operação c/ exterior" CASE NX = 510 cMensa := STR(NX,3,0)+" Rejeição: Oper.c/ Exterior e Cód.País destinatário é 1058(Brasil) ou ñ informado" CASE NX = 511 cMensa := STR(NX,3,0)+" Rejeição: Não é Operação com Exterior e Código do País destinatário difere de 1058 (Brasil)" CASE NX = 512 cMensa := STR(NX,3,0)+" Rejeição: CNPJ do Local de retirada inválido" CASE NX = 513 cMensa := STR(NX,3,0)+" Rejeição: Código Município Local Retirada deve ser 9999999 para UF retirada = EX" CASE NX = 514 cMensa := STR(NX,3,0)+" Rejeição: CNPJ do Local de Entrega inválido" CASE NX = 515 cMensa := STR(NX,3,0)+" Rejeição: Código Munic. do Local de Entrega deve ser 9999999 p/ UF entrega=EX" CASE NX = 516 cMensa := STR(NX,3,0)+" Rejeição: Falha no schema XML - inexiste a tag raiz esperada para a mensagem" CASE NX = 517 cMensa := STR(NX,3,0)+" Rejeição: Falha no schema XML - inexiste atributo versao na tag raiz da mensagem" CASE NX = 518 cMensa := STR(NX,3,0)+" Rejeição: CFOP de entrada para NF-e de saída" CASE NX = 519 cMensa := STR(NX,3,0)+" Rejeição: CFOP de saída para NF-e de entrada" CASE NX = 520 cMensa := STR(NX,3,0)+" Rejeição: CFOP de Operação com Exterior e UF destinatário difere de EX" CASE NX = 521 cMensa := STR(NX,3,0)+" Rejeição: CFOP não é de Operação com Exterior e UF destinatário é EX" CASE NX = 522 cMensa := STR(NX,3,0)+" Rejeição: CFOP de operação estadual e UF emitente <> da UF remetente contribuinte ICMS" CASE NX = 523 cMensa := STR(NX,3,0)+" Rejeição: CFOP não é de Operação Estadual e UF emitente igual a UF destinatário" CASE NX = 524 cMensa := STR(NX,3,0)+" Rejeição: CFOP de Operação com Exterior e não informado NCM" CASE NX = 525 cMensa := STR(NX,3,0)+" Rejeição: CFOP de Importação e não informado dados da DI" CASE NX = 526 cMensa := STR(NX,3,0)+" Ano-Mês da Chave de Acesso com atraso superior a 6 meses em relação ao Ano-Mês atual - Verifique as Datas de Entrada/Saida" CASE NX = 527 cMensa := STR(NX,3,0)+" Rejeição: Operação de Exportação com informação de ICMS incompatível" CASE NX = 528 cMensa := STR(NX,3,0)+" Rejeição: Valor do ICMS difere do produto BC e Alíquota" CASE NX = 529 cMensa := STR(NX,3,0)+" Rejeição: CST incompatível na operação com Contribuinte Isento de Inscrição Estadual [nItem:999]" CASE NX = 530 cMensa := STR(NX,3,0)+" Rejeição: Operação com tributação de ISSQN sem informar a Inscrição Municipal" CASE NX = 531 cMensa := STR(NX,3,0)+" Rejeição: Total da BC ICMS difere do somatório dos itens" CASE NX = 532 cMensa := STR(NX,3,0)+" Rejeição: Total do ICMS difere do somatório dos itens" CASE NX = 533 cMensa := STR(NX,3,0)+" Rejeição: Total da BC ICMS-ST difere do somatório dos itens" CASE NX = 534 cMensa := STR(NX,3,0)+" Rejeição: Total do ICMS-ST difere do somatório dos itens" CASE NX = 535 cMensa := STR(NX,3,0)+" Rejeição: Total do Frete difere do somatório dos itens" CASE NX = 536 cMensa := STR(NX,3,0)+" Rejeição: Total do Seguro difere do somatório dos itens" CASE NX = 537 cMensa := STR(NX,3,0)+" Rejeição: Total do Desconto difere do somatório dos itens" CASE NX = 538 cMensa := STR(NX,3,0)+" Rejeição: Total do IPI difere do somatório dos itens" CASE NX = 539 cMensa := STR(NX,3,0)+" Rejeição: Duplicidade de NF-e, com diferença na Chave de Acesso" CASE NX = 540 cMensa := STR(NX,3,0)+" Rejeição: CPF do Local de Retirada inválido" CASE NX = 541 cMensa := STR(NX,3,0)+" Rejeição: CPF do Local de Entrega inválido" CASE NX = 542 cMensa := STR(NX,3,0)+" Rejeição: CNPJ do Transportador inválido" CASE NX = 543 cMensa := STR(NX,3,0)+" Rejeição: CPF do Transportador inválido" CASE NX = 544 cMensa := STR(NX,3,0)+" Rejeição: IE do Transportador inválida" CASE NX = 545 cMensa := STR(NX,3,0)+" Rejeição: Falha schema XML - versão inform.na Dados do SOAPHeader difere da msg" CASE NX = 546 cMensa := STR(NX,3,0)+" Rejeição: Erro na Chave de Acesso - Campo Id - falta a literal NFe" CASE NX = 547 cMensa := STR(NX,3,0)+" Rejeição: Dígito Verificador da Chave de Acesso da NF-e Referenciada inválido" CASE NX = 548 cMensa := STR(NX,3,0)+" Rejeição: CNPJ da NF referenciada inválido." CASE NX = 549 cMensa := STR(NX,3,0)+" Rejeição: CNPJ da NF referenciada de produtor inválido." CASE NX = 550 cMensa := STR(NX,3,0)+" Rejeição: CPF da NF referenciada de produtor inválido." CASE NX = 551 cMensa := STR(NX,3,0)+" Rejeição: IE da NF referenciada de produtor inválido." CASE NX = 552 cMensa := STR(NX,3,0)+" Rejeição: Dígito Verificador da Chave de Acesso do CT-e Referenciado inválido" CASE NX = 553 cMensa := STR(NX,3,0)+" Rejeição: Tipo autorizador do recibo diverge do Órgão Autorizador" CASE NX = 554 cMensa := STR(NX,3,0)+" Rejeição: Série difere da faixa 0-899" CASE NX = 555 cMensa := STR(NX,3,0)+" Rejeição: Tipo autorizador do protocolo diverge do Órgão Autorizador" CASE NX = 556 cMensa := STR(NX,3,0)+" Rejeição: Justific.de entrada em conting.não deve ser informada p/tp.emis.normal" CASE NX = 557 cMensa := STR(NX,3,0)+" Rejeição: A Justificativa de entrada em contingência deve ser informada" CASE NX = 558 cMensa := STR(NX,3,0)+" Rejeição: Data de entrada em contingência posterior a data de emissão ou Data: Saida/Entrada Vazia? Digite as Datas Corretas e Veja a Hora?" CASE NX = 559 cMensa := STR(NX,3,0)+" Rejeição: UF do Transportador não informada" CASE NX = 560 cMensa := STR(NX,3,0)+" Rejeição: CNPJ base do emitente <> CNPJ base da primeira NF-e do lote recebido" CASE NX = 561 cMensa := STR(NX,3,0)+" Rejeição: Mês de Emissão informado na Chave de Acesso difere do Mês de Emissão" CASE NX = 562 cMensa := STR(NX,3,0)+" Rejeição: código numérico informado na chave de acesso difere do código numérico da nf-e." CASE NX = 563 cMensa := STR(NX,3,0)+" Rejeição: Já existe pedido de Inutilização com a mesma faixa de inutilização" CASE NX = 564 cMensa := STR(NX,3,0)+" Rejeição: Total do Produto / Serviço difere do somatório dos itens. Envie o XML Para o Suporte no: contato@......com.br" CASE NX = 565 cMensa := STR(NX,3,0)+" Rejeição: Falha no schema XML - inexiste a tag raiz esperada para o lote de NF-e" CASE NX = 567 cMensa := STR(NX,3,0)+" Rejeição: Falha schema XML - versão inform.na Dados do SOAPHeader difere do lote" CASE NX = 568 cMensa := STR(NX,3,0)+" Rejeição: Falha schema XML inexiste atributo versão na tag raiz do lote de NF-e" CASE NX = 569 cMensa := STR(NX,3,0)+" Rejeição: Data de entrada em contingência muito atrasada ou Data: Saida/Entrada Vazia? Digite as Datas Corretas e Veja a Hora?" CASE NX = 570 cMensa := STR(NX,3,0)+" Rejeição: Tipo de emissão 3, 6 e 7 só é valido nas contingêncis SCAN/SVC/AN" CASE NX = 571 cMensa := STR(NX,3,0)+" Rejeição: O tpEmis informado diferente de 3 para contingência SCAN/SVC/AN" CASE NX = 572 cMensa := STR(NX,3,0)+" Rejeição: Erro Atributo ID do evento erro concatenação dos campos (“ID” + tpEvento + chNFe + nSeq)" CASE NX = 573 cMensa := STR(NX,3,0)+" Rejeição: Duplicidade de Evento" CASE NX = 574 cMensa := STR(NX,3,0)+" Rejeição: O autor do evento diverge do emissor da NF-e" CASE NX = 575 cMensa := STR(NX,3,0)+" Rejeição: O autor do evento diverge do destinatário da NF-e" CASE NX = 576 cMensa := STR(NX,3,0)+" Rejeição: O autor do evento não é um órgão autorizado a gerar o evento" CASE NX = 577 cMensa := STR(NX,3,0)+" Rejeição: A data do evento não pode ser menor que a data de emissão da NF-e" CASE NX = 578 cMensa := STR(NX,3,0)+" Rejeição: A data do evento não pode ser maior que a data do processamento" CASE NX = 579 cMensa := STR(NX,3,0)+" Rejeição: A data do evento não pode ser menor que a data de autorização para NF-e não emitida em contingência" CASE NX = 580 cMensa := STR(NX,3,0)+" Rejeição: O evento exige uma NF-e autorizada" CASE NX = 587 cMensa := STR(NX,3,0)+" Rejeição: Usar somente o namespace padrão da NF-e" CASE NX = 588 cMensa := STR(NX,3,0)+" Rejeição: Não é permitida a presença de caracteres de edição no início/fim da mensagem ou entre as tags da mensagem" CASE NX = 589 cMensa := STR(NX,3,0)+" Rejeição: Número do NSU informado superior ao maior NSU da base de dados da SEFAZ" CASE NX = 590 cMensa := STR(NX,3,0)+" Rejeição: Informado CST para emissor do Simples Nacional" CASE NX = 591 cMensa := STR(NX,3,0)+" Rejeição: Informado CSOSN para emissor que não é do Simples Nacional (CRT diferente de 1)" CASE NX = 592 cMensa := STR(NX,3,0)+" Rejeição: A NF-e deve ter pelo menos um item de produto sujeito ao ICMS" CASE NX = 593 cMensa := STR(NX,3,0)+" Rejeição: CNPJ-Base consultado difere do CNPJ-Base do Certificado Digital" CASE NX = 594 cMensa := STR(NX,3,0)+" Rejeição: O número de sequencia do evento informado é maior que o permitido" CASE NX = 595 cMensa := STR(NX,3,0)+" Rejeição: Rejeição: A versão do leiaute da NF-e utilizada não é mais válida" CASE NX = 596 cMensa := STR(NX,3,0)+" Rejeição: Rejeição: Ambiente de homologação indisponível para recepção de NF-e da versão 1.10." CASE NX = 597 cMensa := STR(NX,3,0)+" Rejeição: CFOP de Importação e não informado dados de IPI" CASE NX = 598 cMensa := STR(NX,3,0)+" Rejeição: NF-e emitida em ambiente de homologação com razão social <> de NF-e (Emitida homologação - S/vlr fiscal)" CASE NX = 599 cMensa := STR(NX,3,0)+" Rejeição: CFOP de Importação e não informado dados de II" CASE NX = 600 cMensa := STR(NX,3,0)+" Rejeição: CSOSN incompatível na operação com Não Contribuinte [nItem:999]" CASE NX = 601 cMensa := STR(NX,3,0)+" Rejeição: Total do II difere do somatório dos itens" CASE NX = 602 cMensa := STR(NX,3,0)+" Rejeição: Total do PIS difere do somatório dos itens sujeitos ao ICMS" CASE NX = 603 cMensa := STR(NX,3,0)+" Rejeição: Total do COFINS difere do somatório dos itens sujeitos ao ICMS" CASE NX = 604 cMensa := STR(NX,3,0)+" Rejeição: Total do vOutro difere do somatório dos itens" CASE NX = 605 cMensa := STR(NX,3,0)+" Rejeição: Total do vServ difere do somatório do vProd dos itens sujeitos ao ISSQN" CASE NX = 606 cMensa := STR(NX,3,0)+" Rejeição: Total do vBC do ISS difere do somatório dos itens" CASE NX = 607 cMensa := STR(NX,3,0)+" Rejeição: Total do ISS difere do somatório dos itens" CASE NX = 608 cMensa := STR(NX,3,0)+" Rejeição: Total do PIS difere do somatório dos itens sujeitos ao ISSQN" CASE NX = 609 cMensa := STR(NX,3,0)+" Rejeição: Total do COFINS difere do somatório dos itens sujeitos ao ISSQN" CASE NX = 610 cMensa := STR(NX,3,0)+" Rejeição: Total da NF difere do somatório dos Valores compõe o valor Total da NF" CASE NX = 611 cMensa := STR(NX,3,0)+" Rejeição: cEAN inválido" CASE NX = 612 cMensa := STR(NX,3,0)+" Rejeição: cEANTrib inválido" CASE NX = 613 cMensa := STR(NX,3,0)+" Rejeição: Chave de Acesso difere da existente em BD" CASE NX = 614 cMensa := STR(NX,3,0)+" Rejeição: Chave de Acesso inválida (Código UF inválido)" CASE NX = 615 cMensa := STR(NX,3,0)+" Rejeição: Chave de Acesso inválida (Ano < 05 ou Ano maior que Ano corrente)" CASE NX = 616 cMensa := STR(NX,3,0)+" Rejeição: Chave de Acesso inválida (Mês < 1 ou Mês > 12)" CASE NX = 617 cMensa := STR(NX,3,0)+" Rejeição: Chave de Acesso inválida (CNPJ zerado ou dígito inválido)" CASE NX = 618 cMensa := STR(NX,3,0)+" Rejeição: Chave de Acesso inválida (modelo diferente de 55 e 65 )" CASE NX = 619 cMensa := STR(NX,3,0)+" Rejeição: Chave de Acesso inválida (número NF = 0)" CASE NX = 620 cMensa := STR(NX,3,0)+" Rejeição: Chave de Acesso difere da existente em BD" CASE NX = 621 cMensa := STR(NX,3,0)+" Rejeição: CPF Emitente não cadastrado" CASE NX = 622 cMensa := STR(NX,3,0)+" Rejeição: IE emitente não vinculada ao CPF" CASE NX = 623 cMensa := STR(NX,3,0)+" Rejeição: CPF Destinatário não cadastrado" CASE NX = 624 cMensa := STR(NX,3,0)+" Rejeição: IE Destinatário não vinculada ao CPF" CASE NX = 625 cMensa := STR(NX,3,0)+" Rejeição: Inscrição SUFRAMA deve ser informada na venda com isenção para ZFM" CASE NX = 626 cMensa := STR(NX,3,0)+" Rejeição: O CFOP de operação isenta para ZFM diferente do previsto" CASE NX = 627 cMensa := STR(NX,3,0)+" Rejeição: O valor do ICMS desonerado deve ser informado" CASE NX = 628 cMensa := STR(NX,3,0)+" Rejeição: Total da NF superior ao valor limite estabelecido pela SEFAZ [Limite]" CASE NX = 629 cMensa := STR(NX,3,0)+" Rejeição: Vlr Produto difere do produto Valor Unitário de Comercialização e quantidade comercial" CASE NX = 630 cMensa := STR(NX,3,0)+" Rejeição: Vlr Produto difere do produto Valor Unitário de Tributação e quantidade tributável" CASE NX = 631 cMensa := STR(NX,3,0)+" Rejeição: CNPJ-Base do Destinatário difere do CNPJ-Base do Certificado Digital" CASE NX = 632 cMensa := STR(NX,3,0)+" Rejeição: Solicitação fora de prazo, a NF-e não está mais disponível para download" CASE NX = 633 cMensa := STR(NX,3,0)+" Rejeição: NF-e indisponível para download devido a ausência de Manifestação do Destinatário" CASE NX = 634 cMensa := STR(NX,3,0)+" Rejeição: Destinatário da NF-e não tem o mesmo CNPJ raiz do solicitante do download" CASE NX = 635 cMensa := STR(NX,3,0)+" Rejeição: NF-e com mesmo número e série já transmitida e aguardando processamento" CASE NX = 650 cMensa := STR(NX,3,0)+" Rejeição: Evento de 'Ciência da Operação' para NF-e Cancelada ou Denegada" CASE NX = 651 cMensa := STR(NX,3,0)+" Rejeição: Evento de 'Desconhecimento da Operação' para NF-e Cancelada ou Denegada" CASE NX = 653 cMensa := STR(NX,3,0)+" Rejeição: NF-e Cancelada, arquivo indisponível para download" CASE NX = 654 cMensa := STR(NX,3,0)+" Rejeição: NF-e Denegada, arquivo indisponível para download" CASE NX = 655 cMensa := STR(NX,3,0)+" Rejeição: Evento de Ciência da Operação informado após a manifestação final do destinatário" CASE NX = 656 cMensa := STR(NX,3,0)+" Rejeição: Consumo indevido do Web Service. Recomenda-se aguardar pelo menos 1 hora para a nova consulta." CONSUMO_INDEVIDO_ERRO_656() // ESTA EM: DBMANUT2.PRG Mudei em: 05/12/2016 Joao CASE NX = 657 cMensa := STR(NX,3,0)+" Rejeição: Código do Órgão diverge do órgão autorizador" CASE NX = 658 cMensa := STR(NX,3,0)+" Rejeição: UF do destinatário da Chave de Acesso diverge da UF autorizadora" CASE NX = 660 cMensa := STR(NX,3,0)+" Rejeição: CFOP de Combustível e não informado grupo de combustível [nItem:nnn] Combustível" CASE NX = 661 cMensa := STR(NX,3,0)+" Rejeição: NF-e já existente para o número da DPEC informada" CASE NX = 662 cMensa := STR(NX,3,0)+" Rejeição: Numeração da DPEC está inutilizada na Base de Dados da SEFAZ" CASE NX = 663 cMensa := STR(NX,3,0)+" Rejeição: Alíquota do ICMS maior que 4% de saida interestadual com produtos importados" CASE NX = 678 cMensa := STR(NX,3,0)+" Rejeição: NF referenciada com UF diferente da UF da NF-e complementar" CASE NX = 679 cMensa := STR(NX,3,0)+" Rejeição: Modelo da NF-e referenciada inválido diferente de 55 - Verifique a Chave Digitada. Modelo Permitido: 55/65" CASE NX = 680 cMensa := STR(NX,3,0)+" Rejeição: Duplicidade de NF-e referenciada (chave de acesso ref mais de uma vez)" CASE NX = 681 cMensa := STR(NX,3,0)+" Rejeição: Duplicidade de NF Modelo 1 referenciada (CNPJ, Modelo Série e Número)" CASE NX = 682 cMensa := STR(NX,3,0)+" Rejeição: Duplicidade de NF de produtor referenciada (IE, Modelo, Série e Número)" CASE NX = 683 cMensa := STR(NX,3,0)+" Rejeição: Modelo do CT-e referenciado diferente de 57" CASE NX = 684 cMensa := STR(NX,3,0)+" Rejeição: Duplicidade de Cupom Fiscal referenciado (Modelo, Número e Ordem e COO)" CASE NX = 685 cMensa := STR(NX,3,0)+" Rejeição: Total do valor aproximado dos tributos difere do somatório dos itens" CASE NX = 686 cMensa := STR(NX,3,0)+" Rejeição: NF complementar referencia uma NF-e cancelada" CASE NX = 687 cMensa := STR(NX,3,0)+" Rejeição: NF complementar referencia uma NF-e denegada" CASE NX = 688 cMensa := STR(NX,3,0)+" Rejeição: NF referenciada de produtor com IE inexistente (nREF: xxx)" CASE NX = 689 cMensa := STR(NX,3,0)+" Rejeição: NF referenciada de produtor com IE não vinculada ao CNPJ/CPF informado (nREF: xxx)" CASE NX = 690 cMensa := STR(NX,3,0)+" Rejeição: Pedido de cancelamento para NF-e com CT-e ou MDF-e" CASE NX = 693 cMensa := STR(NX,3,0)+" Rejeição: Alíquota de ICMS superior a definida para a operação interestadual [nItem:999]" CASE NX = 694 cMensa := STR(NX,3,0)+" Rejeição: Não informado o grupo de ICMS para a UF de destino. Use o CFOP: 6107 ou 6108 Digite: 'NAO CONTRIBUINTE' NA INSCRIÇÃO ESTADUAL. " CASE NX = 695 cMensa := STR(NX,3,0)+" Rejeição: Informado indevidamente o grupo de ICMS para a UF de destino [nItem: ] -> RETIRE A PALAVRA 'ISENTO' DA INSCRIÇÃO ESTADUAL DO CLIENTE." CASE NX = 696 cMensa := STR(NX,3,0)+" Rejeição: Alíquota interna na UF de destino inferior ao percentual do Fundo de Combate à Pobreza naquela UF [nItem:999] ICMS para UF de Destino" CASE NX = 697 cMensa := STR(NX,3,0)+" Rejeição: Alíquota interestadual do ICMS com origem diferente do previsto [nItem:999]" CASE NX = 698 cMensa := STR(NX,3,0)+" Rejeição: Alíquota interestadual do ICMS incompatível com as UF envolvidas na operação [nItem:999]" CASE NX = 699 cMensa := STR(NX,3,0)+" Rejeição: Percentual do ICMS Interestadual para a UF de destino difere do previsto para o ano da Data de Emissão [nItem:999]" /* A rejeição 699 – “Percentual do ICMS Interestadual para a UF de destino difere do previsto para o ano da Data de Emissão” faz parte das validações da Nota Técnica (NT) 2015/003 com entrada em vigor em 01/01/2016. A partir desta data, serão geradas no XML da nota as tags referentes ao ICMS interestadual nas operações de venda para consumidor final não contribuinte de ICMS, atendendo ao disposto na Emenda Constitucional (EC) 87 de 2015. Para resolver a rejeição, será necessário verificar no XML da nota qual informação está sendo gerada na tag pICMSInterpart do grupo abaixo: [code] <ICMSUFDest> <vBCUFDest>1000.00</vBCUFDest> <pFCPUFDest>0.0000</pFCPUFDest> <pICMSUFDest>18.0000</pICMSUFDest> <pICMSInter>12.00</pICMSInter> <pICMSInterPart>40.0000</pICMSInterPart> <vFCPUFDest>00.00</vFCPUFDest> <vICMSUFDest>24.00</vICMSUFDest> <vICMSUFRemet>36.00</vICMSUFRemet> </ICMSUFDest>
O percentual informado nesta tag se refere ao percentual definido pelo governo para o estado de destino de acordo com a distribuição abaixo, onde cada ano o percentual vai mudando:http://i.imgur.com/ghBBGPL.jpg
*/// cRejeicao699 := ( "http://i.imgur.com/ghBBGPL.jpg" )
// ShellExecute(GetActiveWindow(),"open",'"'+cRejeicao699+'"' )
CASE NX = 701
cMensa := STR(NX,3,0)+" Rejeição: NF-e não pode utilizar verão 3.00 Nota Fiscal sem Nota Fiscal referenciada"
CASE NX = 703
cMensa := STR(NX,3,0)+" Rejeição: Data-hora de emissão posterior ao " + ;
"horário de recebimento ou Data: " + ;
"Saida/Entrada Vazia? Digite as Datas Corretas "+ ;
"e Veja a Hora. Sincronize o Relogio do Windows "+;
"Maquina do Faturamento e no Servidor de Arquivos"
CASE NX = 710
cMensa := STR(NX,3,0)+" Rejeição: NF-e com formato de DANFE inválido"
CASE NX = 711
cMensa := STR(NX,3,0)+" Rejeição: NF-e com contingência off-line"
CASE NX = 719
cMensa := STR(NX,3,0)+" Rejeição: NF-e sem identificação do destinatário"
CASE NX = 720
cMensa := STR(NX,3,0)+" Rejeição: Na operação com exterior deve ser informada tag id Estrangeiro Campos esperados: CNPJ, CPF, idEstrangeiro Veja com seu Contador"
CASE NX = 721
cMensa := STR(NX,3,0)+" Rejeição: Operação interestadual deve informar CNPJ ou CPF"
CASE NX = 722
cMensa := STR(NX,3,0)+" Rejeição: Operação interna com idEstrangeiro informado deve ser presencial"
CASE NX = 723
cMensa := STR(NX,3,0)+" Rejeição: Operação interna com idEstrangeiro informado deve ser para consumidor final"
CASE NX = 724
cMensa := STR(NX,3,0)+" Rejeição: NF-e sem o nome do destinatário"
CASE NX = 726
cMensa := STR(NX,3,0)+" Rejeição: NF-e sem a informação de endereço do destinatário"
CASE NX = 727
cMensa := STR(NX,3,0)+" Rejeição: Operação com exterior e UF diferente de EX"
CASE NX = 728
cMensa := STR(NX,3,0)+" Rejeição: NF-e sem informação da IE do destinatário"
CASE NX = 731
cMensa := STR(NX,3,0)+" Rejeição: CFOP de operação com exterior e idDest <> 3"
CASE NX = 732
cMensa := STR(NX,3,0)+" Rejeição: CFOP de operação com interestadual e idDest <> 2"
CASE NX = 733
cMensa := STR(NX,3,0)+" Rejeição: CFOP de operação interna e idDest <> 1"
CASE NX = 745
cMensa := STR(NX,3,0)+" Rejeição: NF-e sem grupo do PIS"
CASE NX = 748
cMensa := STR(NX,3,0)+" Rejeição: NF-e sem grupo do COFINS"
CASE NX = 749
cMensa := STR(NX,3,0)+" Rejeição: NF-e sem grupo do COFINS-ST"
CASE NX = 761
cMensa := STR(NX,3,0)+" Rejeição: Código de Produto ANP inexistente"
CASE NX = 764
cMensa := STR(NX,3,0)+" Rejeição: Solicitada resposta síncrona para Lote com mais de uma NF-e (indSinc=1)"
CASE NX = 765
cMensa := STR(NX,3,0)+" Rejeição: Lote só poderá conter NF-e ou NFC-e"
CASE NX = 768
cMensa := STR(NX,3,0)+" Rejeição: NF-e não deve possuir o grupo de formas de pagamento"
CASE NX = 770
cMensa := STR(NX,3,0)+" Rejeição: CFOP Inexistente [nItem:nnn] Verifique a CFOP na Composicao"
CASE NX = 771
cMensa := STR(NX,3,0)+" Rejeição: Operação interestadual e UF de destino com EX"
CASE NX = 772
cMensa := STR(NX,3,0)+" Rejeição: Operação Interestadual e UF de destino igual a UF de origem"
CASE NX = 773
cMensa := STR(NX,3,0)+" Rejeição: Operação Interestadual e UF de destino igual a UF de origem"
CASE NX = 777
cMensa := STR(NX,3,0)+" Rejeicao: Obrigatoria a informacao do NCM completo - Essa rejeição ocorre quando o NCM informado no item da NFe está incompleto. Tem que ter 8 Digitos."
CASE NX = 778
cMensa := STR(NX,3,0)+" Rejeição: Informado NCM inexistente [nItem:nnn] Validação de Produtos e Serviços"
CASE NX = 790
cMensa := STR(NX,3,0)+" Rejeição: Operação com exterior para destinatário contribuinte do ICMS"
CASE NX = 791
cMensa := STR(NX,3,0)+" Rejeição: NF-e com indicação de destinatário isento de IE, com a informação da IE do destinatario"
CASE NX = 792
cMensa := STR(NX,3,0)+" Rejeição: Informada a IE do destinatário para operação com destinatário do exterior"
CASE NX = 793
cMensa := STR(NX,3,0)+" Rejeição: Valor do ICMS relativo ao Fundo de Combate à Pobreza na UF de destino difere do calculado [nItem:999]"
CASE NX = 798
cMensa := STR(NX,3,0)+" Rejeição: Valor total do ICMS relativo Fundo de Combate à Pobreza (FCP) da UF de destino difere do somatório do valor dos itens"
CASE NX = 799
cMensa := STR(NX,3,0)+" Rejeição: Valor total do ICMS Interestadual da UF de destino difere do somatório dos itens"
CASE NX = 800
cMensa := STR(NX,3,0)+" Rejeição: Valor total do ICMS Interestadual da UF do remetente difere do somatório dos itens"
CASE NX = 801
cMensa := STR(NX,3,0)+" Rejeição: Valor do ICMS Interestadual para UF de Destino difere do calculado [nItem:999] (Valor Informado: XXX, Valor Calculado:XXX)"
CASE NX = 802
cMensa := STR(NX,3,0)+" Rejeição: Valor do ICMS Interestadual para UF do Remetente difere do calculado [nItem:999] (Valor Informado: XXX, Valor Calculado:XXX)"
CASE NX = 805
cMensa := STR(NX,3,0)+" Rejeiçao: A SEFAZ do destinatário não permite Contribuinte Isento de Inscrição Estadual. Escreva: NAO CONTRIBUINTE na Inscrição Estadual - ICMS"
CASE NX = 806
cMensa := STR(NX,3,0)+" Rejeição: Operação com ICMS-ST sem informação do CEST"
CASE NX = 807
cMensa := STR(NX,3,0)+" Rejeição: NFC-e com grupo de ICMS para a UF do destinatário"
CASE NX = 812
cMensa := STR(NX,3,0)+" Rejeição: Regime Tributário SN, com excesso de sublimite não é permitido para Emitentes desta UF"
CASE NX = 814
cMensa := STR(NX,3,0)+" Rejeição: Nota Fiscal com grupo de comércio exterior"
CASE NX = 815
cMensa := STR(NX,3,0)+" Rejeição: Valor do ICMS Interestadual para UF de Destino difere do calculado [nItem:999] (Valor Informado: XXX, Valor Calculado:XXX)"
CASE NX = 816
cMensa := STR(NX,3,0)+" Rejeição: Valor do ICMS Interestadual para UF do Remetente difere do calculado [nItem:999] (Valor Informado: XXX, Valor Calculado:XXX)"
CASE NX = 817
cMensa := STR(NX,3,0)+" Rejeição: Unidade Tributável incompatível com o NCM informado na operação com Comércio Exterior [nItem:nnn]"
CASE NX = 851
cMensa := STR(NX,3,0)+" Rejeição: Soma do valor das parcelas difere do Valor Líquido da Fatura"
CASE NX = 852
cMensa := STR(NX,3,0)+" Rejeição: Número da parcela inválido ou não informado. Ex: Foi emitida uma NF-e com duas ou mais parcelas, porém não foram informados seus respectivos números."
CASE NX = 854
cMensa := STR(NX,3,0)+" Rejeição Unidade Tributável (tag: uTrib) incompatível com produto informado"
CASE NX = 855
cMensa := STR(NX,3,0)+" Rejeição: Somatório percentuais de GLP derivado do petróleo, GLGNn e GLGNi diferente de 100"
CASE NX = 856
cMensa := STR(NX,3,0)+" Rejeição: Campo valor de partida não preenchido para produto GLP"
CASE NX = 858
cMensa := STR(NX,3,0)+" Rejeição: Grupo de Tributação informado indevidamente [nItem: nnn]"
CASE NX = 859
cMensa := STR(NX,3,0)+" Rejeição: Total do FCP retido anteriormente por Substituição Tributária difere do somatório dos itens"
CASE NX = 860
cMensa := STR(NX,3,0)+" Rejeição: Valor do FCP informado difere de base de cálculo*alíquota [nItem: nnn]-Fundo de Combate a Pobreza"
CASE NX = 861
cMensa := STR(NX,3,0)+" Rejeição: Total do FCP difere do somatório dos itens Quando for emitida uma NF-e (modelo 55) e o total do FCP, calculado no grupo de totais da NF-e (Campo: total/ ICMSTot / vFCP - ID: W04b), for diferente do somatório do FCP dos itens (Campo: vFCP - ID: N17c) que fazem parte do cálculo."
CASE NX = 862
cMensa := STR(NX,3,0)+" Rejeição: Total do FCP ST difere do somatório dos itens"
CASE NX = 863
cMensa := STR(NX,3,0)+" Rejeição: Total do IPI devolvido difere do somatório dos itens"
CASE NX = 864
cMensa := STR(NX,3,0)+" Rejeição: NF-e com indicativo de Operação presencial, fora do estabelecimento e não informada NF-e referenciada"
CASE NX = 865
cMensa := STR(NX,3,0)+" Rejeição: Total dos pagamentos menor que o total da nota"
CASE NX = 866
cMensa := STR(NX,3,0)+" Rejeição: Ausência de troco quando o valor dos pagamentos informados for maior que o total da nota"
CASE NX = 868
cMensa := STR(NX,3,0)+" Rejeição: Grupos Veículo Transporte e Reboque não devem ser informados. Não informe a PLACA e a UF do veículo. Operação Interestadual"
CASE NX = 869
cMensa := STR(NX,3,0)+" Rejeição: Valor do troco incorreto"
CASE NX = 870
cMensa := STR(NX,3,0)+" Rejeição Data de validade incompatível com data de fabricação [nItem:nnn]"
CASE NX = 871
cMensa := STR(NX,3,0)+" Rejeição: O campo Meio de Pagamento deve ser preenchido com a opção Sem Pagamento"
CASE NX = 872
cMensa := STR(NX,3,0)+" Rejeição: A SEFAZ do destinatário não permite Contribuinte Isento de Inscrição Estadual em operações internas"
CASE NX = 873
cMensa := STR(NX,3,0)+" Rejeição: Operação com medicamentos e não informado os campos de rastreabilidade [nItem:nnn]"
CASE NX = 874
cMensa := STR(NX,3,0)+" Rejeição: Percentual de FCP inválido [nItem: nnn]"
CASE NX = 875
cMensa := STR(NX,3,0)+" Rejeição: Percentual de FCPST inválido [nItem: nnn]-Fundo de Combate a Pobreza"
CASE NX = 876
cMensa := STR(NX,3,0)+" Rejeição: Operação interestadual para Consumidor Final e valor do FCP informado em campo diferente de vFCPUFDest (id:NA13) [nItem:nnn]"
CASE NX = 877
cMensa := STR(NX,3,0)+" Rejeição: Data de fabricação maior que a data de processamento [nItem:nnn]"
CASE NX = 879
cMensa := STR(NX,3,0)+" Rejeição: Informado item “Produzido em Escala NÃO Relevante” e não informado CNPJ do Fabricante [nItem:nnn]"
CASE NX = 880
cMensa := STR(NX,3,0)+" Rejeição: Percentual de FCP igual a zero [nItem: nnn]"
CASE NX = 881
cMensa := STR(NX,3,0)+" Rejeição: Percentual de FCP ST igual a zero [nItem: nnn]"
CASE NX = 882
cMensa := STR(NX,3,0)+" Rejeição: GTIN (cEAN) com prefixo inválido [nItem:999]"
CASE NX = 883
cMensa := STR(NX,3,0)+" Rejeição: GTIN (cEAN) sem informação [nItem:999]"
CASE NX = 884
cMensa := STR(NX,3,0)+" Rejeição: GTIN da unidade tributável (cEANTrib) com prefixo inválido [nItem:999]"
CASE NX = 885
cMensa := STR(NX,3,0)+" Rejeição: GTIN informado, mas não informado o GTIN da unidade tributável [nItem:999]"
CASE NX = 886
cMensa := STR(NX,3,0)+" Rejeição: GTIN da unidade tributável informado, mas não informado o GTIN [nItem:999]"
CASE NX = 887
cMensa := STR(NX,3,0)+" Rejeição: Informado GTIN de agrupamento de produtos homogêneos (GTIN-14) no GTIN da unidade tributável [nItem:999]"
CASE NX = 888
cMensa := STR(NX,3,0)+" Rejeição: GTIN da unidade tributável (cEANTrib) sem informação [nItem:999]"
CASE NX = 889
cMensa := STR(NX,3,0)+" Rejeição: Obrigatória a informação do GTIN para o produto [nItem:999] - Informe o Código de Barras do Produto. Obrigatório."
CASE NX = 890
cMensa := STR(NX,3,0)+" Rejeição: GTIN inexistente no Cadastro Centralizado de GTIN (CCG) [nItem:999]"
CASE NX = 891
cMensa := STR(NX,3,0)+" Rejeição: GTIN incompatível com a NCM [nItem:999; NCM esperada: 99999999]"
CASE NX = 892
cMensa := STR(NX,3,0)+" Rejeição: GTIN incompatível com CEST [nItem:999; CEST esperado: 9999999]"
CASE NX = 893
cMensa := STR(NX,3,0)+" Rejeição: GTIN da unidade tributável diverge do GTIN Contido cadastrado no CCG [nItem:999; GTIN Contido esperado: 99999999999999]"
CASE NX = 894
cMensa := STR(NX,3,0)+" Rejeição: GTIN da unidade tributável inexistente no Cadastro Centralizado de GTIN (CCG) [nItem:999]"
CASE NX = 895
cMensa := STR(NX,3,0)+" Rejeição: GTIN da unidade tributável incompatível com a NCM [nItem:999; NCM esperada: 99999999]"
CASE NX = 896
cMensa := STR(NX,3,0)+" Rejeição: GTIN da unidade tributável incompatível com CEST [nItem:999; CEST esperado: 9999999]"
CASE NX = 897
cMensa := STR(NX,3,0)+" Rejeição: Valor Fatura maior que Valor Total da NF-e"
CASE NX = 898
cMensa := STR(NX,3,0)+" Rejeição: Data de vencimento da parcela não informada ou menor que Data de Autorização Ex: Foi emitida uma NF-e com uma parcela de duplicata e a data de vencimento (2018-05-16) foi informada com a data menor que a autorização do documento (2018-06-05)."
CASE NX = 899
cMensa := STR(NX,3,0)+" Rejeição: Informado incorretamente o campo meio de pagamento"
CASE NX = 900
cMensa := STR(NX,3,0)+" Rejeição: Data de vencimento da parcela não informada ou menor que Data de Emissão Foi emitida uma NF-e com uma parcela de duplicata e a data de vencimento (2018-05-16) foi informada com a data menor que a data de emissão do documento (2018-06-05)."
CASE NX = 901
cMensa := STR(NX,3,0)+" Rejeição: Valor do Desconto da Fatura maior que o Valor Original da Fatura. Ex: Foi emitida uma NF-e com o seguinte Valor do Desconto da Fatura: R$ 368.00, e no Valor Original foi informado um valor de R$ 367.84."
CASE NX = 902
cMensa := STR(NX,3,0)+" Rejeição: Valor Liquido da Fatura difere do Valor Original menos o Valor do Desconto. Ex: Foi emitida uma NF-e com o Valor Líquido da Fatura de R$ 2.281.52 e no Valor Original da Fatura foi informado um valor de R$ 1.983.93."
CASE NX = 905
cMensa := STR(NX,3,0)+" Rejeição: Campos do grupo Fatura não informados Foi emitida uma NF-e com 2 parcelas de duplicatas, cada uma com o valor de R$ 183.92. Porém não foram preenchido os campos referente aos dados da fatura."
CASE NX = 922
cMensa := STR(NX,3,0)+" Rejeição: Contranota de Produtor só pode referenciar NF-e ou NF de Produtor Modelo 4"
CASE NX = 923
cMensa := STR(NX,3,0)+" Rejeição: Referenciado documento de operação interna em operação interestadual ou com o exterior"
CASE NX = 924
cMensa := STR(NX,3,0)+" Rejeição: Informado Cupom Fiscal referenciado."
CASE NX = 925
cMensa := STR(NX,3,0)+" Rejeição: NF-e com identificação de estrangeiro e inscrição estadual informada para destinatário"
CASE NX = 926
cMensa := STR(NX,3,0)+" Rejeição: Operação com Exterior e país de destino igual a Brasil."
CASE NX = 927
cMensa := STR(NX,3,0)+" Rejeição: Número do item fora da ordem sequencial."
CASE NX = 928
cMensa := STR(NX,3,0)+" Rejeição: Informado código de benefício fiscal para CST sem benefício fiscal [nItem: nnn]"
CASE NX = 929
cMensa := STR(NX,3,0)+" Rejeição: Informado CST de diferimento sem as informações de diferimento [nItem: nnn]"
CASE NX = 930
cMensa := STR(NX,3,0)+" Rejeição: CST com benefício fiscal e não informado o código de benefício fiscal [nItem: nnn]"
CASE NX = 931
cMensa := STR(NX,3,0)+" Rejeição: CST não corresponde ao tipo de código de benefício fiscal [nItem: nnn]"
CASE NX = 932
cMensa := STR(NX,3,0)+" Rejeição: Informada modalidade de determinação da BC da ST como MVA e não informado o campo pMVAST [nItem: nnn]"
CASE NX = 933
cMensa := STR(NX,3,0)+" Rejeição: Informada modalidade de determinação da BC da ST diferente de MVA e informado o campo pMVAST [nItem: nnn]"
CASE NX = 934
cMensa := STR(NX,3,0)+" Rejeição: Não informado valor do ICMS desonerado ou o Motivo de desoneração [nItem: nnn]"
CASE NX = 935
cMensa := STR(NX,3,0)+" Rejeição: Valor total da Base de Cálculo superior ao valor limite estabelecido [Valor Limite: R$ XXX.XXX,XX] (valor definido pela UF)"
CASE NX = 936
cMensa := STR(NX,3,0)+" Rejeição: Razão Social do emitente diverge do informado no cadastro da SEFAZ."
CASE NX = 970
cMensa := STR(NX,3,0)+" Rejeição: Código de País inexistente [local de retirada/entrega]"
CASE NX = 971
cMensa := STR(NX,3,0)+" Rejeição: IE inválida [local de retirada/entrega]"
CASE NX = 972
cMensa := STR(NX,3,0)+" Rejeição: Obrigatória as informações do responsável técnico"
CASE NX = 973
cMensa := STR(NX,3,0)+" Rejeição: CNPJ do responsável técnico inválido"
CASE NX = 974
cMensa := STR(NX,3,0)+" Rejeição: CNPJ do responsável técnico diverge do cadastrado"
CASE NX = 975
cMensa := STR(NX,3,0)+" Rejeição: Obrigatória a informação do identificador do CSRT e do Hash do CSRT"
CASE NX = 976
cMensa := STR(NX,3,0)+" Rejeição: Identificador do CSRT não cadastrado na SEFAZ"
CASE NX = 977
cMensa := STR(NX,3,0)+" Rejeição: Identificador do CSRT Revogado"
CASE NX = 978
cMensa := STR(NX,3,0)+" Rejeição: Hash do CSRT Diverge do Calculado"
CASE NX = 999
cMensa := STR(NX,3,0)+" Rejeição: Erro Não Catalogado(Verificar STATUS do WEB SITE da SEFAZ)"+CRLF+;
"no Botão: <Sefaz> Lado Esquerdo da Tela Principal da NF-e"
CASE NX = 5001
cMensa := STR(NX,3,0)+" Documento Impresso em contingência."
CASE NX = 5002
cMensa := STR(NX,3,0)+" Aviso: Falha na conexão: [MENSAGEM DE ERRO DO WINDOWS] (Causa provável: a cadeia de certificação do Web Service acessado ou do certificado cliente inexistente no repositório de certificados do usuário corrente do Windows)"
CASE NX = 5003
cMensa := STR(NX,3,0)+" Falha de comunicação com módulo central."
CASE NX = 5004
cMensa := STR(NX,3,0)+" Aviso: Falha na conexão: [MENSAGEM DE ERRO DO WINDOWS] (Causa provável: método não permitido)"
CASE NX = 5005
cMensa := STR(NX,3,0)+" Falha de comunicação com a SEFAZ em decorrência de problemas na SEFAZ."
CASE NX = 5006
cMensa := STR(NX,3,0)+" Aviso: Falha na conexão: [MENSAGEM DE ERRO DO WINDOWS] (Causa provável: Time-Out, o WS não respondeu a solicitação no tempo estabelecido: [{1:0}])"
CASE NX = 5007
cMensa := STR(NX,3,0)+" Aviso: Falha na conexão: [MENSAGEM DE ERRO DO WINDOWS] (Causa provável: mensagem maior que a permitida)"
CASE NX = 5008
cMensa := STR(NX,3,0)+" Aviso: Falha na conexão: [MENSAGEM DE ERRO DO WINDOWS] (Causa provável: Servidor com problemas)"
CASE NX = 5009
cMensa := STR(NX,3,0)+" Aviso: Falha na conexão: [MENSAGEM DE ERRO DO WINDOWS] (Causa provável: Serviço não implementado)"
CASE NX = 5010
cMensa := STR(NX,3,0)+" O tempo limite de processamento da SEFAZ foi excedido."
CASE NX = 5011
cMensa := STR(NX,3,0)+" Rejeição: o lote foi rejeitado pela SEFAZ."
CASE NX = 5012
cMensa := STR(NX,3,0)+" Rejeição: O ID do lote presente no nome do arquivo não corresponde ao informado no seu conteúdo."
CASE NX = 5013
cMensa := STR(NX,3,0)+" Falha de comunicação: mensagem inválida ou corrompida."
CASE NX = 5014
cMensa := STR(NX,3,0)+" Rejeição: falha na conversão do arquivo."
CASE NX = 5015
cMensa := STR(NX,3,0)+" Aviso: Falha na conexão: Tempo limite de time-out alcançado [TEMPO DE TIME OUT UTILIZADO ms] [MENSAGEM DE ERRO DO WINDOWS]"
CASE NX = 5016
cMensa := STR(NX,3,0)+" Aviso: Falha na conexão: Falha da Biblioteca Criptografica: [MENSAGEM DE ERRO DO WINDOWS]"
CASE NX = 5017
cMensa := STR(NX,3,0)+" O usuário logado não tem acesso para esta filial."
CASE NX = 5018
cMensa := STR(NX,3,0)+" Rejeição: a nota não pode ser cancelada pois não está autorizada."
CASE NX = 5019
cMensa := STR(NX,3,0)+" Ocorreu uma falha ao aplicar a assinatura digital"
CASE NX = 5020
cMensa := STR(NX,3,0)+" Substituição não permitida"
CASE NX = 5050
cMensa := STR(NX,3,0)+" Certificado não encontrado para o CNPJ informado."
CASE NX = 5200
cMensa := STR(NX,3,0)+" Evento não reconhecido."
CASE NX = 5201
cMensa := STR(NX,3,0)+" Rejeição: numero máximo de inutilização ultrapassado."
CASE NX = 5207
cMensa := STR(NX,3,0)+" Rejeição: CNPJ do emitente invalido."
CASE NX = 5214
cMensa := STR(NX,3,0)+" Rejeição: o tamanho da mensagem excedeu o limite estabelecido."
CASE NX = 5215
cMensa := STR(NX,3,0)+" Rejeição: arquivo com conteúdo inválido"
CASE NX = 5216
cMensa := STR(NX,3,0)+" Rejeição: chave de acesso difere da cadastrada"
CASE NX = 5224
cMensa := STR(NX,3,0)+" Rejeição: faixa inicial maior que final"
CASE NX = 5240
cMensa := STR(NX,3,0)+" Rejeição: NF-e para o qual se deseja registrar o evento não está presente na base"
CASE NX = 5241
cMensa := STR(NX,3,0)+" Rejeição: numero faixa utilizado"
CASE NX = 5242
cMensa := STR(NX,3,0)+" Rejeição: NF-e não encontrada na base de dados do PLENO."
CASE NX = 5252
cMensa := STR(NX,3,0)+" Rejeição: ambiente diverge do ambiente da NF-e"
CASE NX = 5256
cMensa := STR(NX,3,0)+" Rejeição: NF-e inutilizada faixa"
CASE NX = 5307
cMensa := STR(NX,3,0)+" O Aviso 5307 é uma falha do certificado digital, ele pode não ter sido corretamente instalado ou não esta disponível para uso se for um token ou smart card."
CASE NX = 5999
cMensa := STR(NX,3,0)+" Ocorreu um erro interno no sistema, reenvie a NF-e ou entre em contato com o Suporte Técnico"
CASE NX = 6301
cMensa := STR(NX,4,0)+" Aviso: A NF-e a ser enviada não deve estar assinada, pois a NF-e será assinada pela DLL"
CASE NX = 6302
cMensa := STR(NX,4,0)+" Aviso: XML da NF-e de entrada (NFe) mal formado: [mensagem de ERRO DO WINDOWS]"
CASE NX = 6303
cMensa := STR(NX,4,0)+" Aviso: tag tpAmb inexistente na NF-e de entrada (NFe) [mensagem de erro]"
CASE NX = 6304
cMensa := STR(NX,4,0)+" Aviso: tag infNFe inexistente na NF-e de entrada (NFe)"
CASE NX = 6305
cMensa := STR(NX,4,0)+" Aviso: Atributo Id não localizado na tag infNFe da NF-e, validação da licença de uso prejudicada [CONTEUDO]"
CASE NX = 6309
cMensa := STR(NX,4,0)+" Aviso: O CNPJ informado tem tamanho diferente de 14 - [valor informado] - tamanho = [TAMANHO]"
CASE NX = 6310
cMensa := STR(NX,4,0)+" Aviso: A licença informada tem tamanho diferente de 128 - [CONTEUDO] - tamanho = {TAMANHO], o uso da DLL em ambiente de produção requer a informação da licença de uso."
CASE NX = 6311
cMensa := STR(NX,4,0)+" Aviso: Funcionalidade: EnviaNFe não licenciada para o CNPJ: [valor informado] e licenca [TAMANHO]"
CASE NX = 6312
cMensa := STR(NX,4,0)+" Aviso: Atributo versão não localizado na tag infNFe da NF-e"
CASE NX = 6313
cMensa := STR(NX,4,0)+" Aviso: Versao inválida, diferente de 1.10 e 2.00 [valor informado]"
CASE NX = 6314
cMensa := STR(NX,4,0)+" Aviso: O conteúdo do atributo Id da tag infNFe é inválida"
CASE NX = 7001
cMensa := STR(NX,4,0)+" Aviso: A licença não foi informada"
CASE NX = 7002
cMensa := STR(NX,4,0)+" Aviso: A licença informada: [CONTEUDO] tem tamanho:[TAMANHO] diferente de 128"
CASE NX = 7003
cMensa := STR(NX,4,0)+" Aviso: A licença informada: [CONTEUDO] não pertence ao CNPJ:[TAMANHO]"
ENDCASERETURN( cMensa )
FUNCTION REJEICAO_215() // 02/09/2014 - Magda(MG)
LOCAL cRejeicao215
MsgInfo( ( "215 - Rejeição: Falha no schema XML da NFe " )+CRLF+ ;
( "(CC-e/Cancelamento/Manifestação do Destinatário)" )+CRLF+ ;
( "O erro de código 215 geralmente ocorre, pois, o " )+CRLF+ ;
( "Schema XML só aceita os fuso horário brasileiros" )+CRLF+ ;
( "(-02:00, -03:00 e -04:00). " )+CRLF+ ;
( "Exemplo: " )+CRLF+ ;
( "<dhEvento>2011-07-14T18:11:04+04:30</dhEvento> " )+CRLF+ ;
( "O usuário deve alterar o fuso horário para um " )+CRLF+ ;
( "fuso horário de UTC de localidade brasileira " )+CRLF+ ;
( "(-02:00, -03:00 e -04:00).: " )+CRLF+ ;
( "<dhEvento>2011-07-14T18:11:04-03:00</dhEvento> " )+CRLF+ ;
( " " )+CRLF+ ;
( "Solução: Sincronize o Relõgio do Windows. " )+CRLF+ ;
( "Na Tela Principal da NF-e, Tem um Relógio, " )+CRLF+ ;
( "<Click> Nele Para Fazer a Sincronia. " ), ;
( "215 - Rejeição: Falha no schema XML da NFe " ) )cRejeicao215 := ( "http://flexdocs.com.br/FAQ/viewtopic.php?p=440&sid=43481669be07c1c57d22e9d52520d6c4" )
ShellExecute(GetActiveWindow(),"open",'"'+cRejeicao215+'"' )
RETURN NIL
FUNCTION REJEICAO_695()
MsgStop( ( "695 - Rejeição: Informado indevidamente o grupo de ICMS " )+CRLF+;
( "para a UF de destino [nItem:X] " )+CRLF+;
( "Para Resolver Esta Rejeição: " )+CRLF+;
( "RETIRE A PALAVRA 'ISENTO' DA INSCRIÇÃO ESTADUAL DO CLIENTE." )+CRLF+;
( "TECLE <ENTER> PARA CONTINUAR... " ), ;
( "695 - Rejeição: Informado indevidamente o grupo de ICMS... " ) )RETURN NIL
FUNCTION REJEICAO_679()
MsgStop( ( "Rejeição 679: Modelo de DF-e referenciado inválido. " )+CRLF+ ;
( "Verifique a Chave de Acesso Digitada. " )+CRLF+ ;
( "Modelo da NF-e referenciada diferente de 55/65/59. " )+CRLF+ ;
( "Verifique a Chave Digitada. Modelo Permitido: 55/65/59." )+CRLF+ ;
( "Tecle <Enter> Para Continuar - Conserte a Chave... " )+CRLF+ ;
( "Rejeição 679: Modelo de DF-e referenciado inválido. " ) )RETURN NIL
//-> FIM DO PROGRAMA
[/code]Boa Kapi, inserida na minha rotina de NF mas ficou faltando a função...
CONSUMO_INDEVIDO_ERRO_656() // ESTA EM: DBMANUT2.PRG Mudei em: 05/12/2016 Joao
-
Curriculum não tenho muito não, mas sistema de automação completo e muitos outros tenho para este curriculum além de meu portifólio de empresas e meu brevê de monitor na fuça e linhas de código, beira a 10 milhões kkkkkkkkkkkkkkkkkk
-
9 horas atrás, emotta disse:
Ladnilson, vc levantou uma questão importante agora... "Somos poucos agora pois muitos migraram..." vc tem toda razão, se alguém aqui programa somente em (x)harbour (fivewin ou não) e desconhece qualquer coisa de programação em web (front ou back end) deveria correr atrás disso, mesmo o mod_harbour vai exibir conhecimentos totalmente novos, não é pegar a aplicação desktop, compilar e ter a aplicação web. São coisas totalmente novas.
(x)harbour/fivewin é uma excelente tecnologia, mas pra desktop, graças a eles não morremos com clipper no fim dos anos 90. Na web ainda vejo pouca coisa no mod_harbour e até agora não vi nenhum aplicativo em produção construído com ele. Se não tivesse migrado as aplicações da minha empresa pra web estaria perdendo muitas vendas de novos sistemas.
Então sugiro a quem ainda não está nessa área correr atrás. Tem as linguagens python e Ruby que são fáceis e tem vasto material na web, para o front end recomendo o react.js. Mas são apenas dicas.
abraços
Amigo agradecemos sua dica e vejo sua impolgação por outras linguagens mas acho que no atual modelo das suas empresas e atualizações no mundo que já esta além em décadas do patamar do desktop, existem muitas empresas e clientes que acho que na sua idade deve desconhecer que sistemas ainda rodam em clipper (sim acredite). Portanto por mais que o senhor sugira o "corra atrás", a necessidade de sistemas "redondos" mesmo em DOS, há uma grande confiança entre o operador e o sistema.
De antemão, não duvido que a mesclagem com outras inguagens seja inevitável ou até a sua substituição mas sabemos que nossos clientes estão satisfeitos com os sistemas que FUNCIONAM e uma dica que te poderia te dar, muitos na atual situação não fariam investimentos em algo que esta funcionando e não arriscariam fazer esta mudança em produção e entendo que o conhecimento e a necessidade de outras plataformas, é alavancar a empresa a um nível superior das necessidades atuais mas muita calma nessa hora, cada caso é cada caso e cada necessidade e acessibilidade depende muito de fatores e alguns deles, é a confiabilidade e também a segurança.Acho eu que seria este caso da oferta de emprego e certamente posso te dizer meu caro, esta linguagem me da ainda muitos dividendos e por mais que possamos fazer uma comparação, ainda é minha paixão e merecedora da minha grata vida como programador que como sou das antigas, comecei no dBAse III e com disquete de 8 polegadas para carregar o SO em nos computadores PC-500 kkkkkk
Abraços
-
18 horas atrás, infosys2 disse:
Boa tarde!
Algum colega aqui no formum precisando de trabalhar um amigo entrou em contato comigo hoje e esta precisando e um programado fivewin nao pode ser home office tem que ser na empresa horário comercial.
Irmão mas tem que dizer qual cidade, exigências e o que a empresa oferece.
Somos poucos agora pois muitos migraram e acredito que deve já ser um projeto com os fontes de um software em produção não é?Dependendo da cidade até eu posso ir pois minhas empresas em meu estado estão tranquilas com meus programas mas se for home, muito melhor ainda.
qualquer coisa....
ladinilson@hotmail.com -
Mota,
Não abusando da sua boa contribuição, sabes se eles tem algo parecido com esse do RaiDrive pois já montei TODAS minhas rotinas para usar assim tipo um HD. -
19 horas atrás, emotta disse:
Bom, se você quer gratuito é outra história...
Mas qualidade de serviço no S3 é fantástica, eu recomendo e o valor cobrado é muito baixo em comparação ao que entrega. Vale a pena.
Entendi meu caro, vou falar com os clientes interessados sobre a sua indicação já que com sua experiência, temos um embasamento melhor.
Obrigado -
Em 30/05/2021 at 21:34, emotta disse:
Se é pra subir imagens ou pdf vcs já cogitaram usar o S3 da Amazon?
Gratuito só12 meses e só 5gb apenas.
-
Em 11/05/2021 at 12:07, sistem disse:
funciona sim... cria uma conta gmail e compartilha essa senha com a outra unidade... (obs: o próprio Google Driver tem aplicativo para transformar seu GDrive em unidade no seu computador) testai pra vc ver
vc enviando: copy imagem.jpg w:\
ele recebendo: copy w:\imagem c:\
olhaiii que legal
Fiz as rotinas e funcionou legal meu caro
O único problema que não há um REFRESH (Atualizar) na pasta do drive criado e para atualizar os arquivos para que sejam upados, tenho que fazer um "atualizar" pelo windows no explorer.
Estava procurando algum comando que fizesse isso tanto no Five, via DOS ou API do windows, alguma dica pois procurei pra caramba!
-
4 horas atrás, sistem disse:
deu certo?
#include "FiveWin.ch" Function Main() CopyFile( "c:\img1.gif", "w:\img1.gif" ) //ex: copia para a pasta gdrive xbrowser directory( "w:\*.*" ) autosort return nil
Não testei meu amigo mas tenho certeza que poderia dar sim, o fato é que como vou instalar em cidades mais distantes precisaria de toda esta configuração e ter no local um TI bom para resolver quando desse algum problema.
Minha opção é de uma execução de dentro do próprio programa, apenas no servidor que terá um TI mais entendido, irá conferir a internet e conexão sendo a parte de envio e recebimento.Obrigado e farei logo mais um teste.
-
4 minutos atrás, sistem disse:
uma sugestão se não precisa de grandes volumes poderia usar o Google Drive(15GB) e usar o comando copy para copiar.
poderia usar o raidrive para criar unidades do seu email no windows explorer
Mas funcionaria bem em nuvens?
Ou seja ia mandar imagens para ele e em outra cidade o outro pc iria baixar?
Pensei até na área de trabalho remota que compartilha a unidade de hd mas não pensei em uma solução feita "nas coxas" mas se essa funcionar fica bem mais simples -
1 hora atrás, ADutheil disse:
Acho que eles passaram a aplicar as regras de limites porque meus sistemas pararam de funcionar tambem. Já mudei para https://byet.host/
Vou testar, mas seria bom um nacional e pelo que vi é bem barato alguns.
Testei o FTPCloud e o suporte é péssimo, falei que estava precisando uma ajuda e não estava gostando do suporte e isso falando que ia contratar, excluíram a minha conta, mau educados pra caramba e além desse tipo de serviço, também são ruins e quase todos preferem internacionais.
Por isso que as vezes falam mau dos brasileiros mesmo com razão. -
Em 08/05/2021 at 08:07, ADutheil disse:
Se Você procura um servidor free online tem o drivehq.com. É o que uso e nunca tive problema. Tem limites de armazenamento e trafego mas no meu caso serve perfeitamente.
Até consegui no começo estava enviando certo, mas parece que eles bloquearam e não funcionou mais com esta minha rotina...
LOCAL hInternet, hConnect cFtpSite := "ftp.drivehq.com" cFtpUserName := "usuario" cFtpPassword := "senha" cDestination := "Pasta\" IF vTipoFTP = "Enviar" aDataFile := DIRECTORY( fpathS+"*.JPG" ) nfatorFTP := 100/LEN( aDataFile ) nvalFTP := 0 IF LEN ( aDataFile ) > 0 hInternet = INTERNETOPEN( "Anystring",INTERNET_OPEN_TYPE_DIRECT, 0, 0, 0 ) hConnect = INTERNETCONNECT( hInternet, cFtpSite,INTERNET_INVALID_PORT_NUMBER, cFtpUserName, cFtpPassword,INTERNET_SERVICE_FTP, INTERNET_FLAG_PASSIVE, 0 ) IF hConnect > 0 FOR f := 1 TO LEN ( aDataFile ) IF ASCAN(aEnvioFTP,ALLTRIM(( aDataFile[f,1] ))) == 0 mpromptFTP := "Enviando "+ALLTRIM(( aDataFile[f,1] ))+"..." oSayF1:REFRESH() IF FTPPUTFILE( hConnect, fpathS+ALLTRIM(( aDataFile[f,1] )), cDestination+ALLTRIM(( aDataFile[f,1] )), 0, 0 ) AADD(aEnvioFTP,ALLTRIM(( aDataFile[f,1] ))) ENDIF ENDIF nvalFTP += nfatorFTP MetReOrganFTP:Set(nValFTP) NEXT ENDIF INTERNETCLOSEHANDLE( hConnect ) INTERNETCLOSEHANDLE( hInternet ) ENDIF nvalFTP := 0 mpromptFTP := "Aguardando envio..." MetReOrganFTP:SetPos(nvalFTP) oSayF1:REFRESH() MetReOrganFTP:REFRESH() vTotalFTP:=LEN(aEnvioFTP) gtotalftp:REFRESH() SYSREFRESH() ENDIF RETURN NIL
hConnect sempre esta voltando 0 (zero) agora
sabes o que seria isso?
-
2 horas atrás, ADutheil disse:
Se Você procura um servidor free online tem o drivehq.com. É o que uso e nunca tive problema. Tem limites de armazenamento e trafego mas no meu caso serve perfeitamente.
Beleza meu caro, vou testar.
Obrigado -
Boa tarde senhores,
Alguém indica o servidor FTP de suas preferências?
Estou a procura desse serviço atualmente.Obrigado
-
Bom dia,
Em 26/09/2018 at 12:18, Rogerio Figueira disse:Boa tarde.
Te passo dois exemplos, funcionando ok.// // File attributes // #define FILE_ATTRIBUTE_READONLY 1 #define FILE_ATTRIBUTE_HIDDEN 2 #define FILE_ATTRIBUTE_SYSTEM 4 #define FILE_ATTRIBUTE_DIRECTORY 16 #define FILE_ATTRIBUTE_ARCHIVE 32 #define FILE_ATTRIBUTE_NORMAL 128 #define FILE_ATTRIBUTE_TEMPORARY 256 // // access types for InternetOpen() // #define INTERNET_OPEN_TYPE_PRECONFIG 0 // use registry configuration #define INTERNET_OPEN_TYPE_DIRECT 1 // direct to net #define INTERNET_OPEN_TYPE_PROXY 3 // via named proxy #define INTERNET_OPEN_TYPE_PRECONFIG_WITH_NO_AUTOPROXY 4 // prevent using java/script/INS // // manifests // #define INTERNET_INVALID_PORT_NUMBER 0 // use the protocol-specific default #define INTERNET_DEFAULT_FTP_PORT 21 // default for FTP servers #define INTERNET_DEFAULT_GOPHER_PORT 70 // " " gopher " #define INTERNET_DEFAULT_HTTP_PORT 80 // " " HTTP " #define INTERNET_DEFAULT_HTTPS_PORT 443 // " " HTTPS " #define INTERNET_DEFAULT_SOCKS_PORT 1080 // default for SOCKS firewall servers. // // service types for InternetConnect() // #define INTERNET_SERVICE_FTP 1 #define INTERNET_SERVICE_GOPHER 2 #define INTERNET_SERVICE_HTTP 3 #define INTERNET_FLAG_PASSIVE 134217728 // // flags for FTP // #define INTERNET_FLAG_TRANSFER_ASCII 1 #define INTERNET_FLAG_TRANSFER_BINARY 2 //------------------------------------------------------------------- FUNCTION MandaFTP(host, usuario, senha, pasta, arquivo, dir, oquefazer, QuemChamou) LOCAL hInternet, hConnect Local afiles hInternet = INTERNETOPEN( "Anystring", INTERNET_OPEN_TYPE_DIRECT, 0, 0, 0 ) hConnect = INTERNETCONNECT( hInternet, host, INTERNET_INVALID_PORT_NUMBER, usuario, senha, INTERNET_SERVICE_FTP, INTERNET_FLAG_PASSIVE, 0 ) if oquefazer = "pega" if ! FTPGETFILE( hConnect, pasta+arquivo, arquivo, 0, FILE_ATTRIBUTE_ARCHIVE, 0, 0 ) msgStop("Erro ao receber arquivo "+pasta+arquivo,"Atenção!") else SumLog(arquivo, "Recebido por ","FTP ") end else if FTPPUTFILE( hConnect, dir+arquivo, pasta+arquivo, 0, 0 ) if QuemChamou = "WT5f0A" msginfo("Arquivo enviado.","Sucesso!") end // crio log da transacao SumLog(arquivo, "Enviado por ","FTP ") else msgalert("Falha no envio do arquivo"+CRLF+; "Verifique conexão com a internet e firewall.","Problemas.") SumLog(arquivo, "Falhou ao enviar ","FTP ") end end INTERNETCLOSEHANDLE( hConnect ) INTERNETCLOSEHANDLE( hInternet ) RETURN NIL //============================================================================================== FUNCTION MandaImg(host, usuario, senha, pasta, aJPG, dir, oquefazer, QuemChamou) LOCAL hInternet, hConnect local hFTPDir, aFiles := {} local oWin32FindData, cBuffer Local aonde, arquivo STRUCT oWin32FindData MEMBER nFileAttributes AS DWORD MEMBER nCreationTime AS STRING LEN 8 MEMBER nLastReadAccess AS STRING LEN 8 MEMBER nLastWriteAccess AS STRING LEN 8 MEMBER nSizeHight AS DWORD MEMBER nSizeLow AS DWORD MEMBER nReserved0 AS DWORD MEMBER nReserved1 AS DWORD MEMBER cFileName AS STRING LEN 260 MEMBER cAltName AS STRING LEN 14 ENDSTRUCT hInternet = INTERNETOPEN( "Anystring", INTERNET_OPEN_TYPE_DIRECT, 0, 0, 0 ) hConnect = INTERNETCONNECT( hInternet, host, INTERNET_INVALID_PORT_NUMBER, usuario, senha, INTERNET_SERVICE_FTP, INTERNET_FLAG_PASSIVE, 0 ) if oquefazer = "vesetem" cBuffer = oWin32FindData:cBuffer hFTPDir = FtpFindFirstFile( hConnect, "*.*", @cBuffer, 0, 0 ) oWin32FindData:cBuffer = cBuffer if ! Empty( oWin32FindData:cFileName ) aadd( aFiles, { oWin32FindData:cFileName,; oWin32FindData:nSizeLow } ) while InternetFindNextFile( hFTPDir, @cBuffer ) oWin32FindData:cBuffer = cBuffer aadd( aFiles, { oWin32FindData:cFileName,; oWin32FindData:nSizeLow } ) end endif if len(afiles)>0 for i=1 to len(aJPG) aonde := ascan(afiles,aJpg[i]) if aonde > 0 adel(aJPG,aonde) //fica na matriz somente o que vai ser enviado end next else msgAlert("Erro ao carregar Dir Remoto."+CRLF+"Conexão falhou."+CRLF+"Gere o relatório novamente.","Atenção:") end else aJPg := {} end if len(aJPG)>0 for i=1 to len(aJPG) arquivo := aJPG[i] if FTPPUTFILE( hConnect, dir+arquivo, pasta+arquivo, 0, 0 ) if QuemChamou = "WT5f0A" msginfo("Arquivo enviado.","Sucesso!") end // crio log da transacao SumLog(arquivo, "Enviado por ","FTP ") else msgalert("Falha no envio do arquivo"+CRLF+; "dir+arquivo: "+dir+arquivo + CRLF+; "pasta+arquivo: "+pasta+arquivo+CRLF+; "Verifique conexão com a internet e firewall.","Problemas.") SumLog(arquivo, "Falhou ao enviar ","FTP ") end next end INTERNETCLOSEHANDLE( hConnect ) INTERNETCLOSEHANDLE( hInternet ) RETURN NIL //================================================================================================ #pragma BEGINDUMP #include "windows.h" #include "wininet.h" #include "hbapi.h" HB_FUNC( INTERNETOPEN ) { hb_retnl( ( LONG ) InternetOpen( hb_parc( 1 ), hb_parnl( 2 ), hb_parc( 3 ), hb_parc( 4 ), hb_parnl( 5 ) ) ); } HB_FUNC( INTERNETCLOSEHANDLE ) { hb_retl( InternetCloseHandle( ( HINTERNET ) hb_parnl( 1 ) ) ); } HB_FUNC( INTERNETCONNECT ) { hb_retnl( ( LONG ) InternetConnect( ( HINTERNET ) hb_parnl( 1 ), hb_parc( 2 ), ( INTERNET_PORT ) hb_parnl( 3 ), hb_parc( 4 ), hb_parc( 5 ), hb_parnl( 6 ), hb_parnl( 7 ), hb_parnl( 8 ) ) ); } HB_FUNC( FTPGETFILE ) { hb_retl( FtpGetFile( ( HINTERNET ) hb_parnl( 1 ), hb_parc( 2 ), hb_parc( 3 ), hb_parl( 4 ), hb_parnl( 5 ), hb_parnl( 6 ), hb_parnl( 7 ) ) ); } HB_FUNC( FTPPUTFILE ) { hb_retl( FtpPutFile( ( HINTERNET ) hb_parnl( 1 ), hb_parc( 2 ), hb_parc( 3 ), hb_parnl( 4 ), hb_parnl( 5 ) ) ); } HB_FUNC( FTPDELETEFILE ) { hb_retl( FtpDeleteFile( ( HINTERNET ) hb_parnl( 1 ), hb_parc( 2 ) ) ); } HB_FUNC( FTPCREATEDIRECTORY ) { hb_retl( FtpCreateDirectory( ( HINTERNET ) hb_parnl( 1 ), hb_parc( 2 ) ) ); } HB_FUNC( FTPREMOVEDIRECTORY ) { hb_retl( FtpRemoveDirectory( ( HINTERNET ) hb_parnl( 1 ), hb_parc( 2 ) ) ); } HB_FUNC( FTPFINDFIRSTFILE ) { hb_retnl( ( LONG ) FtpFindFirstFile( ( HINTERNET ) hb_parnl( 1 ), hb_parc( 2 ), ( WIN32_FIND_DATA * ) hb_parc( 3 ), hb_parnl( 4 ), hb_parnl( 5 ) ) ); } HB_FUNC( INTERNETFINDNEXTFILE ) { hb_retl( InternetFindNextFile( ( HINTERNET ) hb_parnl( 1 ), hb_parc( 2 ) ) ); } #pragma ENDDUMP
Tens exemplos de envio e recebimento de imagens (JPG) meu caro?
Ladinilson Sousa -
Bom dia senhores,
Possuo um software de gerenciador de bingos e me vi na necessidade de obter um aplicativo de vendas das cartelas via aplicativo e devido a pandemia e a modernização, será inevitável oferecer este recursos aos clientes.
Se conhecerem alguém também em qualquer linguagem, por favor poderiam me repassar o contato.
No caso tenho pouco tempo para implantação então a preferência seria ja estar em produção e vamos dizer, "redondo".
Obrigado.
Ladinilson Sousa
FWH 13/xHarbour 2.1/Pelles -
Bom dia,
Como já foi sugerido aqui neste forum, sugiro usar o SQLRDD com pequenas alterações em seus fontes e aos poucos, mudando para os comandos nativos do SQL como eu fiz.
Nas novas versões já tem a conexão com o MariaDB que não estudei ainda, mas acredito que deve ser bem mais produtivo.
Boa Sorte! -
Uma pergunta meio ignorante, você usa o visual studio para fazer as telas?
É seguro deixar as telas em DLL?
Desculpe é que ainda não tinha visto isso aqui (falando eu) que só conhecia o antigo WorkShop e o Pelles.
-
4 horas atrás, giovanyvecchi disse:
Eu uso a tScan32 desde 2006, mais é a versão free. Não tem suporte para OCR e nem leitor de codigo de barras.
Precisei fazer uma rotina e uso esta zbarimg.exe no prompt de comando e para mim resolveu.
WaitRun("cmd.exe /c zbarimg.exe --raw "+Dir_Temp()+::cFileScan+" > Barcode.txt",0) lc_cCodeBarFile := Alltrim(SubStr(Hb_MemoRead("Barcode.txt"),1,24))
Meu amigo funcionou perfeitamente, obrigado!
SQLRDD
in Programação
Posted
Me contacta meu caro
ladinilson@hotmail.com