...
| Linha Línea de Produtoproducto: | Microsiga Protheus® |
|---|---|
Segmento: | Backoffice |
Módulo: | Financeiro Financiero |
| Função Función: | Finxfin |
...
O ponto El punto de entrada F040FMP permite complementar a gravação do la grabación del título de FUMIPEQ gerado no contas a receber generado en el cuentas por cobrar.
...
| Nome Nombre | Tipo | Descrição Descripción |
|---|---|---|
PARAMIXB | Numérico | Posição do titulo principal na tabela Situación del título principal en la tabla SE1 (recno). |
...
Não No se aplica.
...
...
| Bloco de código | ||||
|---|---|---|---|---|
| ||||
#INCLUDE "TOTVS.CH" User Function F040FMP() Local nRecnoSE1 := PARAMIXB as numeric //PosicaoSituación dodel titulotítulo principal (recno) Local aPEArea := GetArea() as array Local aPEAreaSE1 := SE1->(GetArea()) as array //-------------------------------------- // TituloTítulo dode FUMIPEQ (estaestá posicionadomarcado) //-------------------------------------- If RecLock("SE1",.F.) SE1->E1_CPOUSER := "XYZ" SE1->(MsUnLock()) EndIf //-------------------------------------- // Titulo principal //-------------------------------------- SE1->(DbGoTo(nRecnoSE1)) If RecLock("SE1",.F.) SE1->E1_CPOUSER := "XPTO" SE1->(MsUnLock()) EndIf RestArea(aPEAreaSE1) RestArea(aPEArea) Return nil |
...