FT300SPR - Ponto de entrada executado após selecionar a proposta vencedora
Características do Requisito
Linha de Produto: | Microsiga Protheus® |
Segmento: | Serviços |
Módulo: | Faturamento |
Versões/Release: | 12.1.7 |
Ponto de Entrada
Descrição: | Executa-se o ponto de entrada FT300SPR, no momento da gravação da Oportunidade de Venda, após selecionar a proposta vencedora, quando a oportunidade possuir mais de uma proposta. | ||||||||
Localização: | CRM-Adm Vendas\Oportunidades | ||||||||
Eventos: | FT321LOK( [ oModel ] [cCodProp]) --> lRet | ||||||||
Programa Fonte: | FATN300.PRX | ||||||||
Parâmetros: | PARAMIXB[1] - Objeto --> Modelo de dados da oportunidade | ||||||||
Retorno: |
|
Exemplo:
#Include 'Protheus.ch'
User Function Ft300SPR()
Local lRet := .T.
Local oModel := PARAMIXB[1] //Modelo de Dados Ativo
Local cCodProp := PARAMIXB[1] //Codigo da Proposta Vencedora
Local aDependencia := oModel:ADEPENDENCY //Obtem as dependencias do modelo de dados
Local oMdlAd1 := oModel:GetModel(aDependencia[1][1]) //Seta o modelo de dados do cabeçalho da proposta(AD1MASTER)
Local cCodOpor := oMdlAd1:GetValue("AD1_NROPOR") //Obtém o numero da oportunidade
Help(,,"Ft300SPR",,"Ponto de entrada Ft300SPR executado na oportunidade " + cCodOpor ,1,0)
lRet := .F.
Return lRet