Línea de producto: | Microsiga Protheus® |
Segmento: | Backoffice |
---|---|
Módulo: | Financiero |
Función: | FINA080 – Bajas por pagar manual |
El punto de entrada F080BXVEND permite manejar las variables, al realizar una baja por el motivo VENDOR, después de informar el número del contrato.
Nombre | Tipo | Descripción |
Paramixb[1] | Carácter | Número del contrato del Vendor. |
Tipo | Descripción |
Array | Informaciones del Vendor. Estructura:
|
#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("Punto de entrada F080BXVEND") AADD( aBxVendo,{cBco,cAg,cPref,cNum,cParc,cTipo,dDataVenc,nTxAcres,cNatur,nValTit}) Return aBxVendo