Manipular Bco de Dados ACBRPAF

[Ebnezer]

ola, gostaria de sabe como devo proceder para informar o caracter "?" no R01,R02, ATE R07 ISSO DEVE SER INFORMA APOS MODELO DO ECF COMO DEVE PROCEDER?

[Juliomar Marchetti]

Boa tarde

Se verificar existe em cada bloco dos registros uma propriedade RegistroValido

assim você repassa para ele se está ou não correto e ele faz o restante do serviço ao gerar o arquivo

também possui as verificações de inclusão exclusão que também fazem o tratamento somente repassando se o registro é válido e se não tem mudanças de dados no seu banco .

[Bruno Lima]

Exatamente neste ponto que eu estou... Como utilizo essa propriedade RegistroValido no ACBR...

Criei uma rotina para validar o HASH e coloquei um IF no campo "ACBrPAF.PAF_R.RegistroR01.MODELO_ECF" recebendo o modelo ou o caracter "?" caso seja invalido o Hash... o problema que fazendo isso automaticamente o arquivo é gerado com o caracter "?" em todos os registros (R01, R02, R03, R04, R05, R06, R07) e não somente no registro invalido...

[Régys Silveira]

Alguma coisa está errado na tua validação, basta passar a propriedade RegistroValido o booleano informado se o registro e valido ou não, automaticamente o "?" será informado somente para o registro que for FALSE.

Verifique a sua rotina de validação pois algo deve estar errado e tudo deve estar sendo gerado como FALSE.

[Bruno Lima]

Então como utilizo essa propriedade RegistroValido no ACBR... minha dúvida é exatamente essa não sei usar eu acabei desenvolvendo um outro metodo...

[Ebnezer]

Então como utilizo essa propriedade RegistroValido no ACBR... minha dúvida é exatamente essa não sei usar eu acabei desenvolvendo um outro metodo...

boa tarde amigo

voces faz assim....

if {Sua condição do banco se foi alterado no banco} then

ACBrPAF1.PAF_R.RegistroR01.RegistroValido:=true

else

ACBrPAF1.PAF_R.RegistroR01.RegistroValido:=false;

[Bruno Lima]

Verifiquei junto com a minha homologadora e a msm me disse que tenho que validar cada registro separadamente (R01, R02, R03 ... R07 )...

Então como faria para validar os demais registros??? exatamente neste ponto que me encontro pq fazendo exatamente como o nosso amigo Ebnezer colocou a critica vem somente no registro R01

[Ebnezer]

Verifiquei junto com a minha homologadora e a msm me disse que tenho que validar cada registro separadamente (R01, R02, R03 ... R07 )...

Então como faria para validar os demais registros??? exatamente neste ponto que me encontro pq fazendo exatamente como o nosso amigo Ebnezer colocou a critica vem somente no registro R01

ola, amigo conforme tinha falando antes....

acredito que seu banco tem as tabelas saparados r01 a r07 por exemplo...

vc vai fazer uma condicao por cada tabela assim..

Consultado se a tabela r01 o registro foi alterado dessa forma abaixo:

===========================================

if (tabela.campo=1) then // aqui diz que teve manipulacao de dados 1= alterado , 0=nao alterado

ACBrPAF1.PAF_R.RegistroR01.RegistroValido:=true

else

ACBrPAF1.PAF_R.RegistroR01.RegistroValido:=false;

Consultado se a tabela r02 o registro foi alterado dessa forma abaixo:

===========================================

if (tabela.campo=1) then // aqui diz que teve manipulacao de dados 1= alterado , 0=nao alterado

ACBrPAF1.PAF_R.RegistroR02.RegistroValido:=true

else

ACBrPAF1.PAF_R.RegistroR02.RegistroValido:=false;

e assim por endiante.!

[EMBarbosa]

if (tabela.campo=1) then // aqui diz que teve manipulacao de dados 1= alterado , 0=nao alterado

ACBrPAF1.PAF_R.RegistroR02.RegistroValido:=true

else

ACBrPAF1.PAF_R.RegistroR02.RegistroValido:=false;

e assim por endiante.!

Ebnezer, Não seria o contrário? RegistroValido:=true quando for 0: não alterado?

[Ebnezer]

if (tabela.campo=1) then // aqui diz que teve manipulacao de dados 1= alterado , 0=nao alterado

ACBrPAF1.PAF_R.RegistroR02.RegistroValido:=true

else

ACBrPAF1.PAF_R.RegistroR02.RegistroValido:=false;

e assim por endiante.!

Ebnezer, Não seria o contrário? RegistroValido:=true quando for 0: não alterado?

desculpa , o erro mais isso ai mesmo que vc falou !