MT200GRE - Permite gravar ou não uma nova revisão da estrutura

LOCALIZAÇÃO: Function - Ma200Fecha() - Gravação da estrutura.
EM QUE PONTO: Antes da gravação da nova revisão para a estrutura, permitindo gravar ou não uma nova revisão. Caso o retorno seja (.T.) ,  gravará normalmente a nova revisão, ou caso o retorno seja (.F.) não irá gerar uma nova revisão para a estrutura gravada.

MATA200.PRW

MT200GRE - Permite gravar ou não uma nova revisão da estrutura ( ) --> ExpL

ExpL(logico)
• Ao retornar .T.(verdadeiro), gravará normalmente uma nova revisão, sem exibir mensagem de aviso padrão.Ao retornar .F. (Falso), permitirá não gerar a nova revisão nas gravações da estrutura.

O ponto de entrada apenas é chamado quando configurada via F12, na tela da estrutura, a pergunta "Atualiza arq. de revisões?" = Sim, onde, em todas as gravações da estrutura será gravada uma nova revisão da mesma.
Se o ponto de entrada MT200GRE retornar .F. (Falso), permitirá não gerar a nova revisão nas gravações da estrutura.
Ao retornar .T.(verdadeiro), gravará normalmente uma nova revisão, sem exibir a mensagem de aviso padrão, exemplo: "...A alteração deve gerar uma nova revisão para esta estrutura ?"  (esta mensagem não será exibida).
 

User Function MT200GRELocal lGeraRev := .T.// Customizacoes do usuário, que poderá decidir se gera ou não uma nova revisao para a estrutura, na gravação.// Obs.: Retornando .T., gerará normalmente uma nova revisão.Return (lGeraRev)