Árvore de páginas

Criação do ponto de entrada F402SEMA na versão 12

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

Financeiro

Função:

FINA402A

Situação/Requisito:

A rotina está gerando sempre o primeiro registro na semana 01 e o restante acumulando na semana 02, sendo que o autônomo é mensalista.

Solução/Implementação:

Devido as várias formas de utilização do campo RC_SEMANA, foi disponibilizado o ponto de entrada F402SEMA que permite retornar o conteúdo a ser gravado em RC_SEMANA, acumulando assim conforme cliente desejar.  Para mais detalhes acesse: 

DT_F402SEMA_Altera_RC_SEMANA

Chamados relacionados:

TVFVL2

F402SEMA - Permite alterar o conteúdo a ser gravado em RC_SEMANA

Descrição:

Disponibilizado ponto de entrada para permitir alterar o conteúdo da semana que será gravada na tabela SRC no campo RC_SEMANA ao gerar os dados do financeiro para a SEFIP. 

Obs: Atualmente a rotina gera o primeiro registro na SRC como semana 01 e o restante acumulado na semana 02.

Localização:

Miscelânea > Arquivos

Eventos:

Gera Dados SEFIP

Programa Fonte:

FINA402A

Função:

Financeiro

Retorno:

Nome

Tipo

Descrição

Obrigatório

 cSemana

Caracter 

 Conteúdo a ser gravado em RC_SEMANA

Sim 

 

 

#Include 'Protheus.ch'

User Function F402SEMA()
Local cSemana := Paramixb[1]
Local nRecnoSE2 := Paramixb[2]

SE2->(DbGoto(nRecnoSE2))  // posiciona no titulo

//já está posicionado na SRA
If SRA->RA_TIPOPGT == "M" .and. cSemana <> "0" .and. SE2->E2_TIPO == MVNOTAFIS
     cSemana := "0"
EndIf

Alert("Executou o PE F402SEMA: " + cSemana)
Return cSemana