import.css=/download/attachments/327912/newLayout.css |
Ponto-de-Entrada: M030PALT - Validação da alteração de clientes.
Descrição:
Este ponto de entrada realiza validação de usuário, após a confirmação da alteração do cliente.
Programa Fonte
MATA030.PRX
Sintaxe
M030PALT - Validação da alteração de clientes. ( [ nOpca ] ) --> lExecuta
Parâmetros:
Retorno
Exemplos
User Function M030PALT()Local nOpcao := PARAMIXB[1]Local lRet := .T.If nOpcao == 1 If AllTrim(A1_EST) == "SP" If AllTrim(SA1->A1_MUN) <> "SÃO PAULO" Reclock("SA1", .F.) SA1->A1_MUN := "SÃO PAULO" SA1->(MsUnlock()) lRet := .F. EndIf EndIf EndIfReturn lRet
Variáveis
|