| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Backoffice |
| Módulo: | Financeiro |
| Função: | FINA080 – Baixas Pagar Manual |
O ponto de entrada F080BXVEND permite manipular as variáveis, quando realizada uma baixa pelo motivo VENDOR, após informar o número do contrato.
Nome | Tipo | Descrição |
|---|---|---|
Paramixb[1] | Caracter | Número do Contrato do Vendo. |
Tipo | Descrição |
|---|---|
Array | Informações do Vendor. Estrutura:
|
#INCLUDE "TOTVS.CH"
User Function F080BXVEND(cContrato) as array
Local cPEContr := Paramixb[1] as character
Local cBco := '001' as character
Local cAg := '001' as character
Local cPref := '001' as character
Local cNum := '001' as character
Local cParc := '0' as character
Local cTipo := 'NF' as character
Local dDataVenc := CTOD('31/12/2024') as date
Local nTxAcres := 22 as numeric
Local cNatur := '002' as character
Local nValTit := 33 as numeric
Local aBxVendo := {} as array
FwAlertInfo("Ponto de entrada F080BXVEND")
AADD( aBxVendo,{cBco,cAg,cPref,cNum,cParc,cTipo,dDataVenc,nTxAcres,cNatur,nValTit})
Return aBxVendo |