VASCON

PESSOAL: Criei uma variavel com 60 espaços. Na digitação somente esta permitindo 53 caracteres. Como resolver isso. ABS NILSON

jef2_tim Lá vai (veja abaixo) Já mudou de trimestre anterior para mês anterior NILSON PARTE DO CONVÊNIO ICMS 57/1995 Redação anterior dada à cláusula nona pelo Conv. ICMS 31/99, efeitos a partir de 02.08.99 a 31.12.02. Cláusula nona O contribuinte remeterá às Secretarias de Fazenda, Finanças ou Tributação das unidades da Federação destinatárias das mercadorias, até o dia quinze (15) do primeiro mês de cada trimestre civil, arquivo magnético, com registro fiscal, das operações interestaduais efetuadas no trimestre anterior. PARTE DA PORTARIA CAT 32/1996 Artigo 1º - A emissão por sistema eletrônico de processamento de dados dos documentos fiscais previstos no artigo 124 do Regulamento do ICMS - RICMS, aprovado pelo Decreto 45.490, de 30 de novembro de 2000, bem como a escrituração dos livros fiscais a seguir enumerados devem obedecer às disposições desta portaria (Convênio ICMS-57/95, cláusula primeira):(Redação dada ao "caput" do artigo 1º pelo inciso I do artigo 1º da Portaria CAT 92/02, de 30-12-2002, DOE 03-01-2003, Republicação em 23-01-2003, Retificação em 25-01-2003, efeitos a partir de 03/01/2003.) Artigo 10 - O contribuinte de que trata o artigo 1º remeterá às Secretarias de Fazenda, Finanças ou Tributação das unidades da Federação, até o dia 15 (quinze), arquivo magnético com registro fiscal das operações e prestações interestaduais efetuadas no mês anterior (Convênio ICMS-57/95, cláusula oitava, na redação do Convênio ICMS-69/02, cláusula primeira). (Redação dada ao artigo 10 pelo inciso III do artigo 1º da Portaria 62/2005 de 12-07-2005, DOE 13-07-2005, efeitos em relação a fatos geradores ocorridos a partir de 1º-01-2005) § 1º - Sempre que informada uma operação nos termos do "caput" e por qualquer motivo a mercadoria não for entregue ao destinatário, far-se-á a geração de um arquivo para esclarecer o fato, com o código de finalidade "5" (item 9.1.3 do Manual de Orientação), que será remetido juntamente com o arquivo relativo ao mês em que se verificar a ocorrência. § 2º - O arquivo remetido a cada unidade da Federação restringir-se-á às operações e prestações com contribuintes nela localizados. § 3º - O arquivo magnético deverá ser previamente consistido por meio de programa validador disponível no Posto Fiscal Eletrônico da Secretaria da Fazenda do Estado de São Paulo, no endereço http://pfe.fazenda.sp.gov.br, na página Informações>Sintegra>Download do Sintegra>Validador Nacional do Sintegra. § 4º - Não deverão constar do arquivo os Conhecimentos emitidos em função de redespacho ou subcontratação. PARTE DA PORTARIA 62/2005 "Artigo 10 - O contribuinte de que trata o artigo 1º remeterá às Secretarias de Fazenda, Finanças ou Tributação das unidades da Federação, até o dia 15 (quinze), arquivo magnético com registro fiscal das operações e prestações interestaduais efetuadas no mês anterior (Convênio ICMS-57/95, cláusula oitava, na redação do Convênio ICMS-69/02, cláusula primeira). § 1º - Sempre que informada uma operação nos termos do "caput" e por qualquer motivo a mercadoria não for entregue ao destinatário, far-se-á a geração de um arquivo para esclarecer o fato, com o código de finalidade "5" (item 9.1.3 do Manual de Orientação), que será remetido juntamente com o arquivo relativo ao mês em que se verificar a ocorrência. § 2º - O arquivo remetido a cada unidade da Federação restringir-se-á às operações e prestações com contribuintes nela localizados. § 3º - O arquivo magnético deverá ser previamente consistido por meio de programa validador disponível no Posto Fiscal Eletrônico da Secretaria da Fazenda do Estado de São Paulo, no endereço http://pfe.fazenda.sp.gov.br, na página Informações>Sintegra>Download do Sintegra>Validador Nacional do Sintegra. § 4º - Não deverão constar do arquivo os Conhecimentos emitidos em função de redespacho ou subcontratação. § 5º - As informações previstas neste artigo destinadas ao fisco paulista deverão ser enviadas por meio da internet, utilizando o programa TED (Transmissão Eletrônica de Dados), disponível no Posto Fiscal Eletrônico da Secretaria da Fazenda do Estado de São Paulo, no endereço http://pfe.fazenda.sp.gov.br, na página Informações>Sintegra>Download do Sintegra> Programa de Transmissão - TED. § 6º - O contribuinte notificado pela Secretaria da Fazenda a enviar mensalmente arquivo magnético com registro fiscal da totalidade das operações e prestações fica dispensado do cumprimento da obrigação prevista no "caput". § 7º - A dispensa prevista no § 6º não se aplica ao contribuinte que realizar operações ou prestações interestaduais sujeitas ao regime jurídico da substituição tributária." (NR).

PESSOAL: Alguém que já fez essa nhaca de TD-REDF (Secretaria da Fazenda/SP, poderia me ajudar? REGISTRO 20 - ERRO 2001 (Arquivo sem linhas de Nota Fiscal) Que raio de linha de nota fiscal é essa que não aparece no leiaute? REGISTRO 90 - ERRO 9000 (Tipo de Registro Invalido. Arquivo sem Rodapé) OLHA O RODAPÉ AI ABAIXO, QUEM DISSE QUE NÃO TEM! 90| 94| 94| 00| 18529,50 FOI GERADO DA FORMA ABAIXO M->CAMP46A:="90" M->mQUANT:=STR(mCONTA) M->CAMP47A:=SUBSTR(mQUANT,7,5) M->mQUANT1:=STR(mCONTA1) M->CAMP48A:=SUBSTR(mQUANT1,7,5) M->mQUANT2:=STR(mCONTA2) M->CAMP49A:=SUBSTR(mQUANT2,7,5) M->mVALOR4:=STR(mSOMA1) M->CAMP50A:=PADL(SUBSTR(mVALOR4,1,10) + "," +; SUBSTR(mVALOR4,12,2),18) M->LINHA4:=chr(239)+chr(187)+chr(191)+CAMP46A+"|"+CAMP47A+"|"+CAMP48A+"|"+CAMP49A+"|"+CAMP50A FSEEK(ARQ,0,2) FWRITE(ARQ,LINHA4+CR_LF) Se puderem me mandar um exemplo só desses dois Registros 20 e 90 Grato NILSON

PESSOAL: PROBLEMA RESOLVIDO ESTAVA FALTANDO AQUELA MERDA DO "|" (PIPE) M->LINHA1:= chr(239)+chr(187)+chr(191)+ "10" + "|" + "1,00" + "|" + CAMP03 + "|" + CAMP04+ "|" + CAMP05 + "|" NILSON

PESSOAL, SOCORRO! Se alguém, por favor, puder analisar o porque da LINHA1 abaixo não é validada no TD-REDF (Secretaria da Fazenda/SP). Erro: tipo de registro incorreto:{0} //****************************** HEADER (CABEÇALHO) ********************************************* IF AB = 0 M->CAMP01:="10" //001-002 TIPO DE REGISTRO M->CAMP02:="1.00" //003-006 VERSÃO DO LAYOUT DO ARQUIVO M->MERDA=LEN(RTRIM(mCLI006)) IF MERDA = 18 M->CAMP03A:=PADR( SUBSTR(mCLI006,1,2) + SUBSTR(mCLI006,4,3) + SUBSTR(mCLI006,8,3) + SUBSTR(mCLI006,12,4) + SUBSTR(mCLI006,17,2) ,14) ENDIF IF MERDA = 14 M->CAMP03A:=PADR( SUBSTR(mCLI006,1,3) + SUBSTR(mCLI006,5,3) + SUBSTR(mCLI006,9,3) + SUBSTR(mCLI006,13,2) ,14) ENDIF M->CAMP03:=PADR(CAMP03A,14) M->CAMP04:=SUBSTR(DTOC(mDAIN),1,2)+ "/" +; SUBSTR(DTOC(mDAIN),4,2)+ "/" +; SUBSTR(DTOC(mDAIN),7,4) //021-030 MENOR DATA NOTAS FISCAIS M->CAMP05:=SUBSTR(DTOC(mDAFI),1,2)+ "/" +; SUBSTR(DTOC(mDAFI),4,2)+ "/" +; SUBSTR(DTOC(mDAFI),7,4) //031-040 MAIOR DATA NOTAS FISCAIS M->LINHA1:= chr(239)+chr(187)+chr(191)+ "10" + "1,00" + CAMP03+CAMP04+CAMP05 FSEEK(ARQ,0,2) FWRITE(ARQ,LINHA1+CR_LF) AB = 1 ENDIF GRATO NILSON

PESSOAL, SOCORRO! Se alguém, por favor, puder analisar o porque da LINHA1 abaixo não é validada no TD-REDF (Secretaria da Fazenda/SP). Erro: tipo de registro incorreto:{0} //****************************** HEADER (CABEÇALHO) ********************************************* IF AB = 0 M->CAMP01:="10" //001-002 TIPO DE REGISTRO M->CAMP02:="1.00" //003-006 VERSÃO DO LAYOUT DO ARQUIVO M->MERDA=LEN(RTRIM(mCLI006)) IF MERDA = 18 M->CAMP03A:=PADR( SUBSTR(mCLI006,1,2) + SUBSTR(mCLI006,4,3) + SUBSTR(mCLI006,8,3) + SUBSTR(mCLI006,12,4) + SUBSTR(mCLI006,17,2) ,14) ENDIF IF MERDA = 14 M->CAMP03A:=PADR( SUBSTR(mCLI006,1,3) + SUBSTR(mCLI006,5,3) + SUBSTR(mCLI006,9,3) + SUBSTR(mCLI006,13,2) ,14) ENDIF M->CAMP03:=PADR(CAMP03A,14) M->CAMP04:=SUBSTR(DTOC(mDAIN),1,2)+ "/" +; SUBSTR(DTOC(mDAIN),4,2)+ "/" +; SUBSTR(DTOC(mDAIN),7,4) //021-030 MENOR DATA NOTAS FISCAIS M->CAMP05:=SUBSTR(DTOC(mDAFI),1,2)+ "/" +; SUBSTR(DTOC(mDAFI),4,2)+ "/" +; SUBSTR(DTOC(mDAFI),7,4) //031-040 MAIOR DATA NOTAS FISCAIS M->LINHA1:= chr(239)+chr(187)+chr(191)+ "10" + "1,00" + CAMP03+CAMP04+CAMP05 FSEEK(ARQ,0,2) FWRITE(ARQ,LINHA1+CR_LF) AB = 1 ENDIF GRATO NILSON

PESSOAL, Quem tem alguma informação sobre Nota Fiscal Eletrônica? NILSON

PESSOAL, Quem tem alguma informação sobre Nota Fiscal Eletrônica? NILSON

LUIZ, Não vai sair da mensagem, pois não foi criada possibilidade de saida so loop. NILSON

PESSOAL, Faz muito tempo que tive esse problema e postei a pergunta. Já faz muito tempo que também resolvi da forma abaixo IF mORGA1 = "S" // se for para indexar arquivo IF NETUSE("CALEN","LENCA",.T.,10) // abre exclusivo mARQV="CALENDÃRIO " oARQV:Refresh() PACK IF FILE("LENCA.CDX") // se exsitir CDX DELETE FILE("LENCA.CDX") //apaga ENDIF oMeter:nTotal = RecCount() INDEX ON DIAME TAG INDICE1 TO LENCA FOR !Deleted() EVAL( oMeter:Set( nRecno+1),SysRefresh() ) oMeter:Set(0) ELSE MsgAlert("Arquivo não Disponivel!", "Aguarde!") ENDIF ENDIF NILSON

Lá vai: nilsonvasconcellos@hotmail.com ou nvascon@hotmail.com NILSON

Shark Depois de sua grande atitude só nos resta mostrar a cara pra dizer que baixamos os seus fontes. Grato NILSON

Embora não tenho podido participar dos PRÉ e PÓS, sempre foi uma satistação participar de todos os encontros. Como a cada ano a qualidade dos encontros vêm se superando, desta feita não poderia ter sido melhor. Devemos muito a todos os extremados colaboradores, em especial aos Srs. Paulo Araujo, João Santos, e José Carlos. PARABÉNS Ano que vem, estaremos lá (é só DEUS permitir) NILSON

Pessoal: Votado, visto resultado, e praticamente confirmado NILSON

Evaldo, É um servidor Linux, com serviço SSH, terminais Windows 9x/XP, rodando Putty, em modo texto. Grato NILSON

OLÃ PESSOAL: QUAL A BIBLIOTECA GRÃFICA PARA APROVEITAR TODOS OS COMANDOS DO FW/XHARBOUR NO LINUX. ONDE ENCONTRÃ-LA NILSON

OLÃ PESSOAL: QUAL A BIBLIOTECA GRÃFICA PARA APROVEITAR TODOS OS COMANDOS DO FW/XHARBOUR NO LINUX. ONDE ENCONTRÃ-LA NILSON

PESSOAL: Na máquina de apenas um cliente acontece isso: Esta usando programa Fivewin. Minimiza a tela e abre janela de qualquer outro programa. Ao retornar para o programa Fivewin dá erro. Alguém já teve esse problema? NILSON

PESSOAL: Na máquina de apenas um cliente acontece isso: Esta usando programa Fivewin. Minimiza a tela e abre janela de qualquer outro programa. Ao retornar para o programa Fivewin dá erro. Alguém já teve esse problema? NILSON

Pessoal: Tem uma saida para rodar programa em LINUX? NILSON

Pessoal: Tem uma saida para rodar programa em LINUX? NILSON

PESSOAL: Tem como manter atualizadas informação de um banco de dados em DBF e ACESS ao mesmo tempo, ou seja, qualquer inclusão ou alteração feita do DBF também faria no ACESS. Acho que não teria como ser automática, mas sim criar uma rotina para fazer essas atualizações. Como fazer a leitura do ACESS? Como transformar ACESS em DBF? NILSON

PESSOAL: Tem como manter atualizadas informação de um banco de dados em DBF e ACESS ao mesmo tempo, ou seja, qualquer inclusão ou alteração feita do DBF também faria no ACESS. Acho que não teria como ser automática, mas sim criar uma rotina para fazer essas atualizações. Como fazer a leitura do ACESS? Como transformar ACESS em DBF? NILSON

PESSOAL, como se resolve a questão abaixo: Usando-se programa FW com a tela do Outlook minimizada. Ao estar num GET do FW alterna-se para a página do OutLook para buscar alguma informação; quanto retorna para o FW dá erro. Como resolver. NILSON

PESSOAL, como se resolve a questão abaixo: Usando-se programa FW com a tela do Outlook minimizada. Ao estar num GET do FW alterna-se para a página do OutLook para buscar alguma informação; quanto retorna para o FW dá erro. Como resolver. NILSON