Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 9

changes.mady.by.user Marcio Rogerio Menon

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Marcio Rogerio Menon

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Portuguese

Pagetitle
M030SAO - Gravação das Referências do Cliente
M030SAO - Gravação das Referências do Cliente

Ponto-de-Entrada: M030SAO - Gravação das Referências do Cliente


Descrição:

Este ponto de entrada é executado no momento da gravação das "Referências" do Cadastro de Clientes, que se encontra no botão "Outras Ações\Referências".

Programa Fonte:
MATN030.PRW

Sintaxe:

M030SAO ( [ nOpcao ] ) --> Nil


Parâmetros:


NomeTipoDescrição
nOpcaoNuméricoTipo de Operação, sendo: 3- Inclusão, 4- Alteração e 5- Exclusão.


Retorno:
Nil - Nenhum

Exemplo:


Bloco de código
languagejs
linenumberstrue
User Function M030SAO()

Local _nOpcao := PARAMIXB[1]    //Tipo de Operação: 3- Inclusão, 4- Alteração e 5- Exclusão

//Gravando uma observação na inclusão de uma referência do tipo "2-Empresa".
If _nOpcao == 3 .And. SAO->AO_TIPO == "2"   //1=Instituição, 2=Empresa e 3=Banco
    RecLock("SAO",.F.)
    SAO->AO_OBSERV := "GRAVANDO A REFERÊNCIA DE EMPRESA"
    MsUnlock()
EndIf

Return Nil