Linha Microsiga Protheus

Árvore de páginas

At190Grv - Manipula os registros a serem gravados na tabela SND (Responsáveis pelos Bens)

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

SIGAATF - Ativo Fixo

Rotina:

Rotina

Nome Técnico

ATFA190

Manutenção da amarração Ativo (N1) x Pessoas (R0)

Ponto de Entrada:

At190Grv

Chamados Relacionados

TUNSLL

País(es):

Todos

Banco(s) de Dados:

Todos homologados para o Protheus.

Tabelas Utilizadas:

SND - Responsáveis pelos Bens

Sistema(s) Operacional(is):

Todos homologados para o Protheus.

Descrição

O ponto de entrada At190Grv permiti  alterar os valores a serem gravados na tabela SND (Responsáveis pelos Bens)

 

Ponto de Entrada

Descrição:

Permiti  manipular os registros a serem gravados na tabela SND (Responsáveis pelos Bens)

Localização:

É uma rotina customizada, portanto, não faz parte do menu padrão.

Eventos:

If (ExistBlock("At190Grv"))
ExecBlock ("At190Grv",.F.,.F.,{nOpc})
EndIf

Programa Fonte:

ATFA190.PRW

Função:

AF190PE() - Localiza Pessoa no Browse do Cad. de Pessoas da tela de amarração disparada pelo cadastro de bens

Retorno:

Retorna os novos registros gravados na tabela SND (Responsáveis pelos Bens)

 

Exemplo:

User Function At190Grv()

Local cCodResp := '000002' //Atribui um código a variável cCodResp

RecLock("SND",.F.) 

SND->ND_CODRESP := cCodResp //Atribui o conteúdo da variável ao campo ND_CODRESP

SND->(MsUnlock())

Return .T.