BOS外部调用接口详解：单据保存功能及参数

本篇文章主要介绍了BOS（Business Operating System）单据外部调用接口的一种具体实现，针对的是BOS单据外部保存接口。该接口在VBScript环境下编写，用于将数据保存至BOS系统，主要功能是处理业务流程中的单据创建或更新操作。以下是接口的主要组成部分和步骤： 1. **接口名称与参数**: - "Private Sub NoUISaveBill(ByVal lClassTypeID As Long)" 是一个私有方法，接收一个参数 `lClassTypeID`，它代表了BOS单据的类型ID。这个ID用于确定要保存的单据模板类型。 2. **对象实例化**: - 通过 `Dim` 关键字声明了多个对象变量，如 `oDataSrv` (用于数据服务)，`oTableInfo` (表元信息)，`oData` (存储单据数据)，`oSrv` (可能与服务器交互)，`oPage2` (表页对象) 和索引变量 `i` 和 `lMaxEntryID`。 3. **连接和初始化**: - 使用 `Dim sDsnAsString` 声明了一个字符串变量 `sDsn` 用于存储数据库连接字符串。`lMaxEntryIDAsLong` 初始化变量，用于设置最大记录条数，此处设置为10，表示最多保存10条分录。 4. **获取BOS单据对象**: - 调用 `Set oDataSrv = CreateObject("K3ClassTpl.DataSrv")` 创建一个 `DataSrv` 对象，设置其 `ClassTypeID` 为传入的 `lClassTypeID`，然后获取对应的表信息。 5. **创建并填充单据数据**: - 使用 `GetEmptyBill` 方法获取BOS单据的初始数据结构，然后循环 `lMaxEntryID` 次，为每个分录创建新的 `oPage2` 对象，并设置其分录号 (`_-0001_FIndex2`)、表头字段值（如FInteger字段的值）以及表体字段值。这里以基础资料类型字段物料为例，设置了 `FBase` 字段的保存值和查找值。 6. **错误处理**: - 使用 `On Error GoTo err_ctr` 添加错误处理机制，以便在出现错误时跳转到指定的错误处理部分。 这个接口提供了一种自动化的方式，使开发者能够通过外部程序与BOS系统交互，保存自定义的单据数据。对于开发人员来说，理解并掌握如何根据业务需求调用这类接口，是实现与BOS集成的关键。通过这种方式，可以提高效率，减少手动操作，适用于需要批量处理单据或者需要在不同系统间传递数据的场景。