| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Backoffice |
| Módulo: | Financeiro |
| Função: | FINA330 – Compensação de Contas a Receber |
O ponto de entrada FA330LIB permite manipular as opções que serão apresentadas na rotina Compensação de Contas a Receber. Possibilitando incluir opções customizadas, remover e/ou alterar opções padrão.
Nome | Tipo | Descrição |
|---|---|---|
| PARAMIXB[1] | Array | Opções padrão da rotina. |
Tipo | Descrição |
|---|---|
Array | Opções que serão apresentadas na rotina. |
#INCLUDE "TOTVS.CH"
User Function FA330LIB() as array
Local aRecebe := Paramixb[1] as array
Local aRetorno := {} as array
Local nCont := 0 as numeric
If FWAlertYesNo("Deseja remover a opção " + aRecebe[5,1] +"?","Ponto de entrada FA330LIB")
For nCont := 1 To Len(aRecebe)
If nCont != 5
AADD(aRetorno, aRecebe[nCont])
EndIf
Next
Else
aRetorno := aRecebe
EndIf
Return aRetorno |