---
id: object/codeunit/6041
type: object
title: Codeunit 6041 "Service Document Archive Mgmt."
summary: Codeunit 6041 "Service Document Archive Mgmt." in Base Application (Microsoft.Service.Archive). 5 public procedures, 38 events. Introduced in BC25, still in BC30.
tier: official
language: en
tags:
  - codeunit
  - base application
versions:
  introduced: "25"
  last_changed: null
  deprecated: null
review:
  state: derived
  by: null
  at: null
  flags: []
generated:
  at: "2026-10-11T00:31:51.816Z"
  pipeline: 0.2.0
  prompts: {}
  input_hash: 0406ac43d636274b3664f4774fef57c50d947725207e1491c0959dc72b67c9e8
evidence:
  - kind: code
    url: https://github.com/microsoft/BCApps/blob/ea08af5ef2d6a9b5c5af4a029288abbe2c883220/src/Layers/W1/BaseApp/Service/Archive/ServiceDocumentArchiveMgmt.Codeunit.al
    title: src/Layers/W1/BaseApp/Service/Archive/ServiceDocumentArchiveMgmt.Codeunit.al (releases/29.x)
    date: null
    commit: ea08af5ef2d6a9b5c5af4a029288abbe2c883220
    t: null
    quote: null
links:
  learn: []
  objects: []
  features: []
  topics: []
  localizations: []
  videos: []
  posts: []
  guidelines: []
object_type: codeunit
object_id: 6041
name: Service Document Archive Mgmt.
namespace: Microsoft.Service.Archive
app: Base Application
extends: null
first_version: "25"
last_version: "30"
present_in:
  - "25"
  - "26"
  - "27"
  - "28"
  - "29"
  - "30"
changed_in: []
source_major: "29"
obsolete: null
countries: []
ms_search_form_ids: []
counts:
  fields: 0
  procedures: 48
  events: 38
  subscribers: 0
relations:
  out: 0
  referenced_by: 0
  pages: 0
  extended_by: 0
  event_subscribers: 1
  calls: 3
  called_by: 3
  implements: 0
---

# Codeunit 6041 "Service Document Archive Mgmt."

> Codeunit 6041 "Service Document Archive Mgmt." in Base Application (Microsoft.Service.Archive). 5 public procedures, 38 events. Introduced in BC25, still in BC30.

Base Application · Microsoft.Service.Archive · BC25-30 · [source at ea08af5e](https://github.com/microsoft/BCApps/blob/ea08af5ef2d6a9b5c5af4a029288abbe2c883220/src/Layers/W1/BaseApp/Service/Archive/ServiceDocumentArchiveMgmt.Codeunit.al) · facts from BC29

## Properties

| Property | Value |
|---|---|
| Permissions | tabledata "Service Header Archive" = ri, tabledata "Service Item Line Archive" = ri, tabledata "Service Line Archive" = ri, tabledata "Service Comment Line Archive" = ri, tabledata "Service Order Allocat. Archive" = ri |

## Events published

- `OnAfterStoreServiceLineArchive(var ServiceHeader: Record "Service Header"; var ServiceLine: Record "Service Line"; var ServiceHeaderArchive: Record "Service Header Archive"; var ServiceLineArchive: Record "Service Line Archive")` (integration)
  - subscribers: [Codeunit 6610 "FS Int. Table Subscriber"](../codeunit/6610.md) OnAfterStoreServiceLineArchive
- `OnAfterStoreServiceDocument(var ServiceHeader: Record "Service Header"; var ServiceHeaderArchive: Record "Service Header Archive")` (integration)
- `OnAfterServiceHeaderArchiveInsert(var ServiceHeaderArchive: Record "Service Header Archive"; ServiceHeader: Record "Service Header")` (integration)
- `OnStoreServiceDocumentCommentsOnBeforeServiceCommentLineArchInsert(var ServiceCommentLineArchive: Record "Service Comment Line Archive"; ServiceCommentLine: Record "Service Comment Line")` (integration)
- `OnBeforeAutoArchiveServiceDocument(var ServiceHeader: Record "Service Header"; var IsHandled: Boolean)` (integration)
- `OnBeforeArchServiceDocumentNoConfirm(var ServiceHeader: Record "Service Header"; var IsHandled: Boolean)` (integration)
- `OnBeforeArchiveServiceDocument(var ServiceHeader: Record "Service Header"; var IsHandled: Boolean)` (integration)
- `OnAfterAutoArchiveServiceDocument(var ServiceHeader: Record "Service Header")` (integration)
- `OnBeforeStoreServiceDocument(var ServiceHeader: Record "Service Header"; var IsHandled: Boolean)` (integration)
- `OnBeforeServiceHeaderArchiveInsert(var ServiceHeaderArchive: Record "Service Header Archive"; ServiceHeader: Record "Service Header")` (integration)
- `OnBeforeServiceItemLineArchiveInsert(var ServiceItemLineArchive: Record "Service Item Line Archive"; ServiceItemLine: Record "Service Item Line")` (integration)
- `OnBeforeServiceLineArchiveInsert(var ServiceLineArchive: Record "Service Line Archive"; ServiceLine: Record "Service Line")` (integration)
- `OnBeforeGetNextVersionNo(TableId: Integer; ServiceDocumentType: Enum "Service Document Type"; DocNo: Code[20]; DocNoOccurrence: Integer; var VersionNo: Integer; var IsHandled: Boolean)` (integration)
- `OnGetNextVersionNo(TableId: Integer; ServiceDocumentType: Enum "Service Document Type"; DocNo: Code[20]; DocNoOccurrence: Integer; var VersionNo: Integer)` (integration)
- `OnGetNextOccurrenceNo(TableId: Integer; ServiceDocumentType: Enum "Service Document Type"; DocNo: Code[20]; var OccurenceNo: Integer)` (integration)
- `OnBeforeRestoreServiceDocument(var ServiceHeaderArchive: Record "Service Header Archive"; var IsHandled: Boolean)` (integration)
- `OnBeforeCheckIfDocumentIsPartiallyPosted(var ServiceHeaderArchive: Record "Service Header Archive"; var DoCheck: Boolean; var RestoreDocumentWithoutConfirmation: Boolean)` (integration)
- `OnRestoreDocumentOnBeforeDeleteServiceHeader(var ServiceHeader: Record "Service Header"; var SkipDeletingLinks: Boolean)` (integration)
- `OnRestoreDocumentOnAfterDeleteServiceHeader(var ServiceHeader: Record "Service Header")` (integration)
- `OnBeforeServiceHeaderInsert(var ServiceHeader: Record "Service Header"; ServiceHeaderArchive: Record "Service Header Archive")` (integration)
- `OnRestoreServiceDocumentOnAfterServiceHeaderInsert(var ServiceHeader: Record "Service Header"; var ServiceHeaderArchive: Record "Service Header Archive")` (integration)
- `OnRestoreServiceDocumentOnBeforeServiceHeaderValidateFields(var ServiceHeader: Record "Service Header"; ServiceHeaderArchive: Record "Service Header Archive")` (integration)
- `OnAfterTransferFromArchToServiceHeader(var ServiceHeader: Record "Service Header"; var ServiceHeaderArchive: Record "Service Header Archive")` (integration)
- `OnAfterRestoreServiceDocument(var ServiceHeader: Record "Service Header"; var ServiceHeaderArchive: Record "Service Header Archive"; var ShowMessage: Boolean)` (integration)
- `OnRestoreServiceLinesOnAfterServiceItemLineArchiveSetFilters(var ServiceItemLineArchive: Record "Service Item Line Archive"; var ServiceHeaderArchive: Record "Service Header Archive"; ServiceHeader: Record "Service Header")` (integration)
- `OnRestoreServiceLinesOnAfterServiceLineArchiveSetFilters(var ServiceLineArchive: Record "Service Line Archive"; var ServiceHeaderArchive: Record "Service Header Archive"; ServiceHeader: Record "Service Header")` (integration)
- `OnRestoreServiceLinesOnBeforeServiceItemLineInsert(var ServiceItemLine: Record "Service Item Line"; var ServiceItemLineArchive: Record "Service Item Line Archive")` (integration)
- `OnRestoreServiceLinesOnBeforeServiceLineInsert(var ServiceLine: Record "Service Line"; var ServiceLineArchive: Record "Service Line Archive")` (integration)
- `OnRestoreServiceLinesOnAfterServiceItemLineInsert(var ServiceItemLine: Record "Service Item Line"; var ServiceItemLineArchive: Record "Service Item Line Archive")` (integration)
- `OnRestoreServiceLinesOnAfterServiceLineInsert(var ServiceLine: Record "Service Line"; var ServiceLineArchive: Record "Service Line Archive")` (integration)
- `OnAfterTransferFromArchToServiceItemLine(var ServiceItemLine: Record "Service Item Line"; var ServiceItemLineArchive: Record "Service Item Line Archive")` (integration)
- `OnAfterTransferFromArchToServiceLine(var ServiceLine: Record "Service Line"; var ServiceLineArchive: Record "Service Line Archive")` (integration)
- `OnAfterRestoreServiceItemLine(var ServiceHeader: Record "Service Header"; var ServiceItemLine: Record "Service Item Line"; var ServiceHeaderArchive: Record "Service Header Archive"; var ServiceItemLineArchive: Record "Service Item Line Archive")` (integration)
- `OnAfterRestoreServiceLine(var ServiceHeader: Record "Service Header"; var ServiceLine: Record "Service Line"; var ServiceHeaderArchive: Record "Service Header Archive"; var ServiceLineArchive: Record "Service Line Archive")` (integration)
- `OnAfterRestoreServiceLines(var ServiceHeader: Record "Service Header"; var ServiceItemLine: Record "Service Item Line"; var ServiceHeaderArchive: Record "Service Header Archive"; var ServiceItemLineArchive: Record "Service Item Line Archive")` (integration)
- `OnRestoreServiceLineCommentsOnBeforeInsertServiceCommentLine(var ServiceCommentLine: Record "Service Comment Line")` (integration)
- `OnRestoreServiceLinesOnAfterCalcShouldValidateQuantity(var ServiceLine: Record "Service Line"; var ServiceLineArchive: Record "Service Line Archive"; var ShouldValidateQuantity: Boolean)` (integration)
- `OnRestoreServiceLinesOnAfterValidateQuantity(var ServiceLine: Record "Service Line"; var ServiceLineArchive: Record "Service Line Archive")` (integration)

## Procedures

- `AutoArchiveServiceDocument(var ServiceHeader: Record "Service Header")`
- `ArchServiceDocumentNoConfirm(var ServiceHeader: Record "Service Header")`
- `ArchiveServiceDocument(var ServiceHeader: Record "Service Header")`
- `RestoreServiceDocument(var ServiceHeaderArchive: Record "Service Header Archive")`
- `GetNextOccurrenceNo(TableId: Integer; ServiceDocumentType: Enum "Service Document Type"; DocNo: Code[20]): Integer` (internal)

Plus 5 local procedures.

## Triggers

OnRun

## Calls

From the extracted call graph of BC29 (graphify-al on the snapshot checkout): calls whose target is known from a declared type or an `Object::"Name"` argument. Interface dispatch and calls through events are not counted, so the list is not complete.

- [Codeunit 447 "Record Link Management"](../codeunit/447.md) (3 calls: `RestoreServiceDocument → CopyLinks`, `RestoreServiceLines → CopyLinks`, `StoreServiceDocument → CopyLinks`)
- [Codeunit 27 "Confirm Management"](../codeunit/27.md) (2 calls: `ArchiveServiceDocument → GetResponseOrDefault`, `RestoreServiceDocument → GetResponseOrDefault`)
- [Codeunit 416 "Release Service Document"](../codeunit/416.md) (1 call: `RestoreServiceDocument → Reopen`)

## Called by

- [Table 5900 "Service Header"](../table/5900.md) (2 calls: `InitRecord → GetNextOccurrenceNo`, `OnDelete → AutoArchiveServiceDocument`)
- [Codeunit 5980 "Service-Post"](../codeunit/5980.md) (1 call: `PostDocumentLines → AutoArchiveServiceDocument`)
- [Codeunit 6610 "FS Int. Table Subscriber"](../codeunit/6610.md) (1 call: `ArchiveServiceOrder → ArchServiceDocumentNoConfirm`)

## Across versions

- Present in: BC25-30
- Changed (declaration) in: none

Source: AL metadata extracted from the code (names, ids, signatures, properties); no code bodies (D10).

## Ask your agent

Procedure bodies are not stored here (D10). The call sections above are our own, per object, from the BC29 call graph. For a procedure body or the calls of one procedure, ask bc-code-atlas (external, by Stefan Maron, MIT; default corpus w1-28), which the bc-observatory plugin connects: `bcatlas_resolve_node(object_type: "codeunit", object_name: "Service Document Archive Mgmt.")`, then `bcatlas_get_procedure_body` or `bcatlas_get_neighbors` on the returned id.