Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: | |
Função: | ATFA060 |
País: | Brasil |
Ticket: | Interno |
Requisito/Story/Issue | DSERCTR1-46748 |
O ponto de entrada AF060DES permite ao usuário realizar validações específicas relacionadas à filial de destino selecionada durante o processo de transferência de ativos.
A chamada deste ponto de entrada interrompe a validação do controle de permissões de acesso do usuário.
lRet := ExecBlock("AF060DES",.F.,.F.,{cFilDes,dUltDeprOr,dUltDeprDs}) |
#INCLUDE "PROTHEUS.CH" User Function AF060DES() Local lRetorno := .T. Local cFil := ParamIXB[1] // Filial de Destino Local dUltdOrig := ParamIXB[2] // Data ultima depreciação Origem Local dUltdDest := ParamIXB[3] // Data ultima depreciação Destino If MsgYesNo('AF060DES - Confirma a filial ' + cFil + ' como filial de destino?') lRetorno := .T. Else lRetorno := .F. EndIf Return lRetorno |
|