Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

01. 

...

DATOS GENERALES

Linha ProdutoFinanceiroFunção – Contas a Pagar

Línea de

producto:

Microsiga Protheus®

Segmento:

Backoffice

Módulo:

Financiero

Función:

FINA050

- Cuentas por pagar

02. 

...

DESCRIPCIÓN

O ponto El punto de entrada F050SES permite a alteração de títulos após a gravação do F050SES permite la modificación de títulos después de la grabación del título SEST.

03. 

...

PARÁMETROS

NomeDescrição do

Nombre

Tipo

Descripción

PARAMIXB

Numérico

Recno

del título principal

04.

...

DEVOLUCIÓN

Não No se aplica.

05. 

...

EJEMPLO DE

...

UTILIZACIÓN


Bloco de código
themeMidnight
titleF050SES
#INCLUDE 'TOTVS.CH'

User Function F050SES()

Local _nRecsest:= PARAMIXB as numeric//Recno dodel Título Originaloriginal
Local _cPrefix := SE2->E2_PREFIXO as character
Local _cNum := SE2->E2_NUM as character
Local _cParc := SE2->E2_PARCELA as character
Local _cTipo := SE2->E2_TIPO as character

AVISO("PE.F050SES","EXECUCAOEJECUCIÓN DODEL PE. F050SES, GRAVACOESGRABACIÓN DE INFORMACIONES INFORMACOESEN NOEL TITULOTÍTULO SEST",{"OK"})

//POSICIONOMARCO EN NOEL TITULOTÍTULO SEST
DbSelectArea("SE2")
SE2->(DbGoTop())
If(SE2->(DbSeek(xFilial("SE2")+_cPrefix+_cNum+_cParc+"SES")))

RecLock("SE2",.F.)
SE2->E2_HIST := "TEXTO PE. F050SES"
MsUnlock()

Endif
//VOLTOVUELVO A SE2 PARAAL O TITULOTíTULO ORIGINAL
SE2->(DbgoTo(_nRecsest))

Return