Auxilio Creche (RESOLVIDO)

[wagnerls]

Ola pessoal, to precisando de uma ajuda pra criar uma formula que possa, atribuir uma ajuda de custo para os funcionários de um determinado sindicato,(trabalhamos com cinco sindicatos diferentes), que tenham filhos entre 05 meses ate 6 anos para que possam receber essa ajuda de custo, tenho uma formula que to tentando adaptar, mas não estou conseguindo alguém poderia me dar uma luz. o cidogo do sindicato é 0001 e a formula é a seguinte.

DECL DEP;

SETVAR(DEP,1);

SE NDEPIDADE(DEP,HOJE)<=6 entao 30

senao 0

fimse

[Luciano DP]

Bom dia Wagnerls, veja se esta te ajuda!

1º - Criar as fórmulas abaixo:

CÓDIGO: CHAPA

TÍTULO: CHAPA FUNCIONÁRIO

CONTEÚDO: CHAPA

CÓDIGO: COLIGADA

TÍTULO: CODCOLIGADA CORRENTE

CONTEÚDO: COLIGADACORRENTE

2º - Criar a Consulta SQL Abaixo:

CÓDIGO: DEPENDENTES

TÍTULO: NÚMERO DE DEPENDENTES

CONTEÚDO: SELECT MAX (NRODEPEND) NUM FROM PFDEPEND WHERE CHAPA=:FRM_CHAPA AND CODCOLIGADA=:FRM_COLIGADA

3º - Crie um valor fixo para que possamos fazer a multiplicação do número de dependentes pelo valor fixo cadastrado.

4º - Crie a Fórmula Abaixo:

Decl (DEP, CONT, NUM);

SE EXECSQL('DEPENDENTES') <> 0

ENTAO SETVAR(NUM,RESULTSQL('DEPENDENTES','NUM'))

SENAO SETVAR(NUM,0)FIMSE;SE CSIND='0001' e (TABPESSOA('SEXO','S') = 'F')

ENTAO SE (EXISTECF('0151') = 1) ENTAO /* P064 É O EVENTO DE AUX CRECHE CADASTRADO EM COD FIXOS*/

SETVAR(DEP,1);

SETVAR(CONT,0);

REPITA SE NDEPIDADE(DEP,ULTDIAMES(MTDATA(01,MES,ANO)))<6 ENTAO

SE TABDEP ('CARTAOVACINA' , 'S',DEP)='1' ENTAO

SETVAR(CONT,CONT+1)

SENAO

0

FIMSE

SENAO

0

FIMSE;

SETVAR(DEP,DEP+1) ATE DEP=NUM+1;

CONT * F('P064') /* DEFINIR QUAL O CÓDIGO DO VALOR FIXO CRIADO*/

SENAO

0

FIMSE

SENAO

0

FIMSE

Obs. Para esta fórmula eu defini que a flag de entregou cartão de vácina deve ser marcada para que a funcionário tenha o direito de recebimento do benefício, como também só dar o direito de receber aos funcionários do sexo feminino. Se no seu sindicato não exigir estas variavéis basta vc desconsiderar.

[wagnerls]

Bom dia, obrigado pela ajuda, fiz todas as orientações que você indicou, mas na hora de testar a formula ela apresenta o seguinte erro.

"Falha na formula CRECHE: consulta sql DEPENDENTES.

Erro: codigo de sentença SQL "DEPENDENTES", para coligada "1", Aplicação "P"

não foi encontrado.."

e como meu conhecimento na criação de formulas é quase nenhum, agradeceria muito uma ajuda.

o codigo fixo é - 0347

o valor fixo é - 0003

Editado 20 de Dezembro de 2012 por wagnerls

[Luciano DP]

Segue fórmula ajustada com od dados que vc passou, sobre a SQL, vc criou do mesmo modo que te mandei?

Decl (DEP, CONT, NUM);

SE EXECSQL('DEPENDENTES') <> 0

ENTAO SETVAR(NUM,RESULTSQL('DEPENDENTES','NUM'))

SENAO SETVAR(NUM,0)FIMSE;SE CSIND='0001' e (TABPESSOA('SEXO','S') = 'F')

ENTAO SE (EXISTECF('0347') = 1) ENTAO /* 0347 É O EVENTO DE AUX CRECHE CADASTRADO EM COD FIXOS*/

SETVAR(DEP,1);

SETVAR(CONT,0);

REPITA SE NDEPIDADE(DEP,ULTDIAMES(MTDATA(01,MES,ANO)))<6 ENTAO

SE TABDEP ('CARTAOVACINA' , 'S',DEP)='1' ENTAO

SETVAR(CONT,CONT+1)

SENAO

0

FIMSE

SENAO

0

FIMSE;

SETVAR(DEP,DEP+1) ATE DEP=NUM+1;

CONT * F('0003') /* DEFINIR QUAL O CÓDIGO DO VALOR FIXO CRIADO*/

SENAO

0

FIMSE

SENAO

0

FIMSE

Você deve colocar dentro do cadastro do funcionário nos códigos fixos o evento 0347 com o valor zerado e a quantidade de vezes 999.

[wagnerls]

Beleza, apos refazer todo processo, e ajustando as alterações que você enviou, FUNCIONOU tudo certo, do jeito que eu queria, Luciano DP, te agradeço demais essa ajuda, foi a "salvação da lavoura" e a oportunidade de participar de um forum como esse, que nos da uma opção de poder aprender e compartilhar as duvidas e sugestões.

abraços a todos.

[Luciano DP]

Blz, Wagnerls!

Estamos aqui pra isso compartilhar conhecimentos. Favor fechar o tópico como resolvido. Abs

[Flavia Faria]

Bom dia!!

Estou tentando utilizar esta formula, mas existe algumas particularidades que não estou conseguindo aplicar:

Na empresa existem 3 sindicatos e para cada um o calculo é diferente, sem contar que foi criado uma incidência específica para o Auxilio Creche. Esta incidência estando marcada, aí o sistema faz a checagem da idade do dependente (até 6 anos no mês que completa), qual sindicato o funcionário pertence e qual será o valor do auxilio creche. Os sindicatos não condicionam o pagamento do beneficio ao cartão de vacina e nem ao sexo do dependente.

Usando a formula por vcs apresentada, me ajudem a colocar essa estrutura na formula para calculo dos valores:

se CSIND ='02'

entao MINGA *0.20

SENAO

se CSIND='03'

ENTAO MINGA*0.10

SENAO

SE CSIND='01'

ENTAO F('AUCR')

SENAO 0

FIMSE

FIMSE

FIMSE

Grata.