Puntos de entrada

Los puntos de entrada tienen como objetivo dejar el sistema flexible, permitiendo una gran variedad de desarrollo por los analistas de soporte, de acuerdo con la necesidad de cada tipo de cliente/implantación.
XXYYYZZZZ
XX - Iniciales del módulo.
YYY - Código secuencial del programa. Mantenga el estándar de numeración de 10 en 10.
ZZZZ - Nombre dado al punto de entrada.
Ejemplos:

Para crear y utilizar los puntos de entrada, debemos tener en mente:

• Analizar el motivo de la creación del punto, porque es importante crearlo en un punto que sea útil, no redundante y que atienda a las condiciones del cliente.
• De ninguna manera debe utilizarse el punto de entrada para corregir eventuales fallas en el sistema.
• Tampoco deben incluirse puntos de entrada en un proceso crítico del sistema, porque ocasionará resultados imprevisibles.
• Es imprescindible la utilización de la función ExistBlock() que verifica la existencia en el punto de entrada del repositorio, además de condicionar su ejecución.
• No tratar el punto de entrada con find function y user function.
• No es necesario realizar el cache de la existencia de un determinado punto de entrada, la función ExistBlock realiza este trabajo.

Ejemplo:
// EntrancePointExample.prw
#INCLUDE "TOTVS.CH"
Function EntrancePointExample()
While SA1->(EOF())
If ExistBlock("SAVECLI")
ExecBlock("SAVECLI", .F., .F., aParam)
EndIf
SA1->(DbSkip())
EndDo
Return