gabriellc
-
Total de ítens
227 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por gabriellc
-
-
Em 02/09/2022 at 14:25, Renato Rubinho disse:
Boa tarde,
Está com os fontes atualizados?
Teste com o programa de exemplo para verificar se o problema não está na sua aplicação.
Tente debugar para identificar o problema.
problema encontrado e resolvido,
no array do arquivo pcesConvesaoesocial __ARRAY_MATRIX_EVENTO_INFO na versao S1 do 1207 contava o nome antigo da versao 2.5, evtCdBenPrRP em eventostring e strtotipoevento.
alterei para o nome da versao s1 evtBenPrRP, e problema resolvido
(TipoEvento: teS1207 ; TipoEventoString: 'S-1207' ; Versao: 'vS1_00'; EventoString: 'evtBenPrRP' ; Schema: schevtBenPrRP ; StrEventoToTipoEvento: 'evtBenPrRP'{'evtCdBenPrRP'} ; Observacao: ''),
-
1
-
-
Em 02/09/2022 at 14:25, Renato Rubinho disse:
Boa tarde,
Está com os fontes atualizados?
Teste com o programa de exemplo para verificar se o problema não está na sua aplicação.
Tente debugar para identificar o problema.
vai nao renato,
pra vc conseguir simular o erro ai, pra ve acontece tb,
no aplicativo exemplo, gera o arquivo s1207, no botao gerar arquivos, fecha o aplicativo, abre novamente e tentar carregar esse xml gerado, no botao carregar XML.
-
Em 02/09/2022 at 14:25, Renato Rubinho disse:
Boa tarde,
Está com os fontes atualizados?
Teste com o programa de exemplo para verificar se o problema não está na sua aplicação.
Tente debugar para identificar o problema.
opa renato, sim estao atualizados, fiz os testes no aplicativo exemplo tb,
mas vou dar outro update no svn e reinstaalr pra testar novamente
-
Alguma ideia do que possa ser?
-
o loadfromstring e loadfromfile, nao carrega o componente com o evento S-1207. (Ate agora so aconteceu com esse evento), os anteriores como S2200, S2400,S2410 e tabelas iniciais estao pegando normal com o mesmo modo de carregar o componente, pelo loadfromstring.
erro simulado, no exemplo com esses dois xml, um gerado pelo meu sistema outro pelo exemplo do acbr.
o com id final 5919 gerado pelo exemplo do acbr
o outro gerado no meu sistema.
1114459220000002022083013210295919-S-1207-0.xml 1114459220000002022083013125502649-S-1207-0.xml
-
ALELUIA!!!
Consegui descobrir o motivo, eu estava alterando os .pas, mas a alteracao so entra em vigor, quando se executa o instalador apos as as modificacoes, para que o instalador compile os DCUS, que é o que sao usados na compilacao!
obg, marcelo pelos prestimos!
4 horas atrás, Marcelo Pontes Melim disse:Ok! Queria ajudar, mas, está além do meu conhecimento e das possibilidades. Desejo sucesso para você.
-
3 horas atrás, Marcelo Pontes Melim disse:
Ok! Queria ajudar, mas, está além do meu conhecimento e das possibilidades. Desejo sucesso para você.
vlw mam, tem algo estranho pq tipo se liga:
comentei todo o codigo de gerar dependente, e msm assim ele continua gerando os dependentes, ele ta gerando em outro local!
-
1 hora atrás, Marcelo Pontes Melim disse:
O programa está apresentando mensagem de erro na validação da UF e esse campo deixou de ser uma enumeração e passou a ser uma String.
Sua instalação deve ser antiga ou o programa exemplo.
Criar nova pasta baixando o componente pelo SVN "svn://svn.code.sf.net/p/acbr/code" e instalar através do ACBrInstall_Trunk2.exe.
Depois, utilizar o programa exemplo da nova instalação.
tenso marcelo, nao gera de jeito nenhum a tag, sexoDep!
fiz todo o procedimento, baixei os fontes novamente em outra pasta, instalei novamente, mandando remover os arquivos antigos! e nada!
-
5 minutos atrás, Marcelo Pontes Melim disse:
O programa está apresentando mensagem de erro na validação da UF e esse campo deixou de ser uma enumeração e passou a ser uma String.
Sua instalação deve ser antiga ou o programa exemplo.
Criar nova pasta baixando o componente pelo SVN "svn://svn.code.sf.net/p/acbr/code" e instalar através do ACBrInstall_Trunk2.exe.
Depois, utilizar o programa exemplo da nova instalação.
esse erro eh de outros registros, que nao estao preenchidos os UF!
esta tudo atualizado de certeza!
mas vou tentar criando em uma nova pasta e baixar novamente os fontes!
-
31 minutos atrás, Marcelo Pontes Melim disse:
Bom dia Gabriel. Desculpe-me pela pergunta que pode ser idiota, mas, após corrigir o pcesGerador.pas você reinstalou o componente através do ACBrInstall_Trunk2.exe?
olha marcelo, fiz esse video do debug, https://drive.google.com/file/d/1iLMAybQDwLcZzpQaU9nl1AFleDHJGVor/view?usp=sharing
estou achando estranho isso, no debug, ele pula algumas linhas
-
21 minutos atrás, Marcelo Pontes Melim disse:
Bom dia Gabriel. Desculpe-me pela pergunta que pode ser idiota, mas, após corrigir o pcesGerador.pas você reinstalou o componente através do ACBrInstall_Trunk2.exe?
apos nao, eu fiz a reinstalacao, e apaguei novamente a condicao pBeneficiario!
-
13 horas atrás, Marcelo Pontes Melim disse:
Me parece que é um erro no programa exemplo em Delphi que não foi totalmente revisado. Estou fazendo algumas modificações nesse programa para mantê-lo atualizado, mas, ainda não foi possível publicar a nova versão.
bom dia marcelo, cara ta muito estranho, eu removi a procedure gerarDependente do arquivo pcesGerador, e criei a mesma com outro nome, substitui na chamada dela, marquei os breakpoints pra ver nela, e ele nem entra nela, eh como se tivesse em cache ou ta chamando de outro arquivo essa funcao!
-
23 minutos atrás, Marcelo Pontes Melim disse:
Me parece que é um erro no programa exemplo em Delphi que não foi totalmente revisado. Estou fazendo algumas modificações nesse programa para mantê-lo atualizado, mas, ainda não foi possível publicar a nova versão.
eu testei nele so pra tirar a prova, os primeiros xmls, foram no meu programa!
-
mt estranho marcelo, nao gera nem na bala, nem no exemplo, e pior q meus fontes estao atualizados, sempre atualizo!
-
28 minutos atrás, Marcelo Pontes Melim disse:
Estranho, tem alguma outra variável que está impedindo a geração. Veja o anexo gerado pelo programa exemplo em Lazarus.
1123456789012342022011509452306285-S-2200-0.xml 7 kB · 0 downloads
ta estranho msm, acabo de notar, ele tb nao gera a taf CPF ;/
-
3 horas atrás, Marcelo Pontes Melim disse:
Oi Gabriel!
Estive verificando os módulos e me parece que basta corrigir o pcesGerador.pas na linha 551, assim:
De: if (VersaoDF > ve02_05_00) and (pBeneficiario) then
Para: if VersaoDF > ve02_05_00 thenFaça os testes e nos avise, por favor, se encontrar problemas.
opa marcelo, ja tinha feito esse teste! tb nao gera :/!
mas vou testar novamente agora!
eh, nao gera a tag, ela eh condicional mas no schema o xml que estou gerando atende a condicao!
por isso nao estou entendendo
segue anexo o XML gerado, msm estando alimentado o campo sexoDep,
e esse eh o trecho do schema!
<xs:sequence>
<xs:element name="tpDep" type="TS_tpDep" />
<xs:element name="nmDep" type="TS_nmDep" />
<xs:element name="dtNascto" type="TS_dtNascto" />
<xs:element name="cpfDep" minOccurs="0" type="TS_cpfDep" />
<xs:element name="sexoDep" minOccurs="0" type="TS_sexo">
<xs:annotation>
<xs:documentation>Sexo do dependente.</xs:documentation>
<xs:documentation>Validação: Preenchimento obrigatório se {tpRegPrev}(2200_vinculo_tpRegPrev) = [2] e {cadIni}(2200_vinculo_cadIni) = [N]. Não informar se {tpRegPrev}(2200_vinculo_tpRegPrev) for diferente de [2].</xs:documentation>
</xs:annotation>
</xs:element>
<xs:element name="depIRRF" type="TS_depIRRF" />
<xs:element name="depSF" type="TS_depSF" />
<xs:element name="incTrab" type="TS_incTrab" />
</xs:sequence> -
14 minutos atrás, Marcelo Pontes Melim disse:
Gabriel, vou revisar os módulos para corrigir o problema. Assim que tiver as modificações, vou postar aqui os módulo corrigidos.
ok marcelo, Obg!
-
Mesmo Alimentando o campo sexoDep, o compenente nao escreve o campo no XML, ja rodei pra saber o motivo mas nao consegui,
se alguem puder ajudar!
-
o codigo sempre estava gerando a TAG duracao/infocontrato, mesmo colocando PrazoNaoAplicavel,
codigo alterado:
DE
vinculo.infoContrato.duracao.TpContr := eSStrToTpContr(Ok, INIRec.ReadString(sSecao, 'tpContr', '1'));
vinculo.infoContrato.duracao.dtTerm := StringToDateTime(INIRec.ReadString(sSecao, 'dtTerm', '0'));
vinculo.infoContrato.duracao.clauAssec := eSStrToSimNao(Ok, INIRec.ReadString(sSecao, 'clauAssec', 'S'));
vinculo.infoContrato.duracao.objDet := INIRec.ReadString(sSecao, 'objDet', '');PARA
if INIRec.ReadString(sSecao, 'tpContr', '1') <> '3' then
begin
vinculo.infoContrato.duracao.TpContr := eSStrToTpContr(Ok, INIRec.ReadString(sSecao, 'tpContr', '1'));
vinculo.infoContrato.duracao.dtTerm := StringToDateTime(INIRec.ReadString(sSecao, 'dtTerm', '0'));
vinculo.infoContrato.duracao.clauAssec := eSStrToSimNao(Ok, INIRec.ReadString(sSecao, 'clauAssec', 'S'));
vinculo.infoContrato.duracao.objDet := INIRec.ReadString(sSecao, 'objDet', '');
end; -
bom dia pessoal!!
uma duvida!
eu gero os Xmls e gravo no banco, depois carrego no componente pelo ACBreSocial1.Eventos.LoadFromString(dmesocial.qryEventosXML.AsString)a duvida eh, nos eventos que sao varios registros, cada vez que dou o loadfromstring, ele carrega todos no componente para enviar o lote?
ou a cada loadfromstring, ele substitui o anterior?
desde ja obg!
-
11 horas atrás, LIDERNetwork disse:
Eu apanhei bastante pra aprender a salada de códigos que vem de uma biblioteca JAVA para Delphi, eu acho até que é bem difícil vc encontrar um ser vivente que decifre tudo, nada além do esperado enquanto se trata de JAVA
!!
Vou passar mais conteúdo, afim de ajudar outros colegas...
Declare os Objetos das interfaces TJavaLocal, deverá ter um listener para o bind e outro para o pagamento que será usado para chamar o OrderManager:
TServBindListener = class(TJavaLocal, JServiceBindListener) public procedure onServiceBound; cdecl; procedure onServiceBoundError(P1: JThrowable); cdecl; procedure onServiceUnbound; cdecl; end; TPagListener = class(TJavaLocal, JPaymentListener) public procedure onCancel; cdecl; procedure onError(P1: JPaymentError); cdecl; procedure onPayment(P1: JOrder); cdecl; procedure onStart; cdecl; end;Declare variáveis private ou public das classes Listener e uma variável da classe Java do tipo JOrderManager
var OrderManager : JOrderManager; ServiceBindListener : TServBindListener; PaymentListener : TPagListener;Vc precisa inicializar os objetos no form onde vc fará as chamadas
initialization {Credenciais CIELO} const ClientID : string = 'SUA CLIENTEID'; const AccessToken : string= 'SEU TOKEN_ACCESS'; ServiceBindListener := TServBindListener.Create; PaymentListener := TPagListener.Create; OrderManager := TJOrderManager.JavaClass.init(TJdomain_Credentials.JavaClass.init(StringToJString(ClientID), StringToJString(AccessToken)), SharedActivityContext); OrderManager.bind(SharedActivity, ServiceBindListener);Até aqui a LIO já estará "escutando" todo pedido de pagamento...
Para chamar o método e solicitar um ordem de pagamento
function TfrmFORMULARIO.RealizaPagamento : boolean; {$IFDEF ANDROID} var LOrder: JOrder; {$ENDIF} begin {$IFDEF ANDROID} try begin LOrder := OrderManager.createDraftOrder(StringToJString(DadosVenda.codven.tostring)); LOrder.addItem(StringToJString(CODIGO_PRODUTO), StringToJString(DESCRICAO_PRODUTO), CurrencyToNumeric(100.00,-2), CurrencyToNumeric(10,-3), StringToJString('UND')); OrderManager.placeOrder(LOrder); OrderManager.checkoutOrder(LOrder.getId, CurrencyToNumeric(DadosVenda.ValorVenda,-2), PaymentListener); Result := DadosVenda.StatusPagamento; end; except on e : Exception do begin ShowMessage(e.message); end; end; end;
Nesse momento ao chamar OrderManager.checkoutOrder vai abrir o app da Cielo para passar o cartao, o retorno do método quando a LIO finalizar o pagamento vc captura em TPagtListener.onPayment onde os retornos possíveis vc pega com JStringToString(P1.getStatus.toString) dentro do método, veja a documentação para saber quais retornos possíveis...procedure TPagListener.onPayment(P1: JOrder);
begin
frmFORMULARIOn.Text1.Text := 'VENDA ID = ' + JStringToString(P1.getId) +
#10#13 + ' VALOR = ' + P1.paidAmount.toString + #10#13 + 'VALOR RESTANTE = ' + P1.getPendingAmount.toString +
#10#13 + 'STATUS = ' + JStringToString(P1.getStatus.toString);end;
Dai pra frente veja se consegue desenrolar!
show cara, vlw!
-
41 minutos atrás, LIDERNetwork disse:
Vou ajudar vcs...
@gabriellc me passe ate onde vc conseguiu fazer no seu projeto. Vc ja anexou o SDK e ja importou o Android.Cielo.LIO.pas que anexo ao topico? Veja acima os anexos que coloquei...
ja sim, minhas duvidas sao so em como chamar os metodos, nao sou muito familiarizado com essa juncao do java com o delphi
se puder postar exemplos basicos, eu desenrolo o restante, tipo
uma chamada de uma order
o exemplo do bind
-
Em 22/06/2021 at 16:16, LIDERNetwork disse:
Como forma de contribuição segue a conversão:
alignCenter := TJHashMap.Create;
alignCenter.put(StringToJString('KEY_ALIGN'), StringToJString('VAL_ALIGN_CENTER'));
alignCenter.put(StringToJString('KEY_TYPEFACE'), StringToJString('1'));
alignCenter.put(StringToJString('KEY_TEXT_SIZE'), StringToJString('20'));ImpLIO.printImage(DadosVenda.JBitmapNFCe, TJMap.Wrap(JObjectToID(alignCenter)), ListernerPrinter );
bom dia amigo, peguei teu
Em 22/06/2021 at 14:40, LIDERNetwork disse:Obrigado Daniel por dar retorno. Realmente as chamadas são bem diferentes em relação a Elgin porque vc usou intents e no caso to usando o SDK com integração local, segue em anexo a classe e as libs anexadas em Libraries se vc quiser dar uma olhada. Eu não consegui usar a classe JPrintermanager porque pede um parâmetro do tipo JMap e nao achei documentação para conversão do HashMap formato JAVA para Delphi no procedimento printImage(JBitmap, JMap, JPrinterListener). Note que a LIO nao aceita impressão PDF direta então tive que converter de PDF para JBitmap.
No JAVA o HashMap seria mais ou menos assim:
HashMap<String, Integer> alignCenter = new HashMap<>();
alignCenter.put(PrinterAttributes.KEY_ALIGN, PrinterAttributes.VAL_ALIGN_CENTER);
alignCenter.put(PrinterAttributes.KEY_TYPEFACE, 1);
alignCenter.put(PrinterAttributes.KEY_TEXT_SIZE, 20);CieloSDK.jar 133 kB · 2 downloads Android.CieloLIO.pas 131 kB · 2 downloads
ola amigo, peguei esse sdk pra estudar, mas estou um pouco perdido como fazer as chamadas, vc poderia por um codigo de exemplo, de criar uma order, fazer o bind.
desde ja agradecido!
-
12 horas atrás, EMBarbosa disse:
Muito obrigado pela contribuição. Eu avaliei aqui e parece quase tudo ok.
Só tenho uma pergunta importante, você chegou a fazer validação na versão atual do eSocial 2.5?
Porque notei que suas alterações na função eSStrToCodIncCP da unit pcesConversaoeSocial reduzem o número de valores que podem ser retornados.
ola, desculpa barbosa, nao fiz a validacao na 2.5 nao!
problema pinpad ppc930 windows 7
em Dúvidas sobre TEF
Postado
alguem ja pegou esse problema, se sim alguma dica de como resolver.
o pinpad ppc 930, sempre q reniicar a maquina, ele perde a porta COM!, no gerenciador continua instalado normal, mas sem a porta com na frente, ex: ppc920-930 ... (COMX). ele fica sem a porta, ai mando desisntalar e instalar novamente, ele volta a pegar a porta
desde ja obg