---
title: cls801Document
summary: API reference for cls801Document.
status: draft
owner: SAIF Doc Gen
last_reviewed: 2026-07-28
library: SAIF.Business.Claim.Entry
reference_type: package
---

# cls801Document

`cls801Document` represents a document attached to an online 801 submission, including its file name, document type, image ID, sent date, and imaging status.*

## Purpose
- Tracks metadata for a single document associated with a claim-entry submission.*
- Identifies the document type and whether the file has been sent or imaged.

## Context
- Namespace: `Online801.Submission`
- Assembly/package: `SAIF.Business.Claim.Entry`

## Public members
| Member | Signature | Purpose |
| --- | --- | --- |
| `ONLINE_801_DOC_TYPE` | `Public Const ONLINE_801_DOC_TYPE = "1"` | Exposes the public member. |
| `SUPPLEMENTAL_801_DOC_TYPE` | `Public Const SUPPLEMENTAL_801_DOC_TYPE = "7"` | Exposes the public member. |
| `OTHER_DOC_TYPE` | `Public Const OTHER_DOC_TYPE = "8"` | Exposes the public member. |
| `FIRSTFILL_DOC_TYPE` | `Public Const FIRSTFILL_DOC_TYPE = "9"` | Exposes the public member. |
| `UPLOADED_801_DOC_TYPE` | `Public Const UPLOADED_801_DOC_TYPE = "10"` | Exposes the public member. |
| `DocumentID` | `Public ReadOnly Property DocumentID As Integer` | Returns document i d. |
| `FileName` | `Public Property FileName() As String` | Gets or sets file name. |
| `DocTypeCode` | `Public Property DocTypeCode() As String` | Gets or sets doc type code. |
| `DocTypeCodeDescr` | `Public Property DocTypeCodeDescr() As String` | Gets or sets doc type code descr. |
| `SentDate` | `Public Property SentDate() As Date` | Gets or sets sent date. |
| `ImageID` | `Public Property ImageID As Integer` | Gets or sets image i d. |
| `ClaimID` | `Public Property ClaimID As Decimal` | Gets or sets claim i d. |
| `CreateInfo` | `Public ReadOnly Property CreateInfo As clsRecordInfo` | Returns create info. |
| `UpdateInfo` | `Public ReadOnly Property UpdateInfo As clsUpdateInfo` | Returns update info. |
| `DocStatus` | `Public ReadOnly Property DocStatus As String` | Returns doc status. |
| `IsDocImaged` | `Public ReadOnly Property IsDocImaged As Boolean` | Returns is doc imaged. |
| `Load` | `Public Sub Load(ByVal inDPI As Framework.IDataPortalInfo, ByVal inRow As Framework.clsResultSet.DataRow) Implements Framework.ILoadable.Load` | Exposes the public member. |
| `New801Document` | `Public Shared Function New801Document(ByVal inDPI As IDataPortalInfo, ByVal claimID As Decimal, ByVal imageID As Integer) As cls801Document` | Executes the `New801Document` operation. |
| `DataPortalInfo` | `Public Property DataPortalInfo As Framework.IDataPortalInfo Implements Framework.IBusinessCriteria.DataPortalInfo` | Gets or sets data portal info. |
| `CreateSQL` | `Public ReadOnly Property CreateSQL As String Implements Framework.IBusinessCriteria.CreateSQL` | Returns create s q l. |
| `DeleteSQL` | `Public ReadOnly Property DeleteSQL As String Implements Framework.IBusinessCriteria.DeleteSQL` | Returns delete s q l. |
| `InsertSQL` | `Public ReadOnly Property InsertSQL As String Implements Framework.IBusinessCriteria.InsertSQL` | Returns insert s q l. |
| `RetrieveSQL` | `Public ReadOnly Property RetrieveSQL As String Implements Framework.IBusinessCriteria.RetrieveSQL` | Returns retrieve s q l. |
| `UpdateSQL` | `Public ReadOnly Property UpdateSQL As String Implements Framework.IBusinessCriteria.UpdateSQL` | Returns update s q l. |
| `New` | `Public Sub New(ByVal dpi As IDataPortalInfo)` | Executes the `New` operation. |

## Inherited public members

| Member | Signature | Purpose | Origin |
| --- | --- | --- | --- |
| `MyGuid` | `Public ReadOnly Property MyGuid() As String` | Returns the object's generated GUID identifier.† | `Legacy\BusinessObjectFramework` — `clsBusinessBase` |
| `IsNew` | `Public ReadOnly Property IsNew() As Boolean` | Indicates whether the object represents unsaved data.† | `Legacy\BusinessObjectFramework` — `clsBusinessBase` |
| `IsDeleted` | `Public ReadOnly Property IsDeleted() As Boolean` | Indicates whether the object has been marked for deletion.† | `Legacy\BusinessObjectFramework` — `clsBusinessBase` |
| `SetValueOnChange` | `Public Function SetValueOnChange(Of T)(ByRef inFieldValue As T, ByVal inSetValue As T, Optional ByVal inMarkDirty As Boolean = True) As Boolean` | Assigns a new field value only when it differs and optionally marks the object dirty.† | `Legacy\BusinessObjectFramework` — `clsBusinessBase` |
| `Rules` | `Public ReadOnly Property Rules() As clsRulesManager` | Exposes the BOF rules manager for validation and messages.† | `Legacy\BusinessObjectFramework` — `clsBusinessBase` |
| `Save` | `Public Overridable Function Save() As Boolean` | Persists the object through the BOF save pipeline.† | `Legacy\BusinessObjectFramework` — `clsBusinessBase` |
| `SaveChild` | `Public Overridable Function SaveChild() As Boolean` | Persists the object as a BOF child object.† | `Legacy\BusinessObjectFramework` — `clsBusinessBase` |
| `ToXml` | `Public Function ToXml() As String` | Returns the object's XML representation using the configured default tag name.† | `Legacy\BusinessObjectFramework` — `clsBusinessBase` |

## Behavioral notes
- This type is documented from its source declaration.
- The type participates in the `clsBusinessBase` inheritance path used by `SAIF.Business.Claim.Entry`.

## Constraints and usage notes
- Consumers should rely on the public members and BOF lifecycle patterns visible in the source file.

> **Note:** Statements marked with `†` are derived from dependency library documentation via the Legends CLI.

## Sources
- `Business\SAIF.Business.Claim.Entry\Online801\Submission\cls801Document.vb`
- `Legacy\BusinessObjectFramework\clsBusinessBase.vb`
