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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PXUTLSCC

Package: PCE Patient Care Encounter

Routine: PXUTLSCC


Information

PXUTLSCC ;ISL/dee,ISA/KWP - Validates and corrects the Service Connected Conditions ;6/06/05

Source Information

Source file <PXUTLSCC.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Scheduling 6 $$INP^SDAM2  $$CLINIC^SDAMU  (CL,CLOE)^SDCO21  $$EXOE^SDCOU2  $$REQ^SDM1A  ($$EXAE,$$GETOE)^SDOE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
PCE Patient Care Encounter 3 PXAIPOV  PXAIVSTV  PXCAVST  
Clinical Procedures 1 MDRPCW1  
Order Entry Results Reporting 1 ORWPCE  
Text Integration Utility 1 TIUPXAPS  
VistA Integration Adapter 1 VIABRPC  

Entry Points

Name Comments DBIA/ICR reference
SCC(PXUPAT,PXUDT,PXUHLOC,PXUTLVST,PXUIN,PXUOUT,PXUERR) ;
SCCOND(DFN,APPDT,HLOC,VISIT,PXUDATA) ;Set up array of the patients
; Service Connected Conditions
  • ICR #2348
    • Status: Active
    • Usage: Controlled Subscription
    ENCHK(ENCOWNTR,X0) ;Do outpatient encounter checks
    VEROUT ;verify a clinic

    External References

    Name Field # of Occurrence
    $$INP^SDAM2 ENCHK+5
    $$CLINIC^SDAMU ENCHK+4
    CL^SDCO21 SCCOND+40
    CLOE^SDCO21 SCCOND+38
    $$EXOE^SDCOU2 ENCHK+6
    $$REQ^SDM1A ENCHK+3
    $$EXAE^SDOE SCCOND+31
    $$GETOE^SDOE VEROUT+2

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^AUPNVSIT - [#9000010] |ptcl
    ^AUTTEDT - [#9999999.09] |sort
    ^AUTTHF - [#9999999.64] |sort
    ^DD( |sort
    ^DPT - [#2] SCCOND+26, |sort
    ^ORD(101 - [#101] |ptcl
    ^PX(815 - [#815] |sort
    ^PXD(811.1 - [#811.1] |sort
    ^PXD(811.9 - [#811.9] |sort
    ^PXRM(810.4 - [#810.4] |inpt
    ^PXRMXT(810.3 - [#810.3] |opt, |sort
    ^SCE - [#409.68] SCCOND+21, SCCOND+35, SCCOND+36
    ^SCE("AVSIT" SCCOND+20
    ^SD(409.41 - [#409.41] SCCOND+42, SCCOND+43
    ^TMP( |list
    ^TMP("PXCE" |list
    ^TMP("PXCEAE" |list
    ^TMP("PXCEAEIX" |ptcl
    ^TMP("PXCEIDX" |ptcl
    ^TMP("PXRMCQML" |list
    ^TMP("PXRMDHLP" |list
    ^TMP("PXRMDLG" |list
    ^TMP("PXRMEFED" |list
    ^TMP("PXRMEFM" |list
    ^TMP("PXRMEGED" |list
    ^TMP("PXRMEGM" |list
    ^TMP("PXRMEPED" |list
    ^TMP("PXRMEPM" |list
    ^TMP("PXRMETH" |list
    ^TMP("PXRMETHL" |list
    ^TMP("PXRMETM" |list
    ^TMP("PXRMETM1" |list
    ^TMP("PXRMETT" |list
    ^TMP("PXRMEXDH" |list
    ^TMP("PXRMEXID" |list
    ^TMP("PXRMEXIH" |list
    ^TMP("PXRMEXLC" |list
    ^TMP("PXRMEXLD" |list
    ^TMP("PXRMEXLR" |list
    ^TMP("PXRMFP" |list
    ^TMP("PXRMGEN" |list
    ^TMP("PXRMLCD" |list
    ^TMP("PXRMLEXL" |list
    ^TMP("PXRMLPAU" |list
    ^TMP("PXRMLPP" |list
    ^TMP("PXRMLPU" |list
    ^TMP("PXRMLRED" |list
    ^TMP("PXRMLRM" |list
    ^TMP("PXRMRINQ" |list
    ^TMP("PXRMRST" |list
    ^TMP("PXRMSEL" |list
    ^TMP("PXRMTAXCE" |list
    ^TMP("PXRMTAXL" |list
    ^TMP("PXRMTXSC" |list
    ^TMP("PXRMVSL" |list
    ^TMP("SCTI" |ptcl!
    ^TMP("SDAM" |list
    ^TMP("SDAMIDX" |ptcl
    ^TMP("VALM DATA" |ptcl

    Label References

    Name Line Occurrences
    ENCHK SCCOND+36
    SCCOND SCC+22
    VEROUT SCCOND+31

    Naked Globals

    Name Field # of Occurrence
    ^( |sort
    ^("EXP" |ptcl
    ^(0 SCCOND+26, |sort
    ^(24 |ptcl

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    APPDT SCCOND~, SCCOND+26, SCCOND+31, SCCOND+40
    C |sort*~
    >> CAPTION |list
    CL SCCOND+17~, VEROUT+2*
    CLASSIF SCCOND+17~, SCCOND+38, SCCOND+40
    CLASSIF( SCCOND+44
    >> D0 |form, |opt, |prnt, |sort*
    >> D1 |prnt, |sort*
    DA |form, |inpt, |opt!, |ptcl
    DA(1 |ptcl
    >> DDSBR |form
    >> DDSERROR |form
    DFN SCCOND~, SCCOND+26, SCCOND+31, SCCOND+40, ENCHK+1~, ENCHK+2*, ENCHK+5, |ptcl
    DIC |opt!
    DIE |opt!
    >> DISX(1 |sort*
    >> DISX(2 |sort*
    >> DISX(3 |sort*
    DLAYGO |opt!
    >> DPP(2 |sort
    >> DPP(3 |sort
    DR |opt!
    >> EDIEN |ptcl
    ENCOWNTR ENCHK~, ENCHK+6
    END SCCOND+17~, SCCOND+36*, SCCOND+37, ENCHK+3*, ENCHK+4*, ENCHK+5*, ENCHK+6*
    FIND |inpt*~
    HLOC SCCOND~, SCCOND+26, VEROUT+2
    >> I(0 |sort*
    >> I(1 |sort*
    >> IEN |ptcl
    LOC ENCHK+1~, ENCHK+2*, ENCHK+4
    >> LOGSTR |prnt
    MNE SCCOND+17~, SCCOND+43*, SCCOND+44
    ORG ENCHK+1~, ENCHK+2*, ENCHK+4, ENCHK+5
    OUTENC SCCOND+17~, SCCOND+18*, SCCOND+20*, SCCOND+21*, SCCOND+27*, SCCOND+28, SCCOND+31*, SCCOND+34, SCCOND+35*, SCCOND+36
    , SCCOND+37*, SCCOND+38, SCCOND+40, VEROUT+1, VEROUT+2*
    PXB |opt!
    >> PXCEAEVW |ptcl*
    PXCECONT |ptcl*!
    >> PXCEDBEG |ptcl
    >> PXCEDEND |ptcl
    >> PXCEEXIT |ptcl
    >> PXCEFIEN |ptcl*
    PXCEHLOC |ptcl!
    >> PXCEPAT |ptcl
    >> PXCEVIEN |ptcl*
    PXCEVIEW |ptcl*!
    PXKSPX |ptcl*!
    PXNAT |opt!
    >> PXRMDIEN |ptcl
    >> PXRMGTYP |ptcl
    >> PXRMITEM |ptcl
    >> PXRMMODE |ptcl
    PXRMNSCR |inpt*~
    >> PXRMTYP |ptcl
    >> PXRRCNUM |opt*
    >> PXRRDEMG |opt*
    PXTDUZ |opt*!
    PXUAO SCC+21~, SCC+33*, SCC+34, SCC+35, SCC+37, SCC+39
    >> PXUCV SCC+70*, SCC+71, SCC+72, SCC+74
    PXUDATA SCCOND~
    PXUDATA( SCCOND+44*
    PXUDT SCC~, SCC+22
    PXUEC SCC+21~, SCC+49*, SCC+50, SCC+51, SCC+53, SCC+55
    PXUERR SCC~, SCC+24*, SCC+26*, SCC+28*, SCC+30*, SCC+34*, SCC+36*, SCC+38*, SCC+39*, SCC+42*
    , SCC+44*, SCC+46*, SCC+47*, SCC+50*, SCC+52*, SCC+54*, SCC+55*, SCC+58*, SCC+60*, SCC+62*
    , SCC+65*, SCC+67*, SCC+69*, SCC+71*, SCC+73*, SCC+75*, SCC+77*, SCC+79*, SCC+81*
    PXUHLOC SCC~, SCC+22
    PXUHNC SCC+21~, SCC+64*, SCC+65, SCC+66, SCC+68
    PXUIN SCC~, SCC+23, SCC+25, SCC+33, SCC+41, SCC+49, SCC+57, SCC+64, SCC+70, SCC+76
    PXUIR SCC+21~, SCC+41*, SCC+42, SCC+43, SCC+45, SCC+47
    PXUITEM SCC+21~
    PXUMST SCC+21~, SCC+57*, SCC+58, SCC+59, SCC+61
    PXUOUT SCC~, SCC+23*, SCC+26*, SCC+28*, SCC+30*, SCC+32, SCC+34*, SCC+36*, SCC+38*, SCC+39*
    , SCC+42*, SCC+44*, SCC+46*, SCC+47*, SCC+50*, SCC+52*, SCC+54*, SCC+55*, SCC+58*, SCC+60*
    , SCC+62*, SCC+65*, SCC+67*, SCC+69*, SCC+71*, SCC+73*, SCC+75*, SCC+77*, SCC+79*, SCC+81*
    PXUPAT SCC~, SCC+22
    PXUPSCC SCC+21~, SCC+22
    PXUPSCC("AO" SCC+36, SCC+38
    PXUPSCC("CV" SCC+73, SCC+75
    PXUPSCC("EC" SCC+52, SCC+54
    PXUPSCC("HNC" SCC+67, SCC+69
    PXUPSCC("IR" SCC+44, SCC+46
    PXUPSCC("MST" SCC+60, SCC+62
    PXUPSCC("SC" SCC+28, SCC+30
    PXUPSCC("SHAD" SCC+79, SCC+81
    PXUSC SCC+21~, SCC+25*, SCC+26, SCC+27, SCC+29, SCC+32*, SCC+36, SCC+39, SCC+44, SCC+47
    , SCC+52, SCC+55
    PXUSHAD SCC+21~, SCC+76*, SCC+77, SCC+78, SCC+80
    PXUTLVST SCC~, SCC+22
    >> RR |inpt*
    SDSCEDIT |opt*!
    >> SUB |list
    TAXDEF |inpt~
    TAXSEL |inpt*~
    TAXVAL |inpt~
    TDFN |ptcl*!
    U SCCOND+21, SCCOND+27, SCCOND+43, SCCOND+44, ENCHK+2, VEROUT+2, |inpt, |opt, |prnt, |ptcl
    , |sort
    >> VALMBCK |ptcl*
    >> VALMBG |ptcl*
    >> VALMCC |ptcl
    >> VALMEVL |ptcl
    VALMHDR |ptcl!
    VISIT SCCOND~, SCCOND+19, SCCOND+20, SCCOND+22
    >> X |inpt*, |prnt, |sort*
    >> X(2 |sort*
    X0 SCCOND+17~, SCCOND+36*, ENCHK~, ENCHK+2, ENCHK+3, ENCHK+5
    >> X1 |ptcl*
    >> XQORM(0 |ptcl*
    >> XQORMSG |ptcl
    >> XQORQUIT |ptcl*
    XX SCCOND+17~, SCCOND+26*, SCCOND+27, SCCOND+41*, SCCOND+42*, SCCOND+43, SCCOND+44
    >> Y |inpt*, |inpt*, |opt, |ptcl, |sort*
    >> Y(1 |sort*
    >> Y(101 |sort*
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All