Árvore de páginas

Versões comparadas

Chave

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

...

Linha de Produto:

Protheus

Segmento:

Manufatura

Módulo:

SIGAPCP - Planejamento e Controle da Produção

Parâmetro(s):
NomeTipoDescriçãoDefaultObrigatórioReferencia
PARAMIXB[1]Caractere

Código da demanda que está importando os dados

PARAMIXB[2]ObjectModelo de dados com os registros atualizados


Idiomas:

Todos

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

...

Descrição:O ponto de entrada P136FIM permite o usuário realizar ações no final da importação de demandas.
Localização:

Função A136Import P136Import do fonte PCPA136PCPA136Imp.prw

Eventos:

Após a efetivação das importações no modelo de dadosimportações dos dados para uma demanda.

Programa Fonte:PCPA136PCPA136Impl.prw

Sintaxe:

P136FIM ( ) → Nil

Retorno:

Nil

Observações:Caso utilizado a opção "Atualizar Demandas" o ponto de entrada será chamado para cada demanda atualizada.
Bloco de código
languagec#
firstline1
titleExemplo
linenumberstrue
#INCLUDE "PROTHEUS.CH"  

User Function P136FIM()
    Local cDemanda   := ParamIxb[1]
    Local nIndex     := 0
    Local oModel     := ParamIxb[2]
    Local oModelGrid := oModel:GetModel("SVR_DETAIL")

    ConOut("Demanda: " + cDemanda)
    For nIndex := 1 To oModelGrid:length()
        ConOut("Data: " + DTOC(oModelGrid:GetValue("VR_DATA", nIndex)) +;
        " | Tipo: " + CvalToChar(oModelGrid:GetValue("VR_TIPO", nIndex)) +;
        " | Produto: " + AllTrim(oModelGrid:GetValue("VR_PROD", nIndex)) +;
        " | Quantidade: " + CValToChar(oModelGrid:GetValue("VR_QUANT", nIndex)))
    Next

Return Nil  AllTrim(cDemanda) + " importada com sucesso")

Return Nil