Cross Segmentos - TOTVS BackOffice (Línea Protheus) MI - Compras (SIGACOM) - Punto de entrada para validar ítem de comprobante - MT100LOK (LOCXNF)

Duda
¿Cuál es el punto de entrada para validar los ítems de un comprobante?

Ambiente

Cross Segmentos - TOTVS BackOffice (Línea Protheus) MI - Compras (SIGACOM) - A partir de la versión 11

Solución
Se habilito el punto de entrada MT100LOK, con el objetivo de permitir agregar validaciones en cada uno de las líneas de un comprobante. El punto de entrada es detonado al cambiar de línea en la inclusión del comprobante.

La función de usuario regresa un valor de tipo lógico (Verdadero = .T. o False = .F.).

Si la función de usuario MT100LOK regresa el valor False (.F.) no se permitirá cambiar de linea.

Ejemplo:

User Function MT100LOK() 
Local lOk := .T.
Local nLinVal := n 

    If MsgYesNo("¿Desea continuar?", "MT100LOK")
       lOk := .T.
    Else
       lOk := .F.
    EndIf 

    MsgAlert("Rutina: " + Alltrim(Funname()) + " - PE: MT100LOK" + " Linea " + Str(n))
 
Return(lOK)

Importante

Este punto de entrada puede ser detonado con la función de usuario LOCXPE17.

Conozca más:
Para adquirir más conocimiento, acceda al siguiente enlace del portal TDN:
MT100LOK – Valida ítem de comprobante.