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 |  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: 207

Package Total Routines
Kernel 54 %ZIS    %ZIS1    %ZIS2    %ZIS3    %ZIS4    %ZIS5    %ZIS6    %ZISC
%ZISF    %ZISUTL    %ZOSV    %ZTLOAD1    %ZTM1    %ZTM4    %ZTMS2    DESPOOL DEVICES
MNEMONIC    XPDIA2    XPDIL    XQ12    XQ21    XQ9    XQALFWD    XQSRV1
XQUSR    XU8P440    XU8P546    XU8P585    XUCHANGE    XUDHGUI    XUDHRES    XUDHSET
XUHGLST    XUINP348    XUINPCH    XUP    XUS    XUS3    XUSG    XUSRB5
XUSTAT2    XUTMR    XUTMRP    XUTMTEIO    ZIS4    ZISHUNT    ZISPL1    ZISPQ
ZISX    ZOSVMNT    ZOSVPC43    ^%ZIS(1    ^DIC(19    ^XUSEC(0    
Lab Service 13 LRHY0    LRHY01    LRHYAFT    LRHYBL1    LRHYBLD    LRHYPH0    LRHYPH2    LRJOB
LRORDST    LRZ3JOB    LRZ3LABL    LRZ4JOB    LRZ4LABL    
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    
Commitment Register 8 ACRFPAY3    ACRFPRNT    ACRFPSR    ACRFRRPT    ACRFZIS    ACRPCC    ACRPPRG    ACRPPUR
Registration 6 DG53528P    DG53P526    DGDIS    DGQPTQ1    DGREG    DGRPTU    
Alcohol Chemical Dependency 5 ACD    ACDCINV2    ACDCSD    ACDDE2    ACDPCCL4    
IHS Changes To Lab 5 BLRAG02    BLRAG10    BLRAGUT    BLRLM    BLRLMR    
IHS VA %Utilities 5 ZIBPKGF    ZIBPKGP    ZIBRPI    ZIBRPI1    ZIBTCP    
Local Area Programs 5 AZAMWRN    AZANWRN    AZHLRER    AZHLRERP    AZHQPRNT    
Order Entry Results Reporting 5 ORB3SPEC    ORQPTQ1    ORWRP    ORWU    ORWU16    
IHS Generic Interface System 4 INHB1    INHOS    INHUT8    INHVCRA1    
MailMan 4 XMC1B    XMCD1    XMDIR1    XMXADDR3    
PCC Medical Query 4 AMQQMGR2    AMQQMGR5    AMQQRML    AMQQSEC    
VA Fileman 4 DINV1VXD    DINVDTM    DINVMSM    DINVONT    
Auto Replenishment Ward Stock 3 PSGWPI    PSGWPI1    PSGWPIS    
Barcode Medication Administration 3 ALPBUTL    PSBIHS2    PSBRPC1    
Health Level Seven 3 HLCSDL    HLCSDR    ^HL(770    
IHS Changes To Pharmacy 3 APSAPPIM    APSPLBL    APSPSOB    
NCR Financial System 3 AFSHCK1    AFSHCRTS    AFSHTCK1    
Scheduling 3 SCCVPOST    SCRPPAT    SDCNSLT    
Text Integration Utility 3 TIUDEV    TIUPRPN5    TIUPRPN7    
Automated Lab Instruments 2 LABCX7S    LADJOB    
CMOP 2 PSXRPPL    PSXSRP    
IHS VA Utilities 2 XBGCMP    XBLM    
Inpatient Medications 2 PSJ0095    ^PS(57.5    
Patient Care Component 2 APCHS    APCHSM    
Utilities 2 AUCLS    AULOCATE    
3780 Telecommunications 1 AFSTCK1    
Automated Information Collection System 1 IBD3KPT    
CIA Utilities 1 CIAUHFS    
ClassMan 1 KLASMAN    
Contract Health Management Information System 1 ACHSTCK1    
IBM DDPS Record Consolidation 1 AIBSDEV    
IHS Accounts Receivable 1 BAR277LM    
IHS Changes To Scheduling 1 BSDAPP    
IHS Dental System 1 ADEPX    
IHS Emergency Dept Dashboard 1 BEDDADM    
IHS GPRA Information System 1 BGPXBLM    
IHS Immunizations Interface 1 BYIMIMM6    
Medicine 1 MCWORKLD    
Nursing Acuity 1 ANSCZIS    
Nursing Service 1 NUR13PST    
Outpatient Pharmacy 1 PSOTALK    
Pharmacy Point of Sale 1 ABSPMHDR    
Phoenix Devel Center 1 AZXPSPL    
Supply 1 ASUUZIS    
Toolkit 1 XTLATSET    
VueCentric Framework 1 CIAVUTIO    

Accessed By FileMan Db Calls, Total: 43

Package Total Routines
Radiology Nuclear Medicine 6 RADOSTIK    RAEDCN    RAHLO4    RAORD    RAPSET1    RAUTL0    
Inpatient Medications 4 PSGPER    PSJ010    PSJPRE42    PSJUTL    
Outpatient Pharmacy 4 PSOB    PSOBGMG1    PSOBGMG2    PSOBMST    
Controlled Substances 3 PSDTER    PSDTER1    PSDTER2    
IHS Changes To Lab 3 BLRAG05A    BLRLBOE    BLRUER    
Lab Service 3 LRHYAFT    LRLABLIO    LRLNC63    
Contract Health Management Information System 2 ACHSEOB    ACHSTCK1    
MailMan 2 XMDIR1    XMXADDR3    
Scheduling 2 SDRRTSK    SDRRTSK1    
Automated Information Collection System 1 IBD3KPT    
ClassMan 1 KLASMAN3    
Clinical Reminders 1 PXRMHOST    
Consult Request Tracking 1 GMRCSLM4    
Health Data and Informatics 1 HDI1000B    
Health Summary 1 GMTSXAW3    
IHS Prenatal Care Module 1 BJPNPRNT    
Immunization Tracking 1 BIUTL9    
MSC RPC Broker 1 CIANBUTL    
NCR Financial System 1 AFSLRTT3    
National Drug File 1 PSNPPIP    
Order Entry Results Reporting 1 ORLPR0    
Registration 1 DGQEPST1    
Text Integration Utility 1 TIUPS139    

Pointed To By FileMan Files, Total: 66

Package Total FileMan Files
Kernel 11 MICOM CONTENTION DEVICES(#106)[.01]    MICOM SITE PARAMETERS(#108)[12]    DEVICE(#3.5)[1628101#3.532(.01)]    LINE/PORT ADDRESS(#3.23)[2]    PRINT QUEUE JOB(#3.52)[.01]    MICOM PORT ASSIGNMENTS(#107.3)[1]    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]    
IHS Changes To Lab 5 IHS ADT PARAMETERS(#9009020.1)[.04]    IHS LAB SUPERVISOR TASKED REPORTS PARAMETERS(#90475.7)[#90475.71(7)#90475.72(6)#90475.73(5)]
BLR REFERENCE LAB(#9009026)[5]    BLR MASTER CONTROL(#9009029)[3002]    IHS SCHEDULING PARAMETERS(#9009020.2)[.05.06.11.21]    
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)]
Radiology Nuclear Medicine 4 RAD/NUC MED DIVISION(#79)[100]    IMAGING LOCATIONS(#79.1)[3510162324]    RADIOLOGY REQUESTING LOCATIONS(#79.199)[3]    RAD/NUC MED PROCEDURES(#71)[3]    
Inpatient Medications 3 INPATIENT USER PARAMETERS(#53.45)[.13]    WARD GROUP(#57.5)[32]    INPATIENT WARD PARAMETERS(#59.6)[.19.24]
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.02008(.01)]    GROUP DISPLAY(#59.3)[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.09]    
Health Level Seven 2 HL LOWER LEVEL PROTOCOL PARAMETER(#869.2)[200.01300.01]    HL LOGICAL LINK(#870)[200.01300.01]    
Health Summary 2 VA HEALTH SUMMARY TYPE(#142)[#142.2(.02)]    HEALTH SUMMARY PARAMETERS(#142.99)[.04]    
IHS Changes To Pharmacy 2 APSP CONTROL(#9009033)[401]    APSS PARAMETERS(#9009033.1)[.03#9009033.12(.02)]    
Scheduling 2 HOSPITAL LOCATION(#44)[22901]    TEAM(#404.51)[.04]    
Utility Tables 2 REFERENCE CODE(#9999999.63)[4]    FMS DEPARTMENT/PROGRAM(#9999999.62)[18]    
Alcohol Chemical Dependency 1 CDMIS PROGRAM(#9002173)[1104]    
Commitment Register 1 FMS PURCHASING OFFICE(#9002199.4)[.02.14.15.17.1810]    
Contract Health Management Information System 1 CHS DOCUMENT PRINTED LIST(#9002067)[.01]    
Dietetics 1 FH SITE PARAMETERS(#119.9)[#119.93(.01)]    
Drug Accountability 1 DRUG ACCOUNTABILITY STATS(#58.8)[24252629]    
IHS Accounts Receivable 1 A/R COLLECTION POINT/IHS(#90051.02)[11]    
IHS Changes To Scheduling 1 IHS WARD DEFINITION(#9009016.5)[.04]    
IHS Pharmacy Auto Refill System 1 BEX REFILL PARAMETER(#90350.2)[12]    
Medicine 1 MEDICINE PACKAGE PARAMETERS(#690.1)[#690.18(.01)]    
Nursing Service 1 NURS PARAMETERS(#213.9)[2]    
PCC Medical Query 1 QMAN SITE PARAMETERS(#9009078)[#9009078.01(.01)#9009078.02(.01)#9009078.04(.04)]
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)]
Pharmacy Point of Sale 1 ABSP PHARMACIES(#9002313.56)[115.01]    
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:  DEC 16, 1988
  • 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.
  • 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:  OCT 01, 1984
  • 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.
.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:  OCT 29, 1993
  • 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",!
  • 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 04, 2009
  • 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.
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.

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

    External References

    Name Field # of Occurrence
    ^%DT 6+1
    BAUD^%ZOSV 20+1
    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

    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
    ^%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*
    >> %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
    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(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)
    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!
    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 |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All