MTI030NOM - permite a inclusão de campos customizados no array

O Ponto de Entrada MTI030NOM é executado após as tratativas de recebimento da mensagem CUSTOMERVENDOR. É possível incluir campos customizados no array que é direcionado para a execauto do MATA030.

User Function MTI030NOM()
Local aNome := aClone(Paramixb[1])
Local cNome := Paramixb[2]

conout("passou no PE MTI030NOM")
aAdd(aNome, {"A1_NOMECOM", cNome, Nil})

aRet := aClone(aNome)

Return aRet

Português(Brasil)

Versões_Anteriores

Todos

Todas

Return aRet

If ExistBlock("MTI030NOM")
aRetPe := ExecBlock("MTI030NOM",.F.,.F.,{aCliente,oXML:_TOTVSMessage:_BusinessMessage:_BusinessContent:_Name:Text})
If ValType(aRetPe) == "A" .And. Len(aRetPe) >0
If ValType(aRetPe) == "A"
aCliente := aClone(aRetPe)
EndIf
EndIf
EndIf

MATI030.PRW