| Composition Setup |
|---|
import.css=/download/attachments/327912/newLayout.css |
| Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: QD030BTAV - Adiciona Botão na Aba Avisos e função de usuário
Descrição: Este ponto de entrada adiciona um botão na aba Avisos em pendências e ao acionar o botão executa a função definida pelo usuário. Programa Fonte QDOA030.PRW Sintaxe QD030BTAV - Adiciona Botão na Aba Avisos e função de usuário ( [ ParamIXB ] ) --> NIL Parâmetros:
Retorno
Exemplos #Include "protheus.ch"User Function QD030BTAV() Local nPos := val(cvaltochar (paramixb[2])) Local cDoc := substr(ParamIxb [1,nPos,3],1,16) Local cRv := substr(ParamIxb [1,nPos,4],1,3) dbselectarea("QDH") dbsetorder(1) If QDH->(DBSEEK(xfilial("QDH")+cDoc+cRv)) Alert ("Cod.Doc : "+cDoc+" Rv: "+cRv+" Titulo Doc.: "+QDH->QDH_TITULO) EndiFReturn Nil Variáveis
|
