Árvore de páginas

Linha de Produto:

Protheus

Segmento:

Manufatura

Módulo:

SIGACOM - Compras

Rotina:

Rotina

Nome Técnico

Pedido de Compras

MATA120

País(es):

Todos

Banco de Dados:

Todos

Sistemas Operacionais:

Todos

Release:

12.1.7

Ponto de Entrada

Descrição:

O Ponto de Entrada está localizado na função responsável em integrar o Pedido de Compras com o produto SISCOSERV. 
Este Ponto de Entrada tem por finalidade manipular o conteúdo do Pedido de Compras que será atualizado ao Pedido de Serviços através das variáveis aCab e aItens.

Eventos:

O ponto de entrada A120SSER é executado quando são confirmados os eventos de Incluir, Alterar ou Exclui.

Programa Fonte:

MATA120.PRX

Função:

Function IntPCSserv

Parâmetros:Nenhum

Retorno:

Nenhum


Exemplo:

#INCLUDE "Protheus.ch"

User Function A120SSER()
Local nPos1 := 0
Local nPos2 := 0
Local cMensagem := ""

nPos1 := Ascan(aCab,{|x| x[1] == "EJW_EXPORT"})
nPos2 := Ascan(aItens[1],{|x| x[1] == "EJX_ITEM"})

cMensagem := ""
cMensagem += "Conteudos de EJW_EXPORT na variavel aCab "+ aCab[nPos1,2]+CHR(13)+CHR(10)
cMensagem += "e EJX_ITEM na variavel aItens[1] "+ aItens[1,nPos2,2]

Alert(cMensagem)

Return