Vendors Subroutines
Vendor master data and inquiry
Subroutine count: 2
Table of Contents
VB_VENDINQ.REV1
Signature: SUBROUTINE VB_VENDINQ(CO,REQTYPE,VNO,LIMIT,NUMBER,OUTDATA,MSG)
Source: S:\LinuxShare\pro3prog\VBBASE\VB_VENDINQ.REV1
| Property | Value |
|---|---|
| Status | [+] analyzed |
| Safety | [SAFE] safe |
| Pattern | Inquiry |
| Args | 7 |
| Description | Vendor AP history inquiry. Retrieves voucher/payment history by vendor, invoice number, or PO number with configurable row limit. |
| Safe REQTYPE | VENDOR, INVOICE, PO |
Arguments:
| Index | Name | Direction | Description |
|---|---|---|---|
| 0 | CO | in | Company number |
| 1 | REQTYPE | in | Query type: ‘VENDOR’ (by vendor), ‘INVOICE’ (by invoice number), ‘PO’ (by purchase order) |
| 2 | VNO | in | Vendor number |
| 3 | LIMIT | in | Maximum number of rows to return |
| 4 | NUMBER | in | Invoice or PO number (used when REQTYPE is ‘INVOICE’ or ‘PO’) |
| 5 | OUTDATA | out | Multi-valued result: <1>=voucher#, <2>=invoice#, <3>=PO#, <4>=invoice date, <5>=due date, <6>=net amount, <7>=check#, <8>=check date, <9>=check amount, <10>=entry date |
| 6 | MSG | out | Error/status message (empty on success) |
API Call Example:
POST /api/admin/subroutine/call
{
"name": "VB_VENDINQ.REV1",
"args": {
"0": "",
"1": "",
"2": "",
"3": "",
"4": ""
}
}VB_VIM.REV1
Signature: SUBROUTINE VB_VIM.REV1(CO,REQTYPE,VNO,VREC,V1287REC,ADDFLAG,MESSAGE)
Source: S:\LinuxShare\pro3prog\VBBASE\VB_VIM.REV1
| Property | Value |
|---|---|
| Status | [+] analyzed |
| Safety | [COND] conditional |
| Pattern | CRUD |
| Args | 7 |
| Description | Save or soft-delete vendor master records in VENDOR and VENDOR.1287 based on REQTYPE. Supports add, update, and delete operations with audit trail logging. |
| Dangerous REQTYPE | DELETE, SAVE |
Arguments:
| Index | Name | Direction | Description |
|---|---|---|---|
| 0 | CO | in | Company number |
| 1 | REQTYPE | in | Request type: ‘DELETE’ to soft-delete (sets VENDOR.1287 field 18 to ‘Y’), any other value to add/update |
| 2 | VNO | in | Vendor number (record key within company) |
| 3 | VREC | in | Vendor master record data as dynamic array (written to VENDOR on save) |
| 4 | V1287REC | in | Vendor 1287 record data as dynamic array (written to VENDOR.1287 on save) |
| 5 | ADDFLAG | in | Add flag: true if adding a new record, false if updating existing |
| 6 | MESSAGE | out | Result message: ‘WRITE SUCCEEDED’ or ‘DELETE SUCCEEDED’ |
Tables Written: VENDOR, VENDOR.1287
API Call Example:
POST /api/admin/subroutine/call
{
"name": "VB_VIM.REV1",
"args": {
"0": "",
"1": "",
"2": "",
"3": "",
"4": "",
"5": ""
}
}Last updated: 2026-02-05 11:29 PM