Histórico da Página
TTXACF - DT_PONTO_ENTRADA_A120SSER
Características do Requisito
Linha de Produto: | Protheus | ||||
Segmento: | Manufatura | ||||
Módulo: | Compras (SIGACOM) | ||||
Rotina: |
| ||||
País(es): | Todos | ||||
Banco(s) de Dados: | Todos | ||||
Sistema(s) Operacional(is): | Todos | ||||
Versões/Release: | 11.80 |
Ponto de Entrada
Descrição: | Localizada 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 variaveis aCab e aItens. |
Eventos: | O ponto de entrada A120SSER permite manipular as informações na tela de rateio por centro de custo no documento de entradaé executado quando é confirmado os eventos de incluir, alterar ou excluir |
Programa Fonte: | MATA120.PRX |
Função: | Todos |
Parametros: | 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