Ir para conteúdo
AVISO AOS MEMBROS:

Fizemos uma atualização em 18/06/2023, e a forma de acesso ao Fórum mudou. Não mais está sendo aceito o login pelo Nome de Exibição cadastrado. Agora, apenas pelo email e pelos integradores de Login do Facebook, Google e Microsoft. O Facebook estava com uma validação pendente e já foi normalizado o acesso, já o Google, ainda estamos verificando o que está ocorrendo que não está funcionando.
Caso precisem de ajuda para o login pelo email acesse o link << Esqueci minha senha de acesso>> ou nos envie um pedido de ajuda pelo email admin@forumrm.com.br

Administração
ForumRM

Demonstrar Valor Da Grrf Na Folha Analitica


Posts Recomendados


  • Tópicos Que Criei:  1
  • Tópicos/Dia:  0.00
  • Meu Conteúdo:  2
  • Conteúdo/Dia:  0.00
  • Reputação:   0
  • Pontos/Conquistas:  20
  • Conteúdo Resolvido:  0
  • Dias Ganho:  0
  • Status:  Offline

Prezados, alguém possui uma formula que demonstre o valor recolhido na GRRF. Colocarei essa formula para ser impressa na folha analítica.

Link para comentar
Compartilhar em outros sites

  • 2 semanas depois...

  • Tópicos Que Criei:  21
  • Tópicos/Dia:  0.00
  • Meu Conteúdo:  90
  • Conteúdo/Dia:  0.01
  • Reputação:   0
  • Pontos/Conquistas:  660
  • Conteúdo Resolvido:  0
  • Dias Ganho:  0
  • Status:  Offline
  • Idade:  56

Tenta essa:

SE

TABFUNC ( 'TIPODEMISSAO', 'S' ) = '2'

ENTAO

DECL PERCFGTS, RECOLMES, SALDOFGTS;

SE TFUNC = 'Z'

ENTAO

SETVAR ( PERCFGTS, .02 )

SENAO

SETVAR ( PERCFGTS, .08 )

FIMSE;

SETVAR ( RECOLMES,

INT ( ( MAX ( BASEFGTSFF ( ANO, MES ), 0 ) * PERCFGTS ) * 100 ) / 100

+

INT ( ( MAX ( BASEFGTS13FF ( ANO, MES ), 0 ) * PERCFGTS ) * 100 ) / 100

);

SETVAR ( SALDOFGTS, TABFUNC ( 'SALDOFGTS', 'V' ) );

INT ( ( ( ( RECOLMES + SALDOFGTS ) * .5 ) + RECOLMES ) * 100 ) / 100

SENAO

SE

TABFUNC ( 'TIPODEMISSAO', 'S' ) = 'T'

ENTAO

SE TFUNC = 'Z'

ENTAO

SETVAR ( PERCFGTS, .02 )

SENAO

SETVAR ( PERCFGTS, .08 )

FIMSE;

SETVAR ( RECOLMES,

INT ( ( MAX ( BASEFGTSFF ( ANO, MES ), 0 ) * PERCFGTS ) * 100 ) / 100

+

INT ( ( MAX ( BASEFGTS13FF ( ANO, MES ), 0 ) * PERCFGTS ) * 100 ) / 100

);

SETVAR ( SALDOFGTS, TABFUNC ( 'SALDOFGTS', 'V' ) );

INT ( ( ( ( RECOLMES) * .5 ) + RECOLMES ) * 100 ) / 100

SENAO

0

FIMSE

FIMSE

Link para comentar
Compartilhar em outros sites

  • 2 semanas depois...

  • Tópicos Que Criei:  1
  • Tópicos/Dia:  0.00
  • Meu Conteúdo:  2
  • Conteúdo/Dia:  0.00
  • Reputação:   0
  • Pontos/Conquistas:  20
  • Conteúdo Resolvido:  0
  • Dias Ganho:  0
  • Status:  Offline

Fiz um pequeno ajuste para buscar o mes/ano conforme informado no momento da geracao da folha. Ficou desta forma:

DECL PERCFGTS, RECOLMES, SALDOFGTS;

SE TABFUNC ( 'TIPODEMISSAO', 'S' ) = '2'

ENTAO SE TFUNC = 'Z'

ENTAO SETVAR ( PERCFGTS, .02 )

SENAO SETVAR ( PERCFGTS, .08 )

FIMSE;

SETVAR ( RECOLMES, INT ( ( MAX ( BASEFGTSFF ( VAL(SUBSTR(PAR,4,4)), VAL(SUBSTR(PAR,1,2)) ), 0 ) * PERCFGTS ) * 100 ) / 100 +

INT ( ( MAX ( BASEFGTS13FF ( VAL(SUBSTR(PAR,4,4)), VAL(SUBSTR(PAR,1,2)) ), 0 ) * PERCFGTS ) * 100 ) / 100);

SETVAR ( SALDOFGTS, TABFUNC ( 'SALDOFGTS', 'V' ) );

INT ( ( ( ( RECOLMES + SALDOFGTS ) * .5 ) + RECOLMES ) * 100 ) / 100

SENAO SE TABFUNC ( 'TIPODEMISSAO', 'S' ) = 'T'

ENTAO SE TFUNC = 'Z'

ENTAO SETVAR ( PERCFGTS, .02 )

SENAO SETVAR ( PERCFGTS, .08 )

FIMSE;

SETVAR ( RECOLMES, INT ( ( MAX ( BASEFGTSFF ( VAL(SUBSTR(PAR,4,4)), VAL(SUBSTR(PAR,1,2)) ), 0 ) * PERCFGTS ) * 100 ) / 100 +

INT ( ( MAX ( BASEFGTS13FF ( VAL(SUBSTR(PAR,4,4)), VAL(SUBSTR(PAR,1,2)) ), 0 ) * PERCFGTS ) * 100 ) / 100 );

SETVAR ( SALDOFGTS, TABFUNC ( 'SALDOFGTS', 'V' ) );

INT ( ( ( ( RECOLMES) * .5 ) + RECOLMES ) * 100 ) / 100

SENAO 0

FIMSE

FIMSE

Link para comentar
Compartilhar em outros sites

Participe da conversa

Você pode postar agora, e se registrar mais tarde. Se você tiver uma conta, faça o login agora para postar com sua conta.

Visitante
Responder esse tópico

×   Você colou conteúdo com formatação.   Remover formatação

  Only 75 emoji are allowed.

×   Seu link foi automaticamente inserido no corpo do post.   Exibir como um link

×   Seu conteúdo anterior foi restaurado.   Limpar conteúdo do editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Criar Novo...

Informação Importante

Usando este site, você concorda com nossos Termos de Uso e nossa Política de Privacidade.