Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: DIC1

Package: VA Fileman

Routine: DIC1


Information

DIC1 ;SFISC/GFT/TKW-READ X, SHOW CHOICES ;29SEP2010

Source Information

Source file <DIC1.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
VA Fileman 12 LIST^DDSU  $$EZBLD^DIALOG  (F,IX)^DIC  DSPH^DIC0  (GETPRMT,PROMPT)^DIC11  ($$EXT,C,GOT,WO)^DIC2  (ADDKEY,S)^DIC3  PTRID^DIC5  
Y^DICN  DSPHLP^DICQ  CHK^DIE  $$FMTE^DILIBF  

Caller Graph

Caller Graph Total: 176

Package Total Caller Graph
Lab Service 36 LRORD2  ^LAB(69.9  ACCESSION NUMBER  BACT RPT REMARK  BACTERIOLOGY SMEAR/PREP  COMMENT  FUNGUS/YEAST  GRAM STAIN  
LRBLDC  LRBLDED  LRBLDLG  LRBLDPH  LRBLDR  LRBLDRR  LRBLDT  LRBLDUC  
LRBLDX  LRBLS  LRMISR  MICROBIOLOGY  MYCOBACTERIUM  ORGANISM  PRELIMINARY BACT COMMENT  SPECIMEN #  
^LAB(61.2  MYCOLOGY RPT REMARK  MYCOLOGY SMEAR/PREP  PARASITE RPT REMARK  PARASITOLOGY SMEAR/PREP  PRELIMINARY MYCOLOGY COMMENT  PRELIMINARY PARASITE COMMENT  PRELIMINARY TB COMMENT  
PRELIMINARY VIROLOGY COMMENT  STAGE  TB RPT REMARK  VIROLOGY RPT REMARK  
VA Fileman 18 DIC  DIC0  DIC2  DIC3  DIC5  DICM  DICM0  DICM1  
DICM3  DICN  DICN0  DICQ  DIE1  DIE17  DIE3  DIE9  
DIED  DIEQ  
Patient Care Component Table Maintiance 14 APCM11E  APCM11ES  APCM11ET  APCM13E  APCM13ES  APCM13ET  APCM14E  APCM14ET  
APCM24E  APCM24ET  APCM25E  APCM25ET  APCM2AE  APCM2AET  
Patient Care Component Reports 12 APCLADX0  APCLAL3  APCLAP3  APCLAUD0  APCLDE3  APCLDIC  APCLDV3  APCLFPC  
APCLLTD  APCLVL0  APCLYV2  APCLYV6  
MailMan 8 XMCXU  XMHIU  XMKPRD  XMR1  XMVGRP  XMVSURR  XMXADDR1  XMXADDRD  
Inpatient Medications 7 PSGFILD0  PSGFILD3  PSGOE7  PSGOE8  PSGOE9  PSJPRE42  PSJUTL  
Order Entry Results Reporting 7 ORCMEDT1  ORCMEDT3  ORCMENU1  ORDV05E  ORLP01  ORWGAPIX  ORX1  
Consult Request Tracking 6 GMRCAR  GMRCASV  GMRCONS1  GMRCQC  GMRCQCST  GMRCYP57  
Mental Health Social Services 5 AMHRAS3  AMHRDE3  AMHRDV3  AMHRSB1  AMHRSR3  
Radiology Nuclear Medicine 5 RAPSAPI2  RARTE1  RARTE4  RARTST1  RASELCT  
Registration 4 DGENA5  DPTLK  DPTLK2  VAFCRAUD  
Adverse Reaction Tracking 3 CONCOMITANT DRUGS  GMRAPER0  SUSPECTED AGENT  
Automated Information Collection System 3 IBDF16  IBDF9A  IBDF9B  
Diabetes Registry 3 BDMDIC  BDMFDIC  BDMLLTD  
Health Level Seven 3 HLCSHDR3  HLUCM050  HLUCM090  
Outpatient Pharmacy 3 PSODRG  PSOORED6  PSOORNW2  
Pharmacy Data Management 3 PSSDI  PSSFIL  PSSPOIMO  
Scheduling 3 SCMCQK1  SCMCQK2  SDRRSLCT  
Automated Lab Instruments 2 LA7SMPXL  LA7SMU  
Barcode Medication Administration 2 PSBOBL  PSBOBZ  
IHS Electronic Health Record 2 BEHOCCD  BEHORXF3  
IHS ICD CPT Lookup and Grouper 2 AICDKWI0  AICDKWI9  
Kernel 2 XPDIL1  XUINTSK3  
Auto Replenishment Ward Stock 1 PSGWPST1  
Case Management System 1 ACMLPAT  
Clinical Reminders 1 PXRMDATA  
Commitment Register 1 ACRFDIC  
Contracts and Grants 1 ACGSDIC  
Dietetics 1 FHADR1  
Drug Accountability 1 PSADA  
General Medical Record - IO 1 GMRYUT12  
Health Summary 1 GMTSLRME  
IHS Changes To Pharmacy 1 APSPUTIL  
IHS Dental System 1 ADEGRL5  
IHS Patient 1 AUPNLKI  
IHS Patient Registration 1 AGTMPMRG  
IHS Personal Health Record 1 BPHRCHK  
Lexicon Utility 1 LEXDM4  
National Drug File 1 PSNACT  
Nursing Acuity 1 ANSDIC  
Nursing Service 1 NURCYED0  
Pharmacy Barcode Scan 1 BPBSUPD  
Referred Care Information System 1 BMCRR15  
Text Integration Utility 1 TIULA2  
Toolkit 1 XTLKDICL  
Utility Tables 1 AUTNKWII  

Entry Points

Name Comments DBIA/ICR reference
DO ; GET FILE ATTR
  • ICR #10007
    • Status: Active
    • Usage: Supported
    RENUM ;
    B
    PROMPT ; Prompt user for lookup values
    W
    MIX ;
  • ICR #10007
    • Status: Active
    • Usage: Supported
    WOV
    P ; Add code to DIC("W") to display identifiers on pointed-to files
    BAD
    GETFA(DIC,DO) ; Get file attributes
    ; DIC is open global reference, output same as documented in DO^DIC1.
    GOT ; Set data for single entry selected by user.
    DO2
    E
    DT
    OK ;
    Y ; Display a list of entries
    BLDDSP(DS,DD,DINDXFL,DIYX,DIY,DICRS) ; Build display of index values

    External References

    Name Field # of Occurrence
    LIST^DDSU Y+14
    $$EZBLD^DIALOG OK+6
    F^DIC RENUM+5
    IX^DIC MIX+3
    DSPH^DIC0 Y+2
    GETPRMT^DIC11 DIC1+5
    PROMPT^DIC11 PROMPT+1
    $$EXT^DIC2 B+13, E+10
    C^DIC2 GOT+11
    GOT^DIC2 RENUM+3
    WO^DIC2 E+15
    ADDKEY^DIC3 RENUM+3
    S^DIC3 RENUM+3
    PTRID^DIC5 P+1
    Y^DICN OK+1
    DSPHLP^DICQ Y+32
    CHK^DIE B+15
    $$FMTE^DILIBF DT

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: DST
    • Line Location: DT+1
    Function Call: WRITE
    • Prompt: !,"Press <RETURN> to see more, '^' to exit this list,"_$S(DIC(0)["T":" '^^' to exit all lists,",1:"")_" OR"
    • Line Location: Y+16
    Function Call: READ
    • Prompt: ": "
    • Timeout: $S($D(DTIME):DTIME,1:300)
    • Variable: DIY
    • Line Location: Y+17
    Function Call: WRITE
    • Prompt: $C(7)
    • Line Location: Y+18
    Function Call: WRITE
    • Prompt: !?4,$$EZBLD^DIALOG(8040),!
    • Line Location: OK+6
    Routine Call
    • DIALOG
    • Line Location:
      • OK+6
    Routine Call
    • DIE
    • Line Location:
      • B+15
    Routine Call
    • DIC
    • Line Location:
      • RENUM+5
    Routine Call
    • DIC
    • Line Location:
      • MIX+3

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD( DO2, DO2+1, DO2+2, W, W+1, RENUM+2

    Label References

    Name Line Occurrences
    $$BLDDSP E+2
    DO GETFA+2
    DT E+7
    E Y+7
    GETFA DIC1+4, RENUM+1
    GOT Y+23
    OK OK+6
    WOV P+1, W+2

    Naked Globals

    Name Field # of Occurrence
    ^( B+6
    ^("SCR" DO2+1
    ^(0 B+6, DO+1, DO+2*

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % P+2~*, W*, W+1, W+2*, DT, E+3*, E+4*, E+5, E+6, E+7
    , E+10*, E+12, E+14*, OK+1*, OK+2, OK+6, OK+7, OK+8, BAD+2
    >> %Y BAD+1
    B B+1~*, B+3, B+4*, B+6*, B+7, B+8, B+10, B+11, B+12, B+13
    , B+14*, B+15
    B( B+4
    B(1 B+1*
    B1 B+7~*, B+15*, B+17
    D MIX+1, MIX+2~*
    DD DIC1+3~, Y+1~*, Y+2, Y+3*, Y+4, Y+5, Y+6, Y+8, Y+12, Y+16
    , Y+17, Y+23, E+2, E+4, E+14, E+15, BLDDSP~, BLDDSP+2, BLDDSP+3, BLDDSP+6
    DDC Y+1~, Y+14*!
    DDD Y+1~, Y+14*!
    DDH Y+1~, Y+4*
    >> DDS DT+1, Y+5, Y+14, Y+15, GOT+3, GOT+6, OK+1
    >> DF RENUM+2
    DIC DIC1+4, DIC1+5, B+2, B+6, GETFA~, DO+1, P+1, RENUM+1, RENUM+2, Y+32
    , GOT+2, GOT+10
    DIC("B" B, B+1
    DIC("P" DO+2
    DIC("W" DO2+2, DO2+3*, W+2, W+3*, W+4*, WOV*
    DIC(0 Y+2, Y+5, Y+8, Y+11, Y+16, Y+20, Y+21, Y+31, E+1, E+13*
    >> DICR Y+27, OK+3
    >> DICR( E+3, OK+3*
    >> DICR(1 Y+31
    DICRS Y+31, E+5, E+8, BLDDSP~, BLDDSP+5
    DID MIX+1~*, MIX+2
    DID(1 MIX+1*
    >> DIDA E+7
    DIERR B+16!
    DIERROR B+15, B+16!
    >> DIFILEI Y+32
    >> DIFINDR GOT+5
    DIGBL B+2~*, B+5, B+17*
    >> DILONGX E+3
    >> DINDEX DIC1+5, B+2, Y+32
    >> DINDEX( B+7, B+9, B+13, B+15
    >> DINDEX("#" B+3, Y+27
    >> DINDEX("IXTYPE" E+3, E+8
    >> DINDEX(1 E+5, E+6, E+9
    DINDXFL BLDDSP~, BLDDSP+4
    DINONULL B+2~*, B+4*, B+5, B+17
    DIOUT Y+1~*, Y+3, Y+11*, Y+13*
    DIPRMT DIC1+3~, DIC1+5~
    >> DIROUT Y+20*, Y+21*, OK+7*, OK+8*, BAD+1*
    DISUB DIC1+3~, B+3*, B+4, B+7, B+8, B+9, B+13, B+14, B+15
    >> DITRANX E+5
    >> DIVPSEL( GOT+4*
    >> DIVPSEL("A" GOT+4
    >> DIX E+14*, OK+2
    DIY DIC1+3~, Y+1*, Y+11*, Y+17*, Y+19, Y+20, Y+21, Y+23, Y+24*, Y+25*
    , Y+26, Y+27, Y+30, Y+33!, E+15*, BLDDSP~, GOT+2, GOT+3, GOT+7, GOT+8
    , GOT+10
    DIY( B+3*, B+8, B+13*, B+14, E+4, E+15, GOT+2*, GOT+3, GOT+7, GOT+10*
    DIY(1 BLDDSP+4
    DIYX Y+4*, Y+33!, BLDDSP~, GOT+10!
    DIYX( E+4, E+15, GOT+3, GOT+7, GOT+10
    DIYX(1 BLDDSP+4
    DO DIC1+4, DIC1+5, GETFA~, DO+1*, DO+2*, DO2*, P+1, RENUM+1
    DO("SCR" DO2+1*
    DO(2 DO+1, DO2*, DO2+1, DO2+2, P+1, W, W+1, RENUM+2
    DS Y+8, Y+9, Y+12, Y+16, Y+32~, E+2, BLDDSP~, OK+1, OK+4!*
    DS( Y+3, Y+6, Y+9, Y+23, E+2, E+4, E+14, BLDDSP+2, BLDDSP+3, BLDDSP+6
    , GOT+3, GOT+7, GOT+8
    DS("DD" Y+1, Y+4*, OK+4*
    DS(0 Y+11*, Y+17, Y+23*, Y+29*, GOT+6*, GOT+7*, GOT+8*, OK+4*, BAD+2*
    DS(1 BLDDSP+4
    >> DST DT*, DT+1*, E*, E+2*, E+6*, E+12*, GOT+3*, GOT+6, OK+1*
    DTIME Y+17
    DTOUT DIC1+3!, Y+17*, Y+18, Y+26, OK+7, OK+8, BAD+2
    DUOUT DIC1+3!, Y+19*, Y+26, OK+8*, BAD+1*, BAD+2
    DZ RENUM+3~
    F1 E+9~*, E+10
    F2 E+9~*, E+10
    I Y+26~*, Y+27*, Y+28, Y+29, BLDDSP+1~, BLDDSP+2*, BLDDSP+3, BLDDSP+4, BLDDSP+5, BLDDSP+6
    , GOT+1~
    J GOT+1~
    K GOT+1~, GOT+4*
    TYPE B+9~*, B+10, B+11, B+12, B+14
    U B+6, DO+2, DO2, Y+19, E+3, E+4, BLDDSP+4, BLDDSP+6, GOT+2, GOT+3
    , GOT+10, MIX+2
    X B+5*, B+6, W+1~*, W+2, W+4, RENUM+2, RENUM+3, Y+18*, Y+19*, Y+32~
    , E+3, E+6~*, BLDDSP+1~*, BLDDSP+3, BLDDSP+4*, BLDDSP+6*, BLDDSP+7, GOT+3, GOT+7, OK+2*
    Y RENUM+2, RENUM+3*, RENUM+4*, Y+6~*, Y+9*, Y+23*, Y+29*, Y+32~, GOT+4, OK+2*
    , OK+3, BAD*
    Y( Y+9*
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All