Histórico da Página

Ponto de entrada TMKXCTET com retorno em array, sendo o 1o. Elemeto lógico que define a permissão de alteração/inclusão de contatos e o 2o. Elemento array, contendo os campos que o usuário poderá alterar dos contatos.

TMKXFUNE

TMKXCTET - Retorno em array ( [ @Entidade ], [ @Chave ], [ @Origem ], [ @Campos SU5 ] )

(array_of_record)
• 1o. Elemento Lógico2o. Elemento ArrayO retorno dos dois elementos é obrigatório.

Obrigatoriamente deve-se retornar um array, com o 1o. Elemento Lógico e o 2o. Elemento Array

#Include "Protheus.ch"User Function TMKXCTET()Local cEntidade	:= ParamIXB[1]Local cChave		:= ParamIXB[2]Local nOrigem		:= ParamIXB[3]Local aAlterSU5	:= ParamIXB[4]lIncCONT := Aviso("Passou no ponto TMKXCTET","Entidade:"+cEntidade+" Chave:"+cChave+;                  "Origem:"+StrZero(nOrigem,2)+CHR(10)+CHR(13)+" Pode alterar contato ?",{"Sim","Não"},2) == 1                  If !lIncCONT	aAlterSU5 := {}EndIfReturn {lIncCONT,aAlterSU5}