Línea de producto: | Microsiga Protheus | ||||
Segmento: | Servicios | ||||
Módulo: | Facturación | ||||
Rutina: |
| ||||
País(es): | Todos | ||||
Base(s) de datos: | Todos | ||||
Sistema(s) operativo(s): | Todos |
Descripción: | El propósito del punto de entrada MA490CALT es permitir o no cambiar las comisiones en la rutina de mantenimiento de comisiones. | ||||||||
Localización: | Actualizaciones/Diversos/Mant. De comisión | ||||||||
Eventos: | MA490CALT() --> lRet | ||||||||
Programa fuente: | MATA490.PRX | ||||||||
Parámetros: | Ninguno | ||||||||
Respuesta: |
|
Ejemplo:
#Include 'Protheus.ch'
User Function MA490CALT()
Local lRet := .T.
Local cUsuario := RetCodUsr()
If cUsuario == "000001"
Help(" ",1,"TESTE",,"Usuario sin permiso para modificar la comisión.", 3, 0)
lRet := .F.
EndIf
Return lRet