Descrição | Este Ponto de Entrada permite realizar a inclusão de botões e funções na tela de seleção de documentos de EDI, conforme necessidade específica do cliente. |
|---|---|
Observações | |
Exemplos | |
Preview | |
Veja também | |
Idioma | Português(Brasil) |
Versões | Versões_Anteriores |
Sistemas Operacionais Suportados | Todos |
Compatível com as Bases de Dados | Todas |
Updates | |
Parâmetros | Nenhum |
Retorno | Matriz contendo botões e funções conforme necessidades específicas. |
Eventos de chamada do Ponto de Entrada | |
Variáveis | |
Programa Fonte | TMSAE75.PRW |
#DEFINE EA_NFEID 36
User Function TME75BUT()
Local aBtn := {}
AAdd(aBtn, {'COMPTITL',{|| u_TME75PSQ(oListBox) }, "Pesq NFE ID", "Pesq NFE ID"})
Return aBtn
User Function TME75PSQ(oObj)
Local nPos := 0
MsgAlert( "Ponto de entrada", "TME75BUT" )
nPos := aScan(aItensEDI, {|x| x[EA_NFEID] == "999999999999"})
If nPos > 0
oObj:nAt := nPos
oObj:Refresh(.T.)
EndIf
Return Nil |