---
id: object/codeunit/7701
type: object
title: Codeunit 7701 "ADCS Communication"
summary: Codeunit 7701 "ADCS Communication" in Base Application (Microsoft.Warehouse.ADCS). 19 public procedures. Present since at least BC23, still in BC30.
tier: official
language: en
tags:
  - codeunit
  - base application
versions:
  introduced: null
  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: 119de2b42c45a3e213f9f01e509416adbe58426effc1207f9a88fce0d41343c4
evidence:
  - kind: code
    url: https://github.com/microsoft/BCApps/blob/ea08af5ef2d6a9b5c5af4a029288abbe2c883220/src/Layers/W1/BaseApp/Warehouse/ADCS/ADCSCommunication.Codeunit.al
    title: src/Layers/W1/BaseApp/Warehouse/ADCS/ADCSCommunication.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: 7701
name: ADCS Communication
namespace: Microsoft.Warehouse.ADCS
app: Base Application
extends: null
first_version: "23"
last_version: "30"
present_in:
  - "23"
  - "24"
  - "25"
  - "26"
  - "27"
  - "28"
  - "29"
  - "30"
changed_in: []
source_major: "29"
obsolete: null
countries: []
ms_search_form_ids: []
counts:
  fields: 0
  procedures: 28
  events: 0
  subscribers: 0
relations:
  out: 0
  referenced_by: 0
  pages: 0
  extended_by: 0
  event_subscribers: 0
  calls: 1
  called_by: 10
  implements: 0
---

# Codeunit 7701 "ADCS Communication"

> Codeunit 7701 "ADCS Communication" in Base Application (Microsoft.Warehouse.ADCS). 19 public procedures. Present since at least BC23, still in BC30.

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

## Procedures

- `EncodeMiniForm(MiniFormHdr: Record "Miniform Header"; StackCode: Code[250]; var XMLDOMin: DotNet XmlDocument; ActiveInputField: Integer; cMessage: Text[250]; ADCSUserId: Text[250])`
- `SetRecRef(var NewRecRef: RecordRef)`
- `FindRecRef(SelectOption: Integer; NoOfLines: Integer): Boolean`
- `FieldSetvalue(var NewRecRef: RecordRef; FldNo: Integer; Text: Text[80]): Boolean`
- `SetXMLDOMS(var oXMLDOM: DotNet XmlDocument)`
- `GetReturnXML(var xmlout: DotNet XmlDocument)`
- `GetNodeAttribute(CurrNode: DotNet XmlNode; AttributeName: Text[250]): Text[250]`
- `SetNodeAttribute(CurrNode: DotNet XmlNode; AttributeName: Text[250]; AttribValue: Text[250])`
- `SetUserNo(uNo: Text[250])`
- `GetWhseEmployee(ADCSLoginId: Text[250]; var WhseEmpId: Text[250]; var LocationFilter: Text[250]): Boolean`
- `GetNextMiniForm(ActualMiniFormHeader: Record "Miniform Header"; var MiniformHeader2: Record "Miniform Header")`
- `GetCallMiniForm(MiniFormCode: Code[20]; var MiniformHeader2: Record "Miniform Header"; ReturnTextValue: Text[250])`
- `RunPreviousMiniform(var DOMxmlin: DotNet XmlDocument)`
- `IncreaseStack(var DOMxmlin: DotNet XmlDocument; NextElement: Text[250])`
- `DecreaseStack(var DOMxmlin: DotNet XmlDocument; var PreviousElement: Text[250])`
- `GetFunctionKey(MiniformCode: Code[20]; InputValue: Text[250]): Integer`
- `GetActiveInputNo(MiniformCode: Code[20]; FieldID: Integer): Integer`
- `LastEntryField(MiniformCode: Code[20]; FieldID: Integer): Boolean`
- `GetLoginFormCode(): Code[20]`

Plus 9 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 6224 "XML DOM Management"](../codeunit/6224.md) (9 calls: `AddAttribute → AddAttribute`, `AddElement → AddElement`, `DecreaseStack → FindNode`, …)

## Called by

- [Codeunit 7711 "Miniform Whse. Activity Line"](../codeunit/7711.md) (13 calls: `PrepareData → GetNodeAttribute`, `PrepareData → SetRecRef`, `ProcessInput → FieldSetvalue`, …)
- [Codeunit 7708 "Miniform Pick Activity List"](../codeunit/7708.md) (12 calls: `PrepareData → DecreaseStack`, `PrepareData → GetNodeAttribute`, `PrepareData → SetRecRef`, …)
- [Codeunit 7709 "Miniform Put Activity List"](../codeunit/7709.md) (12 calls: `PrepareData → DecreaseStack`, `PrepareData → GetNodeAttribute`, `PrepareData → SetRecRef`, …)
- [Codeunit 7710 "Miniform Move Activity List"](../codeunit/7710.md) (12 calls: `PrepareData → DecreaseStack`, `PrepareData → GetNodeAttribute`, `PrepareData → SetRecRef`, …)
- [Codeunit 7712 "Miniform Phys. Journal List"](../codeunit/7712.md) (12 calls: `PrepareData → DecreaseStack`, `PrepareData → GetNodeAttribute`, `PrepareData → SetRecRef`, …)
- [Codeunit 7713 "Miniform Phys.-Inventory"](../codeunit/7713.md) (12 calls: `PrepareData → GetNodeAttribute`, `PrepareData → SetRecRef`, `ProcessInput → FieldSetvalue`, …)
- [Codeunit 7705 "Miniform Logon"](../codeunit/7705.md) (11 calls: `GetUser → GetWhseEmployee`, `OnRun → GetNodeAttribute`, `ProcessInput → FieldSetvalue`, …)
- [Codeunit 7702 "Miniform Management"](../codeunit/7702.md) (4 calls: `Initialize → GetNodeAttribute`, `Initialize → GetWhseEmployee`, `ReceiveXML → GetLoginFormCode`, …)
- [Codeunit 7706 "Miniform Logoff"](../codeunit/7706.md) (4 calls: `Process → GetCallMiniForm`, `Process → IncreaseStack`, `SendForm → EncodeMiniForm`, …)
- [Codeunit 7707 "Miniform Mainmenu"](../codeunit/7707.md) (4 calls: `Process → GetCallMiniForm`, `Process → IncreaseStack`, `SendForm → EncodeMiniForm`, …)

## Across versions

- Present in: BC23-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: "ADCS Communication")`, then `bcatlas_get_procedure_body` or `bcatlas_get_neighbors` on the returned id.