| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Backoffice |
| Módulo: | Financeiro |
| Função: | FINA050 – Contas a Pagar |
O ponto de entrada F50CARTMP1 serve para incluir campos de usuário na carga do rateio simples pré-configurado.
| Nome | Tipo | Descrição |
|---|---|---|
| PARAMIXB[1] | Caracter | Lançamento padrão. |
| PARAMIXB[2] | Numérico | Tipo de rateio (1=digitado; 2=pré-configurado). |
| PARAMIXB[3] | Caracter | Nome do programa. |
Não se aplica.
#INCLUDE "TOTVS.CH"
USER FUNCTION F50CARTMP1()
Local cPadrao := PARAMIXB[1] as character
Local nTipo := PARAMIXB[2] as numeric
Local cProg := PARAMIXB[3] as character
Aviso("Atenção", "Exemplo de Utilização PE: F50CARTMP1 LP:" + cPadrao + " Programa:" + cProg, {"Ok"})
If nTipo == 1 // inclusão de rateio simples
// neste caso está carregando o campo de usuário TMP1->CTJ_DOCSUN
TMP1->CTJ_DOCSUN := CTJ->CTJ_DOCSUN
EndIf
Return |