laerton.silva
-
Total de itens
2 -
Registro em
-
Última visita
Sobre laerton.silva
Últimos Visitantes
324 visualizações
Conquistas de laerton.silva
-
Demonstrar Valor Da Grrf Na Folha Analitica
laerton.silva respondeu a um(a) Tópico iniciado por laerton.silva em [RM] Fórmulas dos Aplicativos
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 -
Demonstrar Valor Da Grrf Na Folha Analitica
laerton.silva postou um tópico no fórum [RM] Fórmulas dos Aplicativos
Prezados, alguém possui uma formula que demonstre o valor recolhido na GRRF. Colocarei essa formula para ser impressa na folha analítica.