Jump to content

click.png click.png click.png

click.png

click.png

click.png

Seja-Profissional-Saiba-mais.png Beneficios_banner.png

 

click.png

click.png

click.png

click.png

click.png

click.png

Dificuldades no preenchimento COD_CRED do Registro M100


fabiane_vieira
  • Este tópico foi criado há 3761 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Rapazes , estou com dúvida para o preenchimento do Registro M100 , atravéz de pesquisas pela net e tbm lendo o manual fiz um select mas ainda tenho duvidas se o retorno do select corresponde corretamente o para o Registro M100 , vejam :

QryRegistroM100.Close ;

QryRegistroM100.SQL.Clear ;

QryRegistroM100.SQL.Text := 'Select PIS_CST , PIS_PERCENTUAL , CFOP , sum(PIS_VALOR) '+

'From CADASTRO_NFS_ITENS '+

'Where DATA_ENTRADA between :DATA_INICIAL and :DATA_FINAL '+

'Group By PIS_CST , PIS_PERCENTUAL , CFOP ' +

'Order By PIS_CST asc' ;

QryRegistroM100.ParamByName('DATA_INICIAL').AsDate := DataInicial ;

QryRegistroM100.ParamByName('DATA_FINAL').AsDate := DataFinal ;

QryRegistroM100.Prepare ;

QryRegistroM100.Open ;

case (QryRegistroM100.fieldbyname('PIS_CST').AsInteger) of

50 : begin

Var_COD_CRED :=

end ;

51 : begin

Var_COD_CRED :=

end ;

// e assim as demais CST's por diante

end ;

Gostaria de saber se alguem de vcs tem um Select ou alguma forma de como preenchem corretamente este registro .

Obrigada .

Link to comment
Share on other sites

  • Este tópico foi criado há 3761 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.