Versões comparadas

Chave

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

01. GENERAL DATA

Product:

TOTVS Backoffice

Product Line:

Protheus Line

Industry:

Services

Module:

TOTVS Backoffice (Protheus Line) - Fixed Assets (SIGAATF)

Function:

ATFA060

Country:

Brazil

Ticket:

Internal

Requisite/Story/Issue

DSERCTR1-46748

02. DESCRIPTION

You can use the entry point AF060DES to perform specific validations related to the target branch selected during the asset transfer process.

The call of this entry point stops the validation of the user access permissions control.

03. OTHER INFORMATION

Bloco de código
languagecpp
themeRDark
titleHandling of EP in the system
lRet := ExecBlock("AF060DES",.F.,.F.,{cFilDes,dUltDeprOr,dUltDeprDs})

...

Bloco de código
languagecpp
themeRDark
titleEP Example
#INCLUDE "PROTHEUS.CH"

User Function AF060DES()

      Local lRetorno := .T.
      Local cFil := ParamIXB[1] // Target Branch
      Local dUltdOrig := ParamIXB[2] // Last depreciation date Source
      Local dUltdOrig := ParamIXB[3] // Last depreciation date Target

      If MsgYesNo('AF060DES - Confirm the branch ' + cFil + ' as target branch?')
            lRetorno := .T.
      Else
            lRetorno := .F.
      EndIf

Return lRetorno

...