Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^%ZIS(1

Package: Kernel

Global: ^%ZIS(1


Information

FileMan FileNo FileMan Filename Package
3.5 DEVICE Kernel

Description

Directly Accessed By Routines, Total: 182

Package Total Routines
Kernel 64 %ZIS    %ZIS1    %ZIS2    %ZIS3    %ZIS4    %ZIS5    %ZIS6    %ZISC
%ZISF    %ZISG2    %ZISUTL    %ZOSV    %ZTLOAD1    %ZTM1    %ZTM4    %ZTMS2
DESPOOL DEVICES    DEVICE TO AUDIT    XPDIA2    XPDIL    XQ12    XQ21    XQ9    XQALFWD
XQSRV1    XQUSR    XU8P440    XU8P546    XU8P585    XUCHANGE    XUDEV LINEPORTADDR    XUDFDISPS
XUDHGUI    XUDHRES    XUDHSET    XUINP348    XUINPCH    XUP    XUS    XUS3
XUSG    XUSRB5    XUSTAT2    XUTMR    XUTMRP    XUTMTEIO    ZISETDTM    ZISETIS2
ZISETMSM    ZISETMSQ    ZISETONT    ZISETUP    ZISETUPD    ZISETUPM    ZISETVXD    ZISG
ZISPL1    ^%ZIS(1    ^DIC(19    ^XUSEC(0    ZISG1    ZISHUNT    ZISPQ    ZISX
Radiology Nuclear Medicine 10 RABAR    RAEDCN    RAFLH    RAIPST1    RAO7RO    RAORDQ    RAPSET    RAPSET1
RAUTL    RAUTL19    
Controlled Substances 9 PSDLBL0    PSDLBL1    PSDLBL3    PSDLBL5    PSDLBLI    PSDLBLP    PSDLBLR0    PSDLBLR2
PSDPGS1    
Lab Service 9 LRHY0    LRHY01    LRHYAFT    LRHYBL1    LRHYBLD    LRHYPH0    LRHYPH2    LRJSAU60
LRORDST    
Registration 8 DG53528P    DG53P526    DG53P952    DGDIS    DGQPTQ1    DGREG    DGRPTU    ^DIC(39.3
Engineering 6 ENSA8    ENWONEW2    ^DIC(6910.1    ^OFM(7336.9    ENBCPM7    ENBCPM9    
Order Entry Results Reporting 6 ORB3SPEC    ORQOAUIB    ORQPTQ1    ORWRP    ORWU    ORWU16    
Record Tracking 4 RTDPA1    RTL1    RTT2    RTUTL5    
Scheduling 4 SCCVPOST    SDCNSLT    SDECDEV    SDESAPPTLETTERSV    
VA FileMan 4 DINV1VXD    DINVDTM    DINVMSM    DINVONT    
Auto Replenishment Ward Stock 3 PSGWPI    PSGWPI1    PSGWPIS    
Health Summary 3 GMTS TASK LOCATIONS LIST    GMTS TYPE INQ    ^GMT(142.99    
Inpatient Medications 3 PSJ0095    ^PS(57.5    ^PS(59.6    
MailMan 3 XMC1B    XMDIR1    XMXADDR3    
Prosthetics 3 RMPR4P21    RMPRP21    RMPRP55    
Text Integration Utility 3 TIUDEV    TIUPRPN5    TIUPRPN7    
Barcode Medication Administration 2 ALPBUTL    PSBRPC1    
CMOP 2 PSXRPPL    PSXSRP    
Health Level Seven 2 HLCSDL    HLCSDR    
Hospital Based Home Care 2 HBHCR15B    HBHCXMT    
Automated Information Collection System 1 IBD3KPT    
Automated Lab Instruments 1 LADJOB    
Clinical Monitoring System 1 QAMAUTO4    
Event Capture 1 ECUURPC    
Fee Basis 1 FBUCDD1    
IFCAP 1 PRCHQUE    
Medicine 1 MCWORKLD    
National VistA Support 1 NVSMKPRN    
Occurrence Screen 1 QAOAUTO    
Outpatient Pharmacy 1 PSOTALK    
Toolkit 1 XTLATSET    

Accessed By FileMan Db Calls, Total: 47

Package Total Routines
Radiology Nuclear Medicine 7 RADOSTIK    RAEDCN    RAHLO4    RAMAORPT    RAORD    RAPSET1    RAUTL0    
Outpatient Pharmacy 5 PSOB    PSOBGMG1    PSOBGMG2    PSOBMST    PSOFDAUT    
Inpatient Medications 4 PSGPER    PSGPER1    PSJ010    PSJUTL    
Controlled Substances 3 PSDTER    PSDTER1    PSDTER2    
Lab Service 3 LRHYAFT    LRLABLIO    LRLNC63    
Scheduling 3 SDECDEV    SDRRTSK    SDRRTSK1    
MailMan 2 XMDIR1    XMXADDR3    
Record Tracking 2 RTDPA3    RTSM3    
Auto Replenishment Ward Stock 1 PSGWODRN    
Automated Information Collection System 1 IBD3KPT    
Clinical Reminders 1 PXRMHOST    
Consult Request Tracking 1 GMRCSLM4    
Dietetics 1 FHQUE    
Enrollment Application System 1 EASMTPAR    
Enterprise Health Management Platform 1 HMPDJ03    
Event Capture 1 ECRRPT1    
Health Data and Informatics 1 HDI1000B    
Health Summary 1 GMTSXAW3    
Imaging 1 MAGGDEV    
National Drug File 1 PSNPPIP    
Order Entry Results Reporting 1 ORLPR0    
Prosthetics 1 RMPR29R    
Quality Assurance Integration 1 QAQAUTL    
Text Integration Utility 1 TIUPS139    
VA Point of Service 1 VPSPRINT    
Womens Health 1 WVRPCGF1    

Pointed To By FileMan Files, Total: 59

Package Total FileMan Files
Kernel 8 DEVICE(#3.5)[1628101#3.532(.01)]    LINE/PORT ADDRESS(#3.23)[2]    PRINT QUEUE JOB(#3.52)[.01]    TASKS(#14.4)[91]    FAILED ACCESS ATTEMPTS LOG(#3.05)[.01]    OPTION(#19)[227#19.396(.01)]    KERNEL SYSTEM PARAMETERS(#8989.3)[#8989.33(.01)]    SIGN-ON LOG(#3.081)[5]    
Lab Service 5 AUTO INSTRUMENT(#62.4)[129]    LAB REPORTS(#64.5)[#64.56(1)]    INTERIM REPORTS(#64.6)[3]    LABORATORY SITE(#69.9)[303#69.9006(.05)#69.9007(.02)#69.9007(.03)#69.9008(.01)]    HOWDY SITE FILE(#69.86)[#69.863(.01)#69.8645(.01)#69.8654(.01)]
Inpatient Medications 4 INPATIENT USER PARAMETERS(#53.45)[.13]    CLINIC DEFINITION(#53.46)[45]    WARD GROUP(#57.5)[32]    INPATIENT WARD PARAMETERS(#59.6)[.19.24]
Radiology Nuclear Medicine 4 RAD/NUC MED DIVISION(#79)[100]    IMAGING LOCATIONS(#79.1)[35101623242881]    RAD/NUC MED PROCEDURES(#71)[3]    NEW RAD PROCEDURE WORKUP(#71.11)[3]    
Order Entry Results Reporting 3 ORDER CHECK RULE(#860.2)[#860.22(4)]    OE/RR LIST(#100.21)[1.5]    ORDER PARAMETERS(#100.99)[#100.9901(.05)#100.99011(.02)#100.9925(.04)#100.9925(.05)#100.9925(.06)#100.9925(1)]    
Outpatient Pharmacy 3 PHARMACY PRINTED QUEUE(#52.9)[.01]    OUTPATIENT SITE(#59)[107#59.0135(.01)#59.02008(.01)]
GROUP DISPLAY(#59.3)[2]    
Scheduling 3 HOSPITAL LOCATION(#44)[22901]    TEAM(#404.51)[.04]    RECALL REMINDERS TEAM(#403.55)[2]    
Text Integration Utility 3 TIU PRINT PARAMETERS(#8925.93)[1.03]    TIU DIVISION PRINT PARAMETERS(#8925.94)[1.02]    TIU DOCUMENT PARAMETERS(#8925.95)[.13#8925.952(.02)#8925.952(.03)]
Barcode Medication Administration 2 BCMA BACKUP PARAMETERS(#53.71)[2]    BCMA REPORT REQUEST(#53.69)[.06]    
Consult Request Tracking 2 REQUEST/CONSULTATION(#123)[#123.02(8)]    REQUEST SERVICES(#123.5)[123.09689]    
Dietetics 2 FHQUE QUEUED REPORTS/LABELS(#117.024)[2]    FH SITE PARAMETERS(#119.9)[#119.93(.01)]    
Engineering 2 ENGINEERING COMPUTER PORT(#6910.1)[.01]    ENGINEERING SECTION LIST(#6922)[2]    
Health Level Seven 2 HL LOWER LEVEL PROTOCOL PARAMETER(#869.2)[200.01300.01]    HL LOGICAL LINK(#870)[200.01300.01]    
Health Summary 2 HEALTH SUMMARY TYPE(#142)[#142.2(.02)]    HEALTH SUMMARY PARAMETERS(#142.99)[.04]    
National Online Information Sharing 2 NOIS OFFICE(#7105.3)[2]    NOIS PARAMETER(#7109)[3]    
Auto Replenishment Ward Stock 1 INPATIENT SITE(#59.4)[32]    
CMOP 1 CMOP INTERFACE(#553)[6]    
Drug Accountability 1 DRUG ACCOUNTABILITY STATS(#58.8)[24252629]    
Enrollment Application System 1 EAS MT PARAMETERS(#713)[5#713.025(1)]    
Hospital Based Home Care 1 HBHC SYSTEM PARAMETERS(#631.9)[6]    
Integrated Billing 1 IB SITE PARAMETERS(#350.9)[8.148.158.168.19]    
Medicine 1 MEDICINE PACKAGE PARAMETERS(#690.1)[#690.18(.01)]    
Nursing Service 1 NURS PARAMETERS(#213.9)[2]    
PCE Patient Care Encounter 1 PCE DATA SOURCE(#839.7)[.02]    
Pharmacy Data Management 1 PHARMACY SYSTEM(#59.7)[13#59.747(.01)#59.747(.02)]
Prosthetics 1 PROSTHETICS SITE PARAMETERS(#669.9)[92728293035]    
Toolkit 1 PARAMETERS(#8989.5)[.01]    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Kernel 3 DEVICE(#3.5)[1628101#3.532(.01)]    TERMINAL TYPE(#3.2)[323]    OPTION(#19)[201]    

Fields, Total: 74

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[";"!(X[".")!($L(X)>30)!(X'?1U.UNP) X
  • LAST EDITED:  NOV 03, 2023
  • HELP-PROMPT:  NAME BY WHICH TO REFER TO THE DEVICE, Must start with 1 UPPERcase and not contain lowercase, or ';', or '.'.
  • DESCRIPTION:  
    This is the name of the device. It is used at the 'DEVICE' prompt to select this device. It should not be the internal name for the device but a logical one. It must start with 1 uppercase and not contain lowercase.
  • AUDIT:  YES, ALWAYS
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  3.5^B
    1)= S ^%ZIS(1,"B",$E(X,1,30),DA)=""
    2)= K ^%ZIS(1,"B",$E(X,1,30),DA)
.02 LOCATION OF TERMINAL 1;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>35!($L(X)<2) X
  • LAST EDITED:  NOV 03, 2023
  • HELP-PROMPT:  ANSWER MUST BE 2-35 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This is a free text description of where the device is located, e.g. Ward 2A nurse station, etc.
  • AUDIT:  YES, ALWAYS
.03 MNEMONIC MN;0 Multiple #3.501 3.501

  • DESCRIPTION:  
    These are alternate names which may be used to select the device.
.04 LOCAL SYNONYM 1;4 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  JUN 23, 1988
  • HELP-PROMPT:  ANSWER MUST BE 1-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  This is an alternate name which may be used to select the device. When using the LOCAL SYNONYM to select the device, selection can only occur on the local CPU. For example, if you assigned a LOCAL SYNONYM to one device
    on the local CPU, and the same name to a device on the remote CPU, selection using the LOCAL SYNONYM will return the device on the local CPU.
  • EXECUTABLE HELP:  W !,"ENTER THE NAME WHICH CAN BE USED TO SELECT THIS DEVICE",!,"WHEN REFERENCING FROM THE CPU WHICH THIS DEVICE BELONGS."
  • CROSS-REFERENCE:  3.5^LSYN
    1)= S ^%ZIS(1,"LSYN",$E(X,1,30),DA)=""
    2)= K ^%ZIS(1,"LSYN",$E(X,1,30),DA)
.13 PURGE OLD PRINT QUEUE FILES 0;13 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  NOV 07, 2011
  • HELP-PROMPT:  Should old files in the Print Queue Directory be deleted?
  • DESCRIPTION:  This field determines whether old HFS files associated with entries in the PRINT QUEUE JOB (#3.52) file should be deleted. It only applies to devices of the PRINT QUEUE type. For print queues, an intermediate host file is
    created in the PRINT_QUEUES subdirectory.
    Normally, these files are automatically deleted once they have been submitted to the print queue. For those files that are not automatically deleted, there is a scheduled option that will periodically delete host files
    that have been somehow left in existence past their usefulness.
    Setting this field to NO will prevent the purge option from deleting HFS files created via this device. Setting this field to NO should only be done on a temporary basis while troubleshooting a problem involving a print
    queue.
    The default value for this field is YES.
1 $I 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>40 X I $D(X) N % S %=$G(^("TYPE")) I $D(^%ZIS(1,"C",X)) D EN^DDIOL(" This $I in use by other Devices."_$C(7),"","?30") K:%="RES" X
    9.2 = I X]"",$P(^%ZIS(1,DA,0),U,11) X:$D(^%ZIS(1,"G","SYS."_$P(^(0),U,9)_"."_X))>9 ^DD(3.5,1,9.3) I $P(^%ZIS(1,DA,0),U,11) S ^%ZIS(1,"G","SYS."_$P(^(0),U,9)_"."_X,DA)=""
    9.3 = S $P(^%ZIS(1,DA,0),U,11)="" W !,*7,"CONFLICT OCCURRED. DELETING "_$P(^DD(3.5,1.95,0),U,1)_" FROM DEVICE "_$P(^%ZIS(1,DA,0),U,1)
  • LAST EDITED:  NOV 03, 2023
  • HELP-PROMPT:  on DSM, M+, and MSM $I must be numeric if it is for a local port.
  • DESCRIPTION:  This field holds the Hardware port name that the OS can identify when referencing a port on a CPU. On layered systems where opening of host files is supported, this field may hold the host file name. When defining a
    spool device entry(TYPE="SPL") on VAX DSM or MSM-Unix, enter the name of directory where spool host files will be created.
  • EXECUTABLE HELP:  W !,"If the '$I' value is zero ('0'), then",!?4,"the Device will be understood to be a slave device on the current port",!
  • AUDIT:  YES, ALWAYS
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  3.5^C
    1)= S ^%ZIS(1,"C",X,DA)=""
    2)= K ^%ZIS(1,"C",X,DA)
  • CROSS-REFERENCE:  3.5^AD^MUMPS
    1)= I $D(ZISOX) K:'$D(^%ZIS(1,DA,0))!(ZISOX=X) ZISOX I $D(ZISOX) K:$P(^(0),U,2)="" ZISOX I $D(ZISOX) K ^%ZIS(1,"G","SYS."_$P(^(0),U,9)_"."_ZISOX,DA) X ^DD(3.5,1,9.2) K ZISOX
    2)= S ZISOX=X
    This sets up the 'G' cross-reference used to identify the primary device.
  • CROSS-REFERENCE:  3.5^ACPU^MUMPS
    1)= S:$S($D(^%ZIS(1,DA,0)):$S(X]"":1,1:0),1:0) ^%ZIS(1,"CPU",$P(^(0),U,9)_"."_X,DA)=""
    2)= K:$S($D(^%ZIS(1,DA,0)):$S(X]"":1,1:0),1:0) ^%ZIS(1,"CPU",$P(^(0),U,9)_"."_X,DA)
    This sets up the 'CPU' cross-reference used to find devices that have a particular $I on a specified VOLUME SET(CPU).
  • CROSS-REFERENCE:  ^^TRIGGER^3.54^.01
    1)= X ^DD(3.5,1,1,4,1.3) I X S X=DIV X ^DD(3.5,1,1,4,89.2) S Y(101)=$S($D(^%ZISL(3.54,D0,0)):^(0),1:"") S X=$P(Y(101),U,1) S D0=I(0,0) S DIU=X K Y S X=DIV S X=DIV X ^DD(3.5,1,1,4,1.4)
    1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$S($D(^%ZIS(1,D0,"TYPE")):^("TYPE"),1:"") S X=$P(Y(1),U,1),X=X S X=X="RES"
    1.4)= S DIH=$S($D(^%ZISL(3.54,DIV(0),0)):^(0),1:""),DIV=X I $D(^(0)) S $P(^(0),U,1)=DIV,DIH=3.54,DIG=.01 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    89.2)= S I(0,0)=$S($D(D0):D0,1:""),Y(1)=$S($D(^%ZIS(1,D0,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S X=X K DIC S DIC="^%ZISL(3.54,",DIC(0)="NMFL" D ^DIC S (D,D0,DIV(0))=+Y
    CREATE CONDITION)= INTERNAL(#2)="RES"
    CREATE VALUE)= #1
    DELETE VALUE)= NO EFFECT
    DIC)= LOOKUP
    FIELD)= #1:RESOURCE:#.01
    Whenever the $I is edited, the new value of $I is triggered into the name field of the RESOURCE File(#3.54). This ensures that an entry in the RESOURCE File(#3.54) is established for every device entry of TYPE RESOURCE.
1.9 VOLUME SET(CPU) 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!(X'?.8UN.1":"1.12UN) X
    9.2 = K ^%ZIS(1,"G","SYS."_ZISOX_"."_$P(^%ZIS(1,DA,0),U,2),DA) I $P(^%ZIS(1,DA,0),U,11) X:$D(^%ZIS(1,"G","SYS."_ZISNX_"."_$P(^(0),U,2)))>9 ^DD(3.5,1.9,9.3) I $P(^%ZIS(1,DA,0),U,11) S ^%ZIS(1,"G","SYS."_ZISNX_"."_$P(^(0),U,
    2),DA)=""
    9.3 = S $P(^%ZIS(1,DA,0),U,11)="" W !,*7,"CONFLICT OCCURRED. DELETING "_$P(^DD(3.5,1.95,0),U,1)_" FROM DEVICE "_$P(^%ZIS(1,DA,0),U,1)
  • LAST EDITED:  NOV 09, 1989
  • HELP-PROMPT:  ANSWER MUST BE 1-8 ALPHA NAME OF A VOLUME SET (E.G. 'CCC')
  • DESCRIPTION:  This field holds the name of the CPU to which this device belongs. This field holds the name of the CPU where the physical port resides. On DSM-11, VAX DSM, this field may hold the name of the Volume Set. On M/11+, this
    field may hold the name of the Directory Set.
    If no name has been entered for this field, this device is assumed to be accessible from all CPUs in the network. In other words, when this device is referenced, the device handler will operate as if this device is
    resident on the local CPU.
    For example, if there is a device that uses the same $I on each CPU, one entry can be made in the Device File by leaving the 'Volume Set(CPU)' Field null. This shortcut will work only if the same $I has been associated
    with this device on every CPU.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  3.5^AC^MUMPS
    1)= S:'$D(ZISOX) ZISOX="" K:'$D(^%ZIS(1,DA,0))!(ZISOX=X) ZISOX I $D(ZISOX) K:$P(^(0),U,2)="" ZISOX I $D(ZISOX) S ZISNX=X X ^DD(3.5,1.9,9.2) K ZISOX,ZISNX
    2)= S ZISOX=X I $D(^%ZIS(1,DA,0)),$P(^(0),U,2)]"",$P(^(0),U,9)="" S ZISNX="" X ^DD(3.5,1.9,9.2) K ZISNX
    This sets up the 'G' cross-reference used to identify the primary device. The AC cross-reference is needed to support the 'G' cross-reference because the 'G' cross-reference is multifield indexed.
  • CROSS-REFERENCE:  3.5^CPU^MUMPS
    1)= I $D(^%ZIS(1,DA,0)),$P(^(0),U,2)]"" K ^%ZIS(1,"CPU","."_$P(^(0),U,2),DA) S ^%ZIS(1,"CPU",X_"."_$P(^%ZIS(1,DA,0),U,2),DA)=""
    2)= I $D(^%ZIS(1,DA,0)),$P(^(0),U,2)]"",$D(^%ZIS(1,"CPU",X_"."_$P(^(0),U,2),DA)) K ^(DA) S ^%ZIS(1,"CPU","."_$P(^%ZIS(1,DA,0),U,2),DA)=""
    This cross-reference is a multifield index. The lookup key is a combination of $I (#1) and VOLUME SET(CPU) (#1.9) fields.
1.95 SIGN-ON/SYSTEM DEVICE 0;11 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • INPUT TRANSFORM:  K:X=1&$S($D(^%ZIS(1,D0,0)):$S($P(^(0),U,2)]"":$S($D(^%ZIS(1,"G","SYS."_$P(^(0),U,9)_"."_$P(^(0),U,2)))>9:1,1:0),1:1),1:0) X Q
    9.2 = K:$S($D(^%ZIS(1,DA,0)):$S($P(^(0),U,2)]""&(X=0):1,1:0),1:0) ^%ZIS(1,"G","SYS."_$P(^(0),U,9)_"."_$P(^(0),U,2),DA)
  • LAST EDITED:  OCT 13, 1987
  • HELP-PROMPT:  YOU MAY ASSIGN ONLY ONE SIGN-ON/SYSTEM DEVICE PER $I PER CPU.
  • DESCRIPTION:  If answered 'YES', this field identifies that this entry is the primary device among those device entries that have the same $I with the same VOLUME SET(CPU).
    Among those device entries that have a common $I and CPU, only one of these entries can have this field set to 'YES'. If none of the common device entries are set to 'YES', the default device will be identified by the
    first device on the CPU x-ref. The default device is used when the device handler is invoked with $I as the device to be selected.
  • EXECUTABLE HELP:  W !,"Answer 'yes' if this device is the primary device amoung those",!,"device entries that have the same $I and VOLUME SET(CPU)."
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  3.5^G^MUMPS
    1)= S:$S($D(^%ZIS(1,DA,0)):$S($P(^(0),U,2)]"":$S(+$O(^%ZIS(1,"G","SYS."_$P(^(0),U,9)_"."_$P(^(0),U,2),0))'>0&(X=1):1,1:0),1:0),1:0) ^(DA)="" X ^DD(3.5,1.95,9.2)
    2)= K:$S($D(^%ZIS(1,DA,0)):$S($P(^(0),U,2)]"":1,1:0),1:0) ^%ZIS(1,"G","SYS."_$P(^(0),U,9)_"."_$P(^(0),U,2),DA)
    The 'G' cross-reference is a multifield index. This index is used to identify the primary device. The fields that affect this cross-reference are $I (#1), VOLUME SET(CPU) (#1.9) and SIGN-ON/SYSTEM DEVICE (#1.95).
2 TYPE TYPE;1 SET
************************REQUIRED FIELD************************
  • 'TRM' FOR TERMINAL;
  • 'OTH' FOR OTHER;
  • 'MT' FOR MAGTAPE;
  • 'SDP' FOR SDP;
  • 'SPL' FOR SPOOL;
  • 'BAR' FOR BARCODE READER;
  • 'HFS' FOR HOST FILE SERVER;
  • 'VTRM' FOR VIRTUAL TERMINAL;
  • 'RES' FOR RESOURCES;
  • 'CHAN' FOR NETWORK CHANNEL;
  • 'IMPC' FOR IMAGING WORK STATION;
  • 'PQ' FOR PRINT QUEUE;

  • LAST EDITED:  OCT 26, 2011
  • DESCRIPTION:  This field has the general type of device on the CPU. 'TRM' is the most common entry.
    TRM -- Terminal devices such as most crts and printers
    should be associated with a corresponding device entry
    with a type of 'TRM'.
    HFS -- Host File Server is only available on mumps platforms
    that exists on a layered system(e.g.: VMS, UNIX, NT, etc.).
    This type and the associated functionality provides
    the vehicle to read and write to host level files.
    Instead of directing reports to a printer, the results
    could be placed into a VMS, NT or UNIX file. This would
    allow a non-mumps based statistical package or spreadsheet
    to use data produced by the mumps based application by
    simply extracting data from the host file.
    VTRM -- Virtual Terminal Server devices are those that are associated
    with a dynamically created mumps port identification($I).
    A generic device entry with a device type of 'VTRM'
    can be established for users who log into the system
    through terminal servers.
    RES -- Resources is a type used for special sequencing of tasks
    that do not require a particular device.
    CHAN -- Network Channels are high speed devices that use network
    protocols such as TCP/IP.
    OTH -- Other devices that do not fit a particular category
    should be given a type of 'OTH'.
    MT -- Magtape device should have a type of 'MT'.
    SPL -- Spool device is a predefined allocated disk space similar
    to SDP. However, access to the spool device can be achieved
    from multiple users simultaneously.
    BAR -- Bar code reader. This type identifies the device
    as a barcode reader.
    SDP -- Sequential Disk Processor is a predefined allocated
    disk space used for sequential processing. On DSM-11
    and M/11+ systems, devices 59 thru 62 are reserved for SDP.
    On MSM, the Sequential Block Processor(SBP) is essentially
    the same as SDP. This has been replaced with HFS.
    IMPC -- Imaging work station device(reserved for future use for
    DHCP Imaging Project).
    PQ -- Print Queues. This type of device will be used on
    Cache/VMS,Linux, or Unix systems to create host files and
    pass them to a print server. Print Queue devices are
    not used on Windows systems.
    WRITE AUTHORITY: @
  • CROSS-REFERENCE:  ^^TRIGGER^3.54^.01
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S X=Y(0),X=X S X=X="RES" I X S X=DIV X ^DD(3.5,2,1,1,89.2) ;S Y(101)=$S($D(^%ZISL(3.54,D0,0)):^(0),1:"") S X=$P(Y(101),U,1) S D0=I(0,0) S DIU=X K Y X ^DD(3.5,2,1,1,1.1) X ^DD(3.5,
    2,1,1,1.4)
    1.1)= S X=DIV S Y(1)=$S($D(^%ZIS(1,D0,0)):^(0),1:"") S X=$P(Y(1),U,2)
    1.4)= S DIH=$S($D(^%ZISL(3.54,DIV(0),0)):^(0),1:""),DIV=X I $D(^(0)) S $P(^(0),U,1)=DIV,DIH=3.54,DIG=.01 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    89.2)= S I(0,0)=$S($D(D0):D0,1:""),Y(1)=$S($D(^%ZIS(1,D0,0)):^(0),1:"") S X=$P(Y(1),U,2) K DIC S DIC="^%ZISL(3.54,",DIC(0)="NMFL" D ^DIC S (D,D0,DIV(0))=+Y
    CREATE CONDITION)= INTERNAL(#2)="RES"
    CREATE VALUE)= #1
    DELETE VALUE)= NO EFFECT
    DIC)= LOOKUP
    FIELD)= #1:RESOURCE
    Whenever the TYPE field of the DEVICE File(#3.5) is changed to TYPE RESOURCE, the value of $I is triggered into the NAME field of the RESOURCE File(#3.54). This ensures that an entry in the RESOURCE File(#3.54) is
    established for every device entry of TYPE RESOURCE.
  • CROSS-REFERENCE:  ^^TRIGGER^3.5^35
    1)= X ^DD(3.5,2,1,2,1.3) I X S X=DIV S Y(1)=$S($D(^%ZIS(1,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X="1" X ^DD(3.5,2,1,2,1.4)
    1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X,Y(3)=$S($D(^%ZIS(1,D0,1)):^(1),1:""),X=Y(0) S X=X="RES",Y(1)=X,Y(2)=X S X=$P(Y(3),U,10) S X=X="",Y=X,X=Y(1),X=X&Y
    1.4)= S DIH=$S($D(^%ZIS(1,DIV(0),1)):^(1),1:""),DIV=X S $P(^(1),U,10)=DIV,DIH=3.5,DIG=35 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    3)= Set the default value.
    CREATE CONDITION)= (INTERNAL(TYPE)="RES")&(INTERNAL(#35)="")
    CREATE VALUE)= "1"
    DELETE VALUE)= NO EFFECT
    FIELD)= #35
    Whenever a device entry is created with a TYPE RESOURCE, a default value of '1' is triggered into the AVAILABLE SLOTS field of the RESOURCE File(#3.54).
3 SUBTYPE SUBTYPE;1 POINTER TO TERMINAL TYPE FILE (#3.2)
************************REQUIRED FIELD************************
TERMINAL TYPE(#3.2)

  • LAST EDITED:  NOV 03, 2023
  • DESCRIPTION:  
    This field tells what type of terminal is on a terminal port. It has a great impact on whether the proper terminal control codes get sent to the terminal.
  • AUDIT:  YES, ALWAYS
4 ASK DEVICE 0;3 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • HELP-PROMPT:  IF '0', YOU WON'T BE ASKED TO SEND OUTPUT FROM THIS DEVICE TO ANOTHER
  • DESCRIPTION:  
    This field controls if the 'DEVICE' question is asked when a call is made to ^%ZIS.
5 ASK PARAMETERS 0;4 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • HELP-PROMPT:  Enter YES if OPEN parameters(RIGHT MARGIN on TRM & VTRM devices) should be asked when the device is selected.
  • DESCRIPTION:  On devices of TYPE 'TRM' and 'VTRM', this field controls if the 'RIGHT MARGIN' question is asked after selecting the device. On devices of TYPE 'MT', 'SDP', 'BAR', and 'OTH', this field controls if the
    'ADDRESS/PARAMETERS' question is asked after selecting the device.
5.1 ASK HOST FILE 1;5 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JUL 14, 1988
  • HELP-PROMPT:  ANSWER YES IF HOST FILE NAME SHOULD BE ASKED
  • DESCRIPTION:  
    Answer 'yes' if 'HOST FILE NAME:' should be asked when the device is selected. TYPE must be 'HFS'. Only applicable on layered systems that support host files.
5.2 ASK HFS I/O OPERATION 1;6 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JUL 14, 1988
  • DESCRIPTION:  For systems that support host files, this field may be used instead of 'ADDRESS/PARAMETERS' to specify more general parameters.
    If 'Ask Parameters' is null or 'NO', set this field to 'YES' and the device handler will ask for INPUT/OUTPUT OPERATION upon selecting a device.
  • EXECUTABLE HELP:  W !,"If you wish to have INPUT/OUTPUT OPERATION asked, answer 'yes'",!,"to this field. ASK PARAMETERS must be set to 'no'",!,"and the OPEN PARAMETERS must be null."
5.5 QUEUING 0;12 SET
  • '0' FOR ALLOWED;
  • '1' FOR FORCED;
  • '2' FOR NOT ALLOWED;

  • LAST EDITED:  AUG 19, 2010
  • DESCRIPTION:  When this field is set to FORCED and queuing is allowed by the calling program (%ZIS["Q"), the Device Handler will return IO("Q")=1 upon device selection and the job will be queued. That is, the user does not need to
    enter "Q" to invoke queuing and will not be prompted with the question about wanting output queued. If the program does not allow queuing (%ZIS'["Q"), the user will see the following message: Sorry, QUEUING is required
    for this device.
    Set this field to NOT ALLOWED if queuing is not possible or desired for this device.
    Set this field to ALLOWED if queuing is possible for this device. When this field is set to ALLOWED, the application/user will determine if queuing is desired. Setting this field to null is the same as setting this field
    to ALLOWED.
6 OUT-OF-SERVICE DATE 90;1 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 02, 1990
  • HELP-PROMPT:  IF THERE IS AN ANSWER, TERMINAL WILL BE CONSIDERED 'OUT OF SERVICE', ON OR AFTER THAT DATE
  • DESCRIPTION:  
    If entered then this device cannot be selected if the current date is greater than, or the same as, the date specified.
7 NEAREST PHONE 90;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<2) X
  • HELP-PROMPT:  ANSWER MUST BE 2-25 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    The location of the telephone nearest to this device.
8 KEY OPERATOR 90;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<2) X
  • HELP-PROMPT:  ANSWER MUST BE 2-25 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    The name of the person who usually uses this device.
9 MARGIN WIDTH 91;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>256)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 05, 1997
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 0 AND 256
  • DESCRIPTION:  This field if it has data will override the Right Margin field value from the Terminal type file. Leave this field blank unless you are sure that you need to have a different Right Margin than what is in the terminal type
    file.
11 PAGE LENGTH 91;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>65534)!(X<3)!(X?.E1"."1.N) X
  • LAST EDITED:  NOV 25, 2008
  • HELP-PROMPT:  Type a number between 3 and 65534, 0 Decimal Digits
  • DESCRIPTION:  This field, if it has data, will override the Page Length field value from the Terminal type file. Leave this field blank unless you are sure that you need to have a different Page Length than what is in the terminal type
    file.
    If this is a CRT then this is the number of lines which can be displayed on the screen, otherwise, for printers, it is the number of print lines per page.
11.2 SUPPRESS FORM FEED AT CLOSE 1;11 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  APR 18, 1991
  • DESCRIPTION:  
    This field is used flag devices that should not have form feeds issued at the time the device is closed. This field should be answered 'YES' for label printers.
15 SECURITY 95;E1,99 FREE TEXT

  • INPUT TRANSFORM:  K:'$D(DUZ(0)) X I $D(X),DUZ(0)'="@" F %=1:1:$L(X) I DUZ(0)'[$E(X,%) K X Q
  • LAST EDITED:  JAN 02, 1990
  • HELP-PROMPT:  STRING OF SECURITY CODES (MATCHING YOUR OWN 'DUZ(0)')
  • DESCRIPTION:  
    The users DUZ(0) (fileman access) must contain at least one of the characters in this field for the user to be able to select this device.
    WRITE AUTHORITY: @
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
16 CLOSEST PRINTER 99;1 POINTER TO DEVICE FILE (#3.5) DEVICE(#3.5)

  • DESCRIPTION:  
    This is the name of the nearest printer, it is selected at the "DEVICE" prompt simply by entering "P".
17 FORM CURRENTLY MOUNTED F;1 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!(X'?.ANP)!(X<0) X I $D(X) K:$L(X)>30!($L(X)<2) X
  • HELP-PROMPT:  ANSWER MUST BE 2-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This describes the type of form currently in the printer.
  • CROSS-REFERENCE:  3.5^F
    1)= S ^%ZIS(1,"F",$E(X,1,30),DA)=""
    2)= K ^%ZIS(1,"F",$E(X,1,30),DA)
19 OPEN PARAMETERS IOPAR;1 FREE TEXT

  • LAST EDITED:  JAN 26, 1990
  • HELP-PROMPT:  Enter the open parameters specific to this device.
  • DESCRIPTION:  These parameters are used to open a device with specified characteristics/addresses. This field is primarily used with non-terminal devices such as magtape and SDP. For SDP, use (block:0) on M/11; (0:block:drive) on DSM.
    For Magtape, use ("VAL4":0:2048) on both M/11 and DSM.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
19.3 CLOSE PARAMETERS IOCPAR;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>120!($L(X)<1) X
  • LAST EDITED:  MAY 03, 1994
  • HELP-PROMPT:  Answer must be 1-120 characters in length.
  • DESCRIPTION:  
    This field holds the parameters to be used in a MUMPS CLOSE statement.
19.5 USE PARAMETERS IOUPAR;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>120!($L(X)<1) X
  • LAST EDITED:  MAY 03, 1994
  • HELP-PROMPT:  ANSWER MUST BE 1-120 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field holds the parameters to be used in a MUMPS USE statement.
19.7 PRE-OPEN EXECUTE POX;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  MAY 03, 1994
  • HELP-PROMPT:  This is Standard MUMPS code.
  • DESCRIPTION:  
    This is the Xecutable MUMPS code which is used by %ZIS before opening the device. Setting %ZISQUIT=1 in the PRE-OPEN EXECUTE code will signal %ZIS to reject the selected device.
    WRITE AUTHORITY: @
19.8 POST-CLOSE EXECUTE PCX;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  MAY 03, 1994
  • HELP-PROMPT:  This is Standard MUMPS code.
  • DESCRIPTION:  
    This is the Xecutable MUMPS code which is used by %ZISC after closing the device.
    WRITE AUTHORITY: @
20 BAUD RATE COMPUTED

  • MUMPS CODE:  S X=$P("50^75^110^134^150^300^600^1200^1800^2000^2400^3600^4800^7200^9600",U,$P($S($D(^%IS(+$P(^%ZIS(1,D0,0),U,2),2)):^(2),1:0),U,3)\64#16) I 'X,$D(^%ZOSF("OS")),^("OS")["DSM" D BAUD^%ZOSV
  • ALGORITHM:  S X=$P("50^75^110^134^150^300^600^1200^1800^2000^2400^3600^4800^7200^9600",U,$P($S($D(^%IS(+$P(^%ZIS(1,D0,0),U,2),2)):^(2),1:0),U,3)\64#16)
  • LAST EDITED:  AUG 21, 1984
  • DESCRIPTION:  
    This field returns the Baud Rate (i.e. speed) of this device, but only if it is a terminal from which such information can be determined.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
21 MICOM PRINTER CONTENTION PORT 1;7 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JUL 21, 1988
  • DESCRIPTION:  
    This field is reserved for future use to determine whether the device uses printer contention. It would be a preliminary check to decide whether it is necessary to invoke the printer contention programs.
23 MODEM 0;6 POINTER TO TERMINAL TYPE FILE (#3.2) TERMINAL TYPE(#3.2)

  • LAST EDITED:  MAR 02, 1984
  • HELP-PROMPT:  IF THIS DEVICE HAS A MODEM ATTACHED TO IT, ENTER NAME OF MODEM
  • DESCRIPTION:  If this device is connected to a modem, this is the name of the type of modem, as found in the TERMINAL TYPE file. Modem names must begin with "M-". This field is used by MailMan for controlling the auto-dialer. If the
    device is used only for dial-in (receives calls only, never places them), then this field is not necessary.
25 PRIORITY AT RUN TIME 0;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>10)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 03, 1985
  • HELP-PROMPT:  An integer from 1 to 10 for the job priority.
  • DESCRIPTION:  
    This field, if set, will be used by the Task Manager to set a job's operating system run priority. Lowest priority is 1, and 10 is the highest.
26 TASKMAN PRINT A HEADER PAGE 0;7 SET
  • 'y' FOR YES;
  • 'n' FOR NO;

  • LAST EDITED:  NOV 01, 1985
  • DESCRIPTION:  
    If this field is set to YES then, Taskman will print a header page before the job is started to form a break between reports.
27 PASSWORD 1;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<6)!'(X?.UNP) X
  • LAST EDITED:  OCT 28, 1985
  • HELP-PROMPT:  ANSWER MUST BE 6-15 CHARACTERS IN LENGTH
  • DESCRIPTION:  Passwords are used for an additional level of security on devices such as modems. If a value is entered in this field, all users trying to log on to this device will be prompted for the password before being prompted for
    the access code.
28 SLAVED FROM DEVICE 0;8 POINTER TO DEVICE FILE (#3.5) DEVICE(#3.5)

  • INPUT TRANSFORM:  S %ZISV=$P(^%ZIS(1,D0,0),U,9),DIC("S")="I $L($P(^(0),U,2)),$P(^(0),U,9)=%ZISV" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  APR 20, 1988
  • HELP-PROMPT:  Enter the device that this device is slaved off of.
  • DESCRIPTION:  This field may permit queuing to slaved devices. Given hard-wiring such that a display terminal may be identified with a device name, queuing may take place to the slaved device ($I=0). Enter the device name of the
    display terminal in this field.
  • SCREEN:  S DIC("S")="I $L($P(^(0),U,2)),$L($P(^(0),U,8,9))<2"
  • EXPLANATION:  Can't slave off of a slave or remote device
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
31 AUTO DESPOOL 1;8 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  SEP 07, 1989
  • DESCRIPTION:  
    Answer 'YES' if the report is to be automatically despooled.
32 DESPOOL DEVICES SPL;0 POINTER Multiple #3.532 3.532

  • DESCRIPTION:  
    This is the list of printers that reports will be printed during the despool process for the named spool device.
33 GENERATE SPL DOC NAME 1;9 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  SEP 07, 1989
  • HELP-PROMPT:  Enter 'YES' if you want the system to generate document name.
  • DESCRIPTION:  
    Answer 'YES' to this field if the spool document name is to be automatically generated.
35 RESOURCE SLOTS 1;10 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 22, 1994
  • HELP-PROMPT:  Type a Number between 1 and 999, 0 Decimal Digits
  • DESCRIPTION:  
    Enter a value that will identify the limit of concurrent jobs that may own the same resource. If no data is entered, the device handler will use a default value of 1.
    WRITE AUTHORITY: ^
  • NOTES:  TRIGGERED by the TYPE field of the DEVICE File
  • CROSS-REFERENCE:  ^^TRIGGER^3.54^1
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 X ^DD(3.5,35,1,1,89.2) S Y(101)=$S($D(^%ZISL(3.54,D0,0)):^(0),1:"") S X=$P(Y(101),U,2) S D0=I(0,0) S DIU=X K Y X ^DD(3.5,35,1,1,1.1) X ^DD(3.5,35,1,1,1.4)
    1.1)= S X=DIV X ^DD(3.5,35,1,1,49.4) S Y=X,X=Y(1),X=X-Y S D0=I(0,0) S D1=I(101,0)
    1.4)= S DIH=$S($D(^%ZISL(3.54,DIV(0),0)):^(0),1:""),DIV=X I $D(^(0)) S $P(^(0),U,2)=DIV,DIH=3.54,DIG=1 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    49.2)= S I(0,0)=$S($D(D0):D0,1:""),Y(2)=$S($D(^%ZIS(1,D0,0)):^(0),1:"") S X=DIV,Y(1)=X S X=$P(Y(2),U,2) K DIC S DIC="^%ZISL(3.54,",DIC(0)="NMF" D ^DIC S (D,D0)=+Y
    49.3)= X ^DD(3.5,35,1,1,49.2) S I(100,0)=$S($D(D0):D0,1:""),I(101,0)=$S($D(D1):D1,1:""),Y(101)=X,Y(202)=""
    49.4)= X ^DD(3.5,35,1,1,49.3) X "F D1=0:0 S D1=$O(^%ZISL(3.54,D0,1,D1)) Q:D1'>0 S:$S($D(^(D1,0)):$P(^(0),U,1),1:"""")'?."" "" Y(202)=Y(202)+1" S D(1)=D1 S X=+Y(202)
    89.2)= S I(0,0)=$S($D(D0):D0,1:""),Y(1)=$S($D(^%ZIS(1,D0,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S X=X K DIC S DIC="^%ZISL(3.54,",DIC(0)="NMF" D ^DIC S (D,D0,DIV(0))=+Y
    CREATE VALUE)= (#35)-(#1:RESOURCE:COUNT(#2))
    DELETE VALUE)= NO EFFECT
    DIC)= LOOKUP
    FIELD)= #1:RESOURCE:AVAILABLE SLOTS
36 GLOBAL LOCK GBL;1 SET
  • '0' FOR No;
  • '1' FOR Yes;

  • OUTPUT TRANSFORM:  S Y=Y
  • LAST EDITED:  NOV 08, 2007
  • DESCRIPTION:  
    This field tells the device handler if it should use a global lock to control access to a device.
  • TECHNICAL DESCR:  This field locks ^%ZIS("lock",IO) in the device handler. It is cleared in %ZISC. It is not limited to CHAN devices anymore.
    In the past this field held a global to lock but there was no code to support it. Old description: Identify a global to lock/unlock to be used to limit the access to a given channel to one client.
51 OPEN COUNT 5;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 12, 2005
  • HELP-PROMPT:  Type a Number between 0 and 99999999, 0 Decimal Digits
  • DESCRIPTION:  
    This field holds a count of the number of times that %ZIS has successfully open this device. The reason is to find LAT devices that are still in use.
51.1 TIMED READ (# OF SECONDS) XUS;10 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 06, 1983
  • HELP-PROMPT:  NUMBER OF SECONDS (1-99999) THAT TERMINAL WILL WAIT FOR A RESPONSE
  • DESCRIPTION:  
    The number of seconds for timed reads at this device. It is overridden by the Timed Read specification in the USER File.
51.12 *RESERVED XUS;12 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1)!'(X?.E) X
  • LAST EDITED:  AUG 08, 1994
  • HELP-PROMPT:  Reserved for XUS
    WRITE AUTHORITY: ^
51.13 *RESERVED XUS;13 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1)!'(X?.E) X
  • LAST EDITED:  AUG 08, 1994
  • HELP-PROMPT:  Reserved for XUS
    WRITE AUTHORITY: ^
51.14 *RESERVED XUS;14 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1)!'(X?.E) X
  • LAST EDITED:  AUG 08, 1994
  • HELP-PROMPT:  Reserved for XUS
    WRITE AUTHORITY: ^
51.15 *RESERVED XUS;15 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1)!'(X?.E) X
  • LAST EDITED:  AUG 08, 1994
  • HELP-PROMPT:  Reserved for XUS
    WRITE AUTHORITY: ^
51.2 # OF ATTEMPTS XUS;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>5)!(X<1)!(X?.E1"."1.N) X
  • LAST EDITED:  MAR 30, 2001
  • HELP-PROMPT:  Type a integer between 1 and 5.
  • DESCRIPTION:  The number of sign-on attempts before the device is locked from use. This may be ignored by setting the BYPASS DEVICE LOCK-OUT field in the KERNEL SITE PARAMETERS File. The minimum value is set by the VA INFORMATION
    SYSTEM ACCOUNT AND PASSWORD MANAGEMENT POLICY.
51.3 LOCK-OUT TIME XUS;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<600)!(X?.E1"."1.N) X
  • LAST EDITED:  MAR 30, 2001
  • HELP-PROMPT:  Type a integer between 600 and 99999999.
  • DESCRIPTION:  This is the amount of time that the device must be idle before the lock will release. This may be ignored by setting the BYPASS DEVICE LOCK-OUT field in the KERNEL SITE PARAMETERS File. The minimum value is set by the VA
    INFORMATION SYSTEM ACCOUNT AND PASSWORD MANAGEMENT POLICY.
51.4 MULTIPLE SIGN-ON XUS;4 SET
  • '0' FOR NOT ALLOWED;
  • '1' FOR ALLOWED;

  • DESCRIPTION:  
    Specifies whether or not the user of this device can be already signed on the system. It is overridden by the Multiple Sign-on specification in the USER File.
51.5 ASK DEVICE TYPE AT SIGN-ON XUS;5 SET
  • '1' FOR YES, ASK;
  • '0' FOR NO, DON'T ASK;

  • LAST EDITED:  DEC 18, 1985
  • HELP-PROMPT:  'ASK' IF ALL USERS SIGNING-ON TO THIS DEVICE SHOULD BE ASKED 'DEVICE TYPE'
  • DESCRIPTION:  This field (if filled in) will over ride the ones in the KERNEL site parameter file. This is overridden by the same specification in the NEW PERSON File. It controls if the user/terminal should be asked for a terminal
    type during sign-on. If set to YES then a is sent to the terminal to collect the answer back message, if valid the terminal type is set to this. Otherwise the user is prompted. If set to NO then the one from the
    Last Sign-on field or device subtype will be used.
  • EXECUTABLE HELP:  W !,"IF DEVICE IS A DIAL-UP MODEM, OR A 'SWITCHED' PORT,",!?3,"THE ANSWER SHOULD PROBABLY BE 'A'",!
51.6 AUTO MENU XUS;6 SET
  • '0' FOR NO MENUS GENERATED;
  • '1' FOR MENUS GENERATED;

  • LAST EDITED:  MAY 02, 1983
  • DESCRIPTION:  This field controls whether the Auto-menu function will be turned on for this device. If it is turned on, it acts just as if the user types a "?" before each prompt. This is overridden by the same specification in the USER
    File.
51.7 *RESERVED XUS;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1)!'(X?.E) X
  • LAST EDITED:  AUG 08, 1994
  • HELP-PROMPT:  Reserved for XUS
    WRITE AUTHORITY: ^
51.8 TIED ROUTINE XUS;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>13!($L(X)<3) X
  • LAST EDITED:  APR 03, 1984
  • HELP-PROMPT:  ENTER A ROUTINE NAME IF TERMINAL SHOULD INVOKE THAT ROUTINE *WITHOUT* ASKING USER ACCESS CODE
  • DESCRIPTION:  
    This field, if filled in, has the name of a routine that is run before the 'ACCESS CODE' question is asked. Use with care.
51.9 TYPE-AHEAD XUS;9 SET
  • 'Y' FOR ALLOWED;
  • 'N' FOR NOT ALLOWED;

  • LAST EDITED:  DEC 06, 1983
  • HELP-PROMPT:  ANSWER 'Y' IF USERS CAN ANSWER QUESTIONS BEFORE THEY ARE ASKED!
  • DESCRIPTION:  
    Should the user of this device have 'Type-Ahead' turned on or off. This will be overridden by the same specification in the USER File.
51.91 PERFORM DEVICE CHECKING XUS;11 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  AUG 08, 1985
  • HELP-PROMPT:  Override the turning off of the device checking from the KERNEL.
  • DESCRIPTION:  This field, if set, will override the default in the KERNEL SITE PARAMETERS File.
    Device checking involves checking for device lockout, prohibited access times, etc. If turned off, logon will be faster.
52 SECONDARY $I 2;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  APR 26, 2007
  • HELP-PROMPT:  Enter the $IO for the secondary system (1-40 char)
  • DESCRIPTION:  
    This field holds the $IO value to be used if this is the secondary system in a mixed OS environment. It is not used otherwise. It is only used for output devices.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
61 LAT SERVER NODE VMS;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<3)!'(X?1U1.9UN) X S %1=$P(^%ZIS(1,DA,0),U,2) F %=0:0 S %=$O(^%ZIS(1,"C",%1,%)) Q:%'>0 I %-DA,$D(^%ZIS(1,%,"VMS")),$P(^("VMS"),U,1)]"" W " See ",$P(^%ZIS(1,%,0),U,1) K X Q
  • LAST EDITED:  FEB 04, 1993
  • HELP-PROMPT:  Enter DECserver node name. Only setup 1 per LTA.
  • DESCRIPTION:  
    This is the DECserver/terminal server node name that the device is on. It is used by XTLATSET to build data files for VMS startup.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
62 LAT SERVER PORT VMS;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1)!'(X?1.15ANP) X
  • LAST EDITED:  FEB 13, 1992
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
  • DESCRIPTION:  This is the port on the DECserver/terminal server that this device is connected to. It can be entered in the LC-2-5 form or 31 form. On EQUINOX it is in the PORT_31 form. This field is used by XTLATSET to build VMS
    datafiles for startup.
63 VMS DEVICE TYPE VMS;3 SET
  • 'n' FOR NOT SPOOLED;
  • 'y' FOR YES SPOOLED;
  • 'm' FOR HOSTSYNC/NOWRAP;
  • 'l' FOR LAB INSTRUMENT;
  • 'w' FOR NOWRAP;
  • 'p' FOR PASTHRU/NOWRAP;

  • LAST EDITED:  JUN 17, 2004
  • HELP-PROMPT:  Will this device use VMS spooling or other special device settings
  • DESCRIPTION:  
    This is a flag that is passed into the file LT_PTR.DAT by the routine XTLATSET to select how this port should be setup in VMS by the SYS$MANAGER:SYSPRINT.COM file when it runs.
64 LAT PORT SPEED VMS;4 SET
  • '300' FOR 3;
  • '1200' FOR 12;
  • '2400' FOR 24;
  • '4800' FOR 48;
  • '9600' FOR 96;
  • '19200' FOR 192;

  • LAST EDITED:  JAN 03, 1992
  • HELP-PROMPT:  Enter the speed that the permanent database should be set to.
  • DESCRIPTION:  
    This field holds the value that will be passed to the TSC_LOAD.COM file for loading the DECserver permanent database.
65 PRINT SERVER NAME OR ADDRESS VMS;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>45!($L(X)<3) X
  • LAST EDITED:  JUL 22, 2003
  • HELP-PROMPT:  Enter the FQDN or TCP/IP address of the remote server.
  • DESCRIPTION:  
    This field contains the FQDN (fully qualified domain name) or specific TCP/IP address of a remote server (e.g., for LPD/LPR printing) or device (e.g., for telnet printer).
66 TELNET PORT VMS;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>65534)!(X<2000)!(X?.E1"."1.N) X
  • LAST EDITED:  AUG 25, 2003
  • HELP-PROMPT:  Enter the telnet port (range = 2000 to 65534)
  • DESCRIPTION:  
    This field contains the telnet port of a remote device (e.g., a telnet printer). The allowable range is a number between 2000 and 65534.
67 REMOTE PRINTER NAME VMS;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>45!($L(X)<2) X
  • LAST EDITED:  AUG 18, 2004
  • HELP-PROMPT:  Answer must be 2-45 characters in length
  • DESCRIPTION:  
    This is the Name of the Remote Printer that is referenced by the "PRINT SERVER NAME OR ADDRESS" and "TELNET PORT" fields.
75 WINDOWS NETWORK PRINTER NAME WIN;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<5) X
  • LAST EDITED:  AUG 23, 2011
  • HELP-PROMPT:  Answer must be 5-50 characters in length.
  • DESCRIPTION:  
    This is the Windows network name for the printer (e.g., '\\vhaistfpc4\IST-HP4525-1'). It is used by Windows applications that interact with VistA and need a printer identified for output purposes.
101 LAB LABEL PRINTER 101;1 POINTER TO DEVICE FILE (#3.5) DEVICE(#3.5)

  • LAST EDITED:  NOV 19, 1984
  • HELP-PROMPT:  If there is a label printer associated with this device, indicate it
  • DESCRIPTION:  
    This field is used only if the current device has a label printer associated with it.
201 PRIMARY MENU OPTION 201;1 POINTER TO OPTION FILE (#19) OPTION(#19)

  • LAST EDITED:  JAN 04, 1984
  • DESCRIPTION:  
    This field, if filled in, contains the primary menu that is run from this device. It overrides the user's primary menu.
646 BARCODE AVAIL 646;1 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  SEP 18, 1987
  • DESCRIPTION:  
    This field is used by Augie Turano's pharmacy barcode software.
2007 CURRENT UNSUCCESSFUL ATTEMPTS COMPUTED

  • MUMPS CODE:  S X=$P(^%ZIS(1,D0,0),U,2) Q:X="" S X=$S($D(^DISV("XU",X)):+^(X),1:"")
  • ALGORITHM:  S X=$P(^%ZIS(1,D0,0),U,2) Q:X="" S X=$S($D(^DISV("XU",X)):+^(X),1:"")
  • LAST EDITED:  MAY 28, 1992
  • DESCRIPTION:  This is a count of the current number of unsuccessful attempts that have been made on this device. If it exceeds the DEFAULT # OF ATTEMPTS in the KERNEL SITE PARAMETERS File, the device will be locked for the duration
    specified in DEFAULT LOCKOUT TIME in the KERNEL SITE PARAMETERS.
    This field is maintained internally by the KERNEL.
2008 LAST SIGN-ON USER COMPUTED

  • MUMPS CODE:  S X=$S($D(^XUSEC(0,"ALDEV",D0)):$S($D(^VA(200,+^(D0),0)):$P(^(0),U,1),1:""),1:"")
  • ALGORITHM:  S X=$S($D(^XUSEC(0,"ALDEV",D0)):$S($D(^VA(200,+^(D0),0)):$P(^(0),U,1),1:""),1:"")
  • LAST EDITED:  DEC 08, 1983
  • DESCRIPTION:  
    This is the name of the last user who signed on to this device. It is controlled internally by the KERNEL.
2009 PROHIBITED TIMES FOR SIGN-ON TIME;1 FREE TEXT

  • INPUT TRANSFORM:  K:$E(X,1,2)>23!($E(X,3,4)>59)!'(X?4N1"-"4N)!($E(X,6,7)>23)!($E(X,8,9)>59) X
  • LAST EDITED:  JAN 02, 1990
  • HELP-PROMPT:  RANGE OF MILITARY TIMES (HHMM-HHMM) DURING WHICH SIGN-ONS WON'T BE ALLOWED
  • DESCRIPTION:  This field allows a device to be locked out for certain periods of the day. The time period for which logons will be prohibited is specified in the form HHMM-HHMM. For example, 1630-0800 would lock out the device from 4:30
    PM to 8:00 AM.
    If device checking is bypassed for this device, these times are ignored.
  • EXECUTABLE HELP:  W !?7,"FOR EXAMPLE, TO SHUT OFF DEVICE OVERNIGHT, TYPE '1630-0800'"
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
2009.5 USE TIMEOUT ON OPENS TIME;3 SET
  • 'n' FOR NO;
  • 'y' FOR YES;

  • LAST EDITED:  NOV 16, 1990
  • DESCRIPTION:  
    This field determines whether a timeout will be used to open the device.
2010 OPEN TIMEOUT TIME;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>10)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 05, 1988
  • HELP-PROMPT:  Type a Number between 0 and 10, 0 Decimal Digits
  • DESCRIPTION:  If a specific timeout is needed when an open is performed, enter the value of the timeout into this field. This will enable %ZIS to "hang" for the number of seconds specified in this field to achieve a connection rather
    than using the default of zero.
18000 NVS PASSOVER FLAG NV;1 SET
  • '1' FOR YES;

  • LAST EDITED:  AUG 19, 2010
  • HELP-PROMPT:  Is this device to not be cleared in the test account?
  • DESCRIPTION:  This field is a flag which will allow for the devices so selected to be skipped in the NVS TEST ACCOUNT initialization process. If the test database has a different path to the device in question, some editting may be
    needed.

Found Entries, Total: 54

NAME: TIS51    NAME: TIS52    NAME: TIS53    NAME: TIS54    NAME: CONSOLE    NAME: LATTERM    NAME: TCP/IP DEVICE    NAME: NULL    
NAME: LMINIOUT0    NAME: HFS    NAME: FAUX PRINTER    NAME: BROWSER DSM/VMS    NAME: BROWSER MSM/DOS    NAME: BROWSER MSM/NT    NAME: MESSAGE P-MESSAGE-HFS-MSM/DOS    NAME: MESSAGE P-MESSAGE-HFS-VXD    
NAME: MESSAGE P-MESSAGE-HFS-OPENM-NT    NAME: MESSAGE P-MESSAGE-HFS-MSM/NT    NAME: VIC CARD    NAME: IBD RESOURCE    NAME: TIU/PXAPI RESOURCE    NAME: TELNET    NAME: OR WORKSTATION    NAME: ORW/PXAPI RESOURCE    
NAME: ORB NOTIFICATION RESOURCE    NAME: OR MOVEMENT RESOURCE    NAME: BROWSER (CIRN)    NAME: XDRBROWSER1    NAME: BROWSER CACHE/NT    NAME: MSM/HFS    NAME: NULL-DSM    NAME: SCCV RESOURCE    
NAME: ORW THREAD RESOURCE    NAME: OR WINDOWS HFS    NAME: IMAGING WORKSTATION    NAME: LRRESOURCE    NAME: RG QUEUE    NAME: DG FIELD MONITOR    NAME: GTM-UNIX-NULL    NAME: GTM-UNIX-TELNET    
NAME: GTM-UNIX-CONSOLE    NAME: HDIS VUID RESOURCE DEVICE    NAME: HDIS STATUS RESOURCE DEVICE    NAME: GMRA UPDATE RESOURCE    NAME: PRCHITEM    NAME: SYS$INPUT    NAME: REMOTE TERMINAL    NAME: CACHE-WINDOWS-CONSOLE    
NAME: TRM    NAME: ORWG GRAPHING RESOURCE    NAME: HOME    NAME: FTA    NAME: HMP EXTRACT RESOURCE    NAME: TIU ACTIONS RESOURCE    

ICR, Total: 9

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #290
  • Fee Basis
  • CMOP
  • Fee Basis
  • ICR #835
  • Controlled Substances
  • ICR #1139
  • Order Entry Results Reporting
  • Clinical Information Resource Network
  • Clinical Reminders
  • NAME (.01).
    Access: Both R/W w/Fileman

    $I (1).
    Access: Both R/W w/Fileman

    TYPE (2).
    Access: Both R/W w/Fileman

    RESOURCE SLOTS (35).
    Access: Both R/W w/Fileman

    ICR #2469
  • Lab Service
  • LAB LABEL PRINTER (101).
    Access: Read w/Fileman

    ICR #2963
  • Order Entry Results Reporting
  • NAME (.01).
    Access: Direct Global Read & w/Fileman

    (1).
    Access: Direct Global Read & w/Fileman

    QUEUING (5.5).
    Access: Direct Global Read & w/Fileman

    LOCATION OF TERMINAL (.02).
    Access: Direct Global Read & w/Fileman

    OUT-OF-SERVICE DATE (6).
    Access: Direct Global Read & w/Fileman

    MARGIN WIDTH (9).
    Access: Direct Global Read & w/Fileman

    PAGE LENGTH (11).
    Access: Direct Global Read & w/Fileman

    SECURITY (15).
    Access: Direct Global Read & w/Fileman

    PROHIBITED TIMES FOR SIGN-ON (2009).
    Access: Direct Global Read & w/Fileman

    TYPE (2).
    Access: Direct Global Read & w/Fileman

    ICR #3262
  • General Medical Record - Vitals
  • $I (1).
    Access: Direct Global Read & w/Fileman

    QUEUING (5.5).
    Access: Direct Global Read & w/Fileman

    SUBTYPE (3).
    Access: Direct Global Read & w/Fileman

    ICR #5718
  • Outpatient Pharmacy
  • WINDOWS NETWORK PRINTER NAME (75).
    Access: Direct Global Read & w/Fileman

    ICR #6147
  • VA Point of Service
  • NAME (.01).
    Access: Read w/Fileman

    LOCATION OF TERMINAL (.02).
    Access: Read w/Fileman

    MARGIN WIDTH (9).
    Access: Read w/Fileman

    PAGE LENGTH (11).
    Access: Read w/Fileman

    PRINT SERVER NAME OR ADDRESS (65).
    Access: Read w/Fileman

    ICR #10114 NAME (.01).
    Access: Read w/Fileman

    TYPE (2).
    Access: Read w/Fileman

    SUBTYPE (3).
    Access: Read w/Fileman

    External References

    Name Field # of Occurrence
    ^%DT 6+1
    BAUD^%ZOSV 20+1
    $$TEST^DDBRT 19.7(IEN:12), 19.7(IEN:13), 19.7(IEN:14), 19.7(IEN:28), 19.7(IEN:29)
    POST^DDBRZIS 19.8(IEN:12), 19.8(IEN:13), 19.8(IEN:14), 19.8(IEN:18), 19.8(IEN:29)
    EN^DDIOL ID.02+1, ID1+1, ID1.9+1, 1+1
    ^DIC 1(XREF 4n89.2), 2(XREF 1n89.2), 28+1, 35(XREF 1n49.2), 35(XREF 1n89.2)
    ^DICR 1(XREF 4n1.4), 2(XREF 1n1.4), 2(XREF 2n1.4), 35(XREF 1n1.4)
    ^DIM 19.7+1, 19.8+1
    POSTCLS^RGEDBRS 19.8(IEN:27)
    PREOPEN^RGEDBRS 19.7(IEN:27)
    EN^XMAPHOST 19.7(IEN:17)

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^%IS( 20+1
    ^%ZIS(1 - [#3.5] .01(XREF 1S), .01(XREF 1K), .04(XREF 1S), .04(XREF 1K), 1+1, 1OF9.2+1*, 1OF9.3+1*, 1(XREF 1S), 1(XREF 1K), 1(XREF 2S)
    1(XREF 3S), 1(XREF 3K), 1(XREF 4n1.3), 1(XREF 4n89.2), 1.9OF9.2+1!*, 1.9OF9.3+1*, 1.9(XREF 1S), 1.9(XREF 1K), 1.9(XREF 2S), 1.9(XREF 2K)
    , 1.95OF9.2+1!, 1.95(XREF 1S), 1.95(XREF 1K), 2(XREF 1n1.1), 2(XREF 1n89.2), 2(XREF 2S), 2(XREF 2n1.3), 2(XREF 2n1.4), 17(XREF 1S), 17(XREF 1K)
    , 20+1, 28+1, 35(XREF 1n49.2), 35(XREF 1n89.2), 61+1, 2007+1, .01+1, .01(XREF 1S), .01(XREF 1K)
    ^%ZISL(3.54 - [#3.54] 1(XREF 4S), 1(XREF 4n1.4), 2(XREF 1n1.4), 35(XREF 1S), 35(XREF 1n1.4)
    ^%ZOSF("OS" 20+1
    ^DD( 1(XREF 4n1.4), 2(XREF 1n1.4), 2(XREF 2n1.4), 35(XREF 1n1.4)
    ^DD(3.5 1OF9.2+1, 1OF9.3+1, 1(XREF 2S), 1(XREF 4S), 1.9OF9.2+1, 1.9OF9.3+1, 1.9(XREF 1S), 1.9(XREF 1K), 1.95(XREF 1S), 2(XREF 1S)
    2(XREF 2S), 35(XREF 1S), 35(XREF 1n1.1), 35(XREF 1n49.3), 35(XREF 1n49.4)
    ^DISV("XU" 2007+1
    ^VA(200 - [#200] 2008+1
    ^XUSEC(0 - [#3.081] 2008+1

    Naked Globals

    Name Field # of Occurrence
    ^( 1.9(XREF 2K), 1.95(XREF 1S), 2007+1, 2008+1
    ^("OS" 20+1
    ^("TYPE" 1+1, 1(XREF 4n1.3)
    ^("VMS" 61+1
    ^(0 ID1+1, ID1.9+1, 1OF9.2+1, 1(XREF 2S), 1(XREF 3S), 1(XREF 3K), 1(XREF 4S), 1(XREF 4n1.4), 1(XREF 4n89.2), 1.9OF9.2+1
    1.9(XREF 1S), 1.9(XREF 1K), 1.9(XREF 2S), 1.9(XREF 2K), 1.95OF9.2+1, 1.95(XREF 1S), 1.95(XREF 1K), 2(XREF 1n1.1), 2(XREF 1n1.4), 2(XREF 1n89.2)
    35(XREF 1S), 35(XREF 1n1.4), 35(XREF 1n49.2), 35(XREF 1n89.2), 2008+1
    ^(1 ID.02+1, 2(XREF 2S), 2(XREF 2n1.3), 2(XREF 2n1.4)
    ^(2 20+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % ID.02+1~*, 1+1~*, 15+1*, 61+1*
    >> %1 61+1*
    >> %DT 6+1*
    >> %ZIS("HFSNAME" 19.7(IEN:28)
    >> %ZISQUIT 19.7(IEN:12), 19.7(IEN:13), 19.7(IEN:14), 19.7(IEN:28), 19.7(IEN:29)
    >> %ZISV 28+1*
    >> D 1(XREF 4n89.2), 2(XREF 1n89.2), 35(XREF 1n49.2), 35(XREF 1n89.2)
    >> D(1 35(XREF 1n49.4)
    >> D0 1(XREF 4S), 1(XREF 4n1.3), 1(XREF 4n89.2), 2(XREF 1S), 2(XREF 1n1.1), 2(XREF 1n89.2), 2(XREF 2S), 2(XREF 2n1.3), 20+1, 28+1
    35(XREF 1S), 35(XREF 1n1.1), 35(XREF 1n49.2), 35(XREF 1n49.3), 35(XREF 1n89.2), 2007+1, 2008+1
    >> D1 35(XREF 1n1.1), 35(XREF 1n49.3), 35(XREF 1n49.4)
    >> DA .01(XREF 1S), .01(XREF 1K), .04(XREF 1S), .04(XREF 1K), 1OF9.2+1, 1OF9.3+1, 1(XREF 1S), 1(XREF 1K), 1(XREF 2S), 1(XREF 3S)
    1(XREF 3K), 1(XREF 4n1.3), 1.9OF9.2+1, 1.9OF9.3+1, 1.9(XREF 1S), 1.9(XREF 1K), 1.9(XREF 2S), 1.9(XREF 2K), 1.95OF9.2+1, 1.95(XREF 1S)
    1.95(XREF 1K), 2(XREF 1S), 2(XREF 2n1.3), 17(XREF 1S), 17(XREF 1K), 35(XREF 1S), 61+1, .01(XREF 1S), .01(XREF 1K)
    >> DA(1 .01(XREF 1S), .01(XREF 1K)
    DIC 1(XREF 4n89.2), 2(XREF 1n89.2), 28+1!*, 35(XREF 1n49.2), 35(XREF 1n89.2)
    DIC("S" 28+1*, 28SCR+1*
    DIC(0 1(XREF 4n89.2), 2(XREF 1n89.2), 35(XREF 1n49.2), 35(XREF 1n89.2)
    >> DIE 28+1
    >> DIG 1(XREF 4n1.4), 2(XREF 1n1.4), 2(XREF 2n1.4), 35(XREF 1n1.4)
    >> DIH 1(XREF 4n1.4), 2(XREF 1n1.4), 2(XREF 2n1.4), 35(XREF 1n1.4)
    >> DIU 1(XREF 4S), 2(XREF 2S), 35(XREF 1S)
    DIV 1(XREF 4S), 1(XREF 4n1.3), 1(XREF 4n1.4), 2(XREF 1S), 2(XREF 1n1.1), 2(XREF 1n1.4), 2(XREF 2S), 2(XREF 2n1.3), 2(XREF 2n1.4), 35(XREF 1S)
    35(XREF 1n1.1), 35(XREF 1n1.4), 35(XREF 1n49.2)
    DIV(0 1(XREF 4n1.3), 1(XREF 4n1.4), 1(XREF 4n89.2), 2(XREF 1S), 2(XREF 1n1.4), 2(XREF 1n89.2), 2(XREF 2n1.3), 2(XREF 2n1.4), 35(XREF 1S), 35(XREF 1n1.4)
    35(XREF 1n89.2)
    DUZ 19.7(IEN:14), 19.7(IEN:15), 19.7(IEN:18)
    DUZ(0 15+1
    >> I(0 1(XREF 4S), 1(XREF 4n89.2), 2(XREF 1n89.2), 35(XREF 1S), 35(XREF 1n1.1), 35(XREF 1n49.2), 35(XREF 1n89.2)
    >> I(100 35(XREF 1n49.3)
    >> I(101 35(XREF 1n1.1), 35(XREF 1n49.3)
    IO 19.7(IEN:16), 19.7(IEN:17), 19.7(IEN:28), 19.7(IEN:35)
    IO("HFS" 19.7(IEN:14), 19.8(IEN:14), 19.8(IEN:18)
    >> POP 19.7(IEN:17)
    U ID.02+1, ID1+1, ID1.9+1, 1OF9.2+1, 1OF9.3+1, 1(XREF 2S), 1(XREF 3S), 1(XREF 3K), 1(XREF 4S), 1(XREF 4n1.3)
    1(XREF 4n1.4), 1(XREF 4n89.2), 1.9OF9.2+1, 1.9OF9.3+1, 1.9(XREF 1S), 1.9(XREF 1K), 1.9(XREF 2S), 1.9(XREF 2K), 1.95OF9.2+1, 1.95(XREF 1S)
    1.95(XREF 1K), 2(XREF 1n1.1), 2(XREF 1n1.4), 2(XREF 1n89.2), 2(XREF 2S), 2(XREF 2n1.3), 2(XREF 2n1.4), 20+1, 28+1, 35(XREF 1S)
    35(XREF 1n1.4), 35(XREF 1n49.2), 35(XREF 1n89.2), 61+1, 2007+1, 2008+1
    X .01+1!, .01(XREF 1S), .01(XREF 1K), .02+1!, .04+1!, .04(XREF 1S), .04(XREF 1K), 1+1!, 1OF9.2+1, 1(XREF 1S)
    1(XREF 1K), 1(XREF 2S), 1(XREF 2K), 1(XREF 3S), 1(XREF 3K), 1(XREF 4S), 1(XREF 4n1.3), 1(XREF 4n1.4), 1(XREF 4n89.2), 1.9+1!
    1.9(XREF 1S), 1.9(XREF 1K), 1.9(XREF 2S), 1.9(XREF 2K), 1.95OF9.2+1, 1.95(XREF 1S), 2(XREF 1S), 2(XREF 1n1.1), 2(XREF 1n1.4), 2(XREF 1n89.2)
    2(XREF 2S), 2(XREF 2n1.3), 2(XREF 2n1.4), 6+1*!, 7+1!, 8+1!, 9+1!, 11+1!, 15+1!, 17+1!
    17(XREF 1S), 17(XREF 1K), 19.3+1!, 19.5+1!, 19.7+1!, 19.8+1!, 20+1*, 25+1!, 27+1!, 28+1*!
    , 35+1!, 35(XREF 1S), 35(XREF 1n1.1), 35(XREF 1n1.4), 35(XREF 1n49.2), 35(XREF 1n49.3), 35(XREF 1n49.4), 35(XREF 1n89.2), 51+1!, 51.1+1!
    , 51.12+1!, 51.13+1!, 51.14+1!, 51.15+1!, 51.2+1!, 51.3+1!, 51.7+1!, 51.8+1!, 52+1!, 61+1!
    , 62+1!, 65+1!, 66+1!, 67+1!, 75+1!, 2007+1*, 2008+1*, 2009+1!, 2010+1!, .01+1!
    .01(XREF 1S), .01(XREF 1K)
    >> XDRDVALF 19.7(IEN:28)
    >> XMPMSG 19.7(IEN:15), 19.7(IEN:18)
    Y 1(XREF 4S), 1(XREF 4n89.2), 2(XREF 1n89.2), 2(XREF 2S), 2(XREF 2n1.3), 6+1, 28+1, 35(XREF 1S), 35(XREF 1n1.1), 35(XREF 1n49.2)
    35(XREF 1n89.2), 36OT+1*
    Y(0 1(XREF 4n1.3), 2(XREF 1S), 2(XREF 2n1.3), 36OT+1*
    Y(1 1(XREF 4n1.3), 1(XREF 4n89.2), 2(XREF 1n1.1), 2(XREF 1n89.2), 2(XREF 2S), 2(XREF 2n1.3), 35(XREF 1n1.1), 35(XREF 1n49.2), 35(XREF 1n89.2)
    Y(101 1(XREF 4S), 35(XREF 1S), 35(XREF 1n49.3)
    Y(2 2(XREF 2n1.3), 35(XREF 1n49.2)
    Y(202 35(XREF 1n49.3), 35(XREF 1n49.4)
    Y(3 2(XREF 2n1.3)
    ZISNX 1.9OF9.2+1, 1.9(XREF 1S), 1.9(XREF 1K)
    ZISOX 1(XREF 2S), 1(XREF 2K), 1.9OF9.2+1, 1.9(XREF 1S), 1.9(XREF 1K)
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All