mkyx

O correto é você usar os comandos mysql, com sqlrdd e não usar o comando xbase, com sqlrdd, já perdi dois clientes por causa disso. Os comandos vão funcionar uma hora legal, outra hora, vai dar uns paus inexplicáveis. Sai dessa.

Estou necessitando das rotinas de assinatura, transmissão e recepção dos xml do e-social Alguém conseguiu concluir? Pompeo Guaratinguetá - SP mkyx@bol.com.br

Criei uma variável NFC_E, quando é "S", trata-se de NFC-e, quando é "N", trata-se de NF-e oNFe:SetValue("ide" , 'mod' , iif(nfc_e="S","65","55") ) quando é NFC-e, não tem a tag abaixo: if nfc_e#"S" oNFe:SetValue("ide" , 'dhSaiEnt', TimeZone(sai0,hs0,"2") ) endif para NFC-e: oNFe:SetValue("ide" , 'idDest' , "1" ) oNFe:SetValue("ide" , 'tpImp' , "4",) // tipo impressora oNFe:SetValue("ide" , 'indFinal' , "1" ) oNFe:SetValue("dest" , "indIEDest" , "9") //9 Se for NFC-e, tem que definir os meus de pagamentos: 01 para dinheiro 02 para pag em cheques 03 para cartões de créditos ou debitos 05 a prazo (boleto, fiado, carnêt, etc) Dentro da classe vonfe2g_v4, fiz as seguintes complementações para o uso como nfce: METHOD New(cPathNFe,nTipoRef,cModeloDoc) CLASS TVoNFe2G Local nPos #IFDEF __DOS__ DEFAULT cPathNFe:=N_PASTA // minha pasta de arquivos #ELSE DEFAULT cPathNFe:=N_PASTA // minha pasta de arquivos --> na variável N_PASTA #ENDIF Default nTipoRef:=1,cModeloDoc:=iif(nfc_e="S","65","55") Dentro da classe vonfeutil2g_v4, fiz as seguintes complementações: Method New(SiglaUF, TipoAmbiente, cCertificado, proxy,Usuario,Senha,Licenca, lMensagem,lSCAN,lNFCe,nTipoEmail) Class TVoNFeUtil2G Local lContinua:=.t.,cNome Default Proxy:="" Default Usuario:="" Default Senha:="" Default Licenca:="" Default lMensagem:=.t. Default SiglaUF:="SP" Default TipoAmbiente:="2" Default lScan:=.f. Default lNFCe:=iif(nfc_e="S",.t.,.f.) Default nTipoEmail:=1 ..... No método assinar() essa url, e curlconsulta é para o estado de são paulo URL0:="https://www.nfce.fazenda.sp.gov.br/NFCeConsultaPublica/Paginas/ConsultaPublica.aspx" cUrlConsulta:=https://www.nfce.fazenda.sp.gov.br/NFCeConsultaPublica/Paginas/ConsultaQRCode.aspx cXmlAssinado:=::oNFEUtil:AssinarNFCE400( cXmlDoc , ::cCertificado , IdToken , c_ativa , "2" , cUrlConsulta, URL0 , "0" ,@nRet , @Mensagem , @cRetLote , @cUrlNfCe) ...... Function TimeZone(dData,ctime,cTipo_h) Local cDateTimeZone,aTimeStamp,cTzd Default dData:=Date(),ctime:=time(),cTipo_h:="*" tb_hr_verao:={{"AL","-03:00","-03:00"},{"AP","-03:00","-03:00"},{"CE","-03:00","-03:00"},{"BA","-03:00","-03:00"},{"MA","-03:00","-03:00"},{"PA","-03:00","-03:00"},{"PB","-02:00","-03:00"},{"PE","-03:00","-03:00"},{"PI","-03:00","-03:00"},{"RN","-03:00","-03:00"},{"SE","-03:00","-03:00"},{"AM","-04:00","-04:00"},{"RO","-04:00","-04:00"},{"RR","-04:00","-04:00"},{"AC","-05:00","-05:00"},{"DF","-03:00","-02:00"},{"ES","-03:00","-02:00"},{"GO","-03:00","-02:00"},{"MG","-03:00","-02:00"},{"PR","-03:00","-02:00"},{"RJ","-03:00","-02:00"},{"RS","-03:00","-02:00"},{"SC","-03:00","-02:00"},{"SP","-03:00","-02:00"},{"TO","-03:00","-02:00"},{"MS","-04:00","-03:00"},{"MT","-04:00","-03:00"}} aTimeStamp:=hb_atokens(tip_timestamp(dData)," ") cTzd:=aTail(aTimeStamp) cTzd:=Left(cTzd,Len(cTzd)-2)+":"+Right(cTzd,2) if nfc_e="S" // para o nfce e definição da tag <dhEmi>, pois para a tag <dhSaiEnt> não é para ser definida quando for nfc-e. FOR THV=1 TO LEN(TB_HR_VERAO) IF tb_hr_verao[THV,1]=cEstadoEmitenteNFe IF E_VERAO="S" cTzd:=tb_hr_verao[THV,3] ELSE cTzd:=tb_hr_verao[THV,2] ENDIF THV=LEN(TB_HR_VERAO)+10 ENDIF NEXT endif cDateTimeZone:=StrZero(Year(dData),4)+"-"+StrZero(Month(dData),2)+"-"+StrZero(Day(dData),2)+"T"+cTime+cTzd Return(cDateTimeZone) o resto é igual a nf-e.

eu uso a classe do Gilmer e flexdocs, para NF-e e NFC-e, para implementar para a NFC-e, as mudanças foram mínimas.

Marsan, vc usa classe do Gilmer com a flexdocs?

continua, e mesmo prazo.

Boa tarde, a todos, não sei se é interessante, pois eu achei que é, talvez esteja postando bobagens, me desculpem pela ideia. Com o surgimento dessas obrigatoriedades da receita federal, webservice, soap envelopado, e-social, reinf, xml, assinatura de xml, consumo de webservice, consulta lote, envia lote, etc. e como não temos manuais, e por causa disso, precisamos ficar garimpando na internet, sem nada encontrar, somos até obrigados a pagar para terceiros que desenvolveram essas rotinas em outras linguagens. Aqui no fórum temos o nosso gigante, representante do fivewin, o gilmer, gente boa, temos também o "amiguinhos", o Rochinha, outro gigante na linguagem. Então, qual é a minha ideia, propor para um desses cabras machos, ou poderia formar um equipe de programadores com esses feras. E definir uma renda mensal, tipo R$ 10.000,00 por mês Se 100 usuários aqui do fórum se contribuir com R$ 100,00 por mês, daria R$ 10.000,00 por mês o que poderia pagar uma renda para um desses caras ou para uma equipe que fosse formada. e o que esse cara ou equipe desenvolveria? Essas funções que tanto necessitamos, e não precisaríamos recorrer a terceiros. essas rotinas, seriam: - Criar xml - assinar xml - consumir webservice - enviar lote - consulta lote Tanto, para nfe, como para: nfce, cte, mdfe, e-social, edf-reinf (xml), nfs-e Pessoal o que vocês pensam sobre isso?

no caso da fatura, tem o vDesc, que deve ter presença no xml obrigatória, mas parece que existe algum erro nos arquivos da receita federal, porque ao colocar vDesc:=0.00, dá erro então, eu acrescentei R$ 0,01 (um centavo) no valor original da fatura (vOrig), e na tag, <vDesc> coloquei 0.01 e no valor liquido (vLiq) coloquei o valor final. e deu certo. Vai entender.

procura na net tabela cst pis cofins e também observa se não estou faltando alguma tag, pois isto aconteceu comigo, falta tags, e o código do cst pis cofins estava errado. dá uma olhada no manual da sefaz, em paralelo com a classe do Gilmer, se você a usa.

eu uso a função de enviar email da flexdocs.

para o gmail eu uso a porta 587, porta segura NÃO, para o gmail, e desbloqueio dentro do provedor gmail, o uso do gmail através do aplicativos de terceiros.

pode gravar o certificado em arquivos .pfx, e acessar o certificado através destes arquivos.

Pode sim, mas não há necessidade, pois uma mesma leitora consegue ler vários cartões inteligentes, o que vai instalar de diferentes para cada empresa de cartão é o safesign

eu faço assim: logo:="c:\sistema\jpg\logofirma.jpg" oJPG := TImage():Define( ,logo, oPrn ) oPrn:SayImage(LINHA,COLUNA,oJPG,COLUNA*55,AVANCA*4.5)

Não entendi, quem vai pagar são os alunos e não o professor, e o Rochinha será o professor e nós os alunos, Sr. Jorge, somos nós quem vai pagar, Quanto será que o Rochinha vai cobrar por hora/aula? Imagino que umas 10 ou 12 horas são o suficiente, para aprendermos esses comandos referente à webservice.

Jorge, foi o que eu pensei, na hora da resposta dele. rsrsrsrsrs Esse é o cara, o Rochinha, Bem que ele poderia montar umas aulas, desses comandos pra gente, eu tô dentro. O que você acha Rochinha? Att. Pompeo Guaratinguetá - SP

Gratidão Rochinha vou testar Att. Pompeo Guaratinguetá - SP

Boa noite kapiaba, neste post que vc passou aqui, não tem comandos como abrir arquivos ocx e usar as funções que estão dentro desse arquivo. Obrigado.

Bom dia, pessoal Tenho uma lib com a extensão .ocx, em delphi, para abrir em fivewin e usar as rotinas que estão dentro desse arquivo com extensão OCX, alguém sabe como usar essas lib com extensão OCX? São os mesmos comandos, que os usados para abrir uma DLL? Muito grato. Pompeo Guaratinguetá - SP

já tentou 00

O ENVIO E RETORNO VC PODE COMPARTILHAR, OU COMERCIALIZAR?

Boa tarde como vc está fazendo para assinar, transmitir e receber os arquivos de retorno?

Sr. kapiaba, eu me refiro ao manual do layout do código de barra na gps, para que eu possa incluir no meu sistema de folha de pagamento. Esse link que vc postou se refere ao programa online, para emitir a gps, pelo site.

Bom dia, Alguém sabe onde conseguir o layout do código de barra para a GPS?

Acho que através do id ou mac do driver de placa do wifi, que estiver ativo. para isso deverá criar uma função em C da boland.