Print Page as PDF
Field selection/lookup based on DD global with call to DIC ICR (4281)

Field selection/lookup based on DD global with call to DIC    ICR (4281)

Name Value
NUMBER 4281
IA # 4281
GLOBAL ROOT DD(
DATE CREATED 2010/12/14
CUSTODIAL PACKAGE VA FILEMAN
USAGE Controlled Subscription
TYPE File
DBIC APPROVAL STATUS APPROVED
NAME Field selection/lookup based on DD global with call to DIC
GENERAL DESCRIPTION
The LAB SERVICE package (LSRP project) has a
requirement for the user to be able to select specific fields in the
LABORATORY TEST (#60) file and to set auditing on and off for these fields.
In order for the users to select the fields available for a file, a DIC call
would be used with the variable DIC set to "^DD(".  This ICR will allow the
LAB SERVICE package to use ^DD in this manner.

S DIC="^DD(60,"
S DIC(0)="AEQMZ",DIC("A")="Field: "
D ^DIC
GLOBAL REFERENCE DD(60,D0)
STATUS Active
DURATION Till Otherwise Agreed
ID DD(
SUBSCRIBING PACKAGE LAB SERVICE
DATE ACTIVATED 2010/12/15