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

Package: PCE Patient Care Encounter

Routine: PXBAPI21


Information

PXBAPI21 ;ISL/DCM - API for Classification check out ; 4/13/05 12:55pm

Source Information

Source file <PXBAPI21.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Scheduling 5 $$INP^SDAM2  $$CLINIC^SDAMU  ($$SEQ,CL,CLOE)^SDCO21  $$EXOE^SDCOU2  $$REQ^SDM1A  
PCE Patient Care Encounter 2 ONE^PXBAPI22  SC^PXCEVFI2  
VA FileMan 2 YN^DICN  ^DIR  
Kernel 1 ENDR^%ZISS  

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

Package Total Caller Graph
PCE Patient Care Encounter 4 PXBAPI1  PXCEC800  PXCED800  PXCEE800  
Event Capture 1 ECUTL1  

Entry Points

Name Comments DBIA/ICR reference
CLASS(ENCOWNTR,DFN,APTDT,LOC,VISIT) ;Edit classification fields
; Input - ENCOWNTR - ien of ^SCE(ien (409.68 Outpatient Encounter file)
; ENCOWNTR optional if DFN,LOC,APTDT params used
; DFN - ien of ^DPT(DFN, (only used if no ENCOWNTR)
; LOC - ien of ^SC(LOC, (only used if no ENCOWNTR)
; APTDT - Appointment Date/time (only used if no ENCOWNTR)
; VISIT - optional if no ENCOWNTR look for main encounter that
; points to this visit
; Output - PXBDATA(Classification type)=OutPT Class ien^Value
; PXBDATA("ERR",Class type)=1 Bad ptr to 409.41
; =2 DATA entry not applicable
; =3 DATA entry uneditable
; =4 User ^ out of prompt
; Classification type 1 - Agent Orange
; 2 - Ionizing Radiation
; 3 - Service Connected
; 4 - SW Asia Coditions
; 5 - Military Sexual Trauma
; 6 - Head and/or Neck Cancer
; 7 - Combat Veteran
; 8 - Project 112/SHAD
  • ICR #2722
    • Status: Active
    • Usage: Private
    ON
    ASKCL(ENCOWNTR,SDCLOEY,DFN,APTDT) ;Ask classifications on check out
    ASK(ENCOWNTR,SDCLOEY,SQUIT) ;Ask classifications
    ENCHK(ENCOWNTR,X0) ;Do outpatient encounter checks
    OPCHK(DFN,LOC,APTDT) ;Do standalone outpatient encounter checks
    TEST ;Test call to CLASS

    External References

    Name Field # of Occurrence
    ENDR^%ZISS ASK+2
    YN^DICN TEST+2
    ^DIR ENCHK+4, OPCHK+3
    ONE^PXBAPI22 ASK+17
    SC^PXCEVFI2 CLASS+30, CLASS+36
    $$INP^SDAM2 ENCHK+7, OPCHK+6
    $$CLINIC^SDAMU ENCHK+6, OPCHK+5
    $$SEQ^SDCO21 ASK+5
    CL^SDCO21 ASKCL+2
    CLOE^SDCO21 ASKCL+1
    $$EXOE^SDCOU2 ENCHK+8
    $$REQ^SDM1A ENCHK+5, OPCHK+4

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!,"--- ",IOINHI,"Classification",IOINORM," --- [",IOINHI,"Required",IOINORM,"]"
    • Line Location: ASK+4
    Function Call: WRITE
    • Prompt: !
    • Line Location: ASK+5
    Routine Call
    • DIR
    • Line Location:
      • ENCHK+4
      • OPCHK+3

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^AUPNVSIT - [#9000010] CLASS+30, ASK+9, ASK+10, ASK+11, ASK+12, ASK+13, ASK+14, ASK+15, ASK+16
    ^DPT - [#2] CLASS+37, TEST+2
    ^SCE - [#409.68] CLASS+32, CLASS+34, CLASS+38, TEST+2
    ^SCE("AVSIT" CLASS+31

    Label References

    Name Line Occurrences
    ASK ON+11
    ASKCL ON
    CLASS TEST+3
    ENCHK CLASS+34, CLASS+38
    ON CLASS+34, CLASS+38
    OPCHK CLASS+39

    Naked Globals

    Name Field # of Occurrence
    ^( TEST+2
    ^(0 CLASS+34, CLASS+38

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> % TEST+2*
    APTDT CLASS~, CLASS+34~, CLASS+35, CLASS+37, CLASS+39, ON, ASKCL~, ASKCL+2, ENCHK+1*, ENCHK+2
    , OPCHK~, OPCHK+1, OPCHK+4, OPCHK+6
    CTS ASK+1~, ASK+6*, ASK+22*
    DA CLASS+33~, ENCHK+1*
    DFN CLASS~, CLASS+34~, CLASS+35, CLASS+36, CLASS+37, CLASS+39, ON, ASKCL~, ASKCL+2, ENCHK+1*
    , ENCHK+7, OPCHK~, OPCHK+6, TEST+2*
    DIR ENCHK+2!, OPCHK+1!
    DIR("A" ENCHK+3*, ENCHK+4*, OPCHK+2*, OPCHK+3*
    DIR(0 ENCHK+3*, OPCHK+2*
    >> DIRUT ENCHK+2, OPCHK+1
    ENCOWNTR CLASS~, CLASS+30, CLASS+31*, CLASS+32*, CLASS+34, CLASS+38*, ON, ON+11, ASKCL~, ASKCL+1
    , ASK~, ASK+17, ENCHK~, ENCHK+8
    END CLASS+33~, CLASS+34*, CLASS+38*, CLASS+39*, ASK+20~, ASK+21*, ASK+23*, ASK+24, ENCHK+2*, ENCHK+5*
    , ENCHK+6*, ENCHK+7*, ENCHK+8*, OPCHK+1*, OPCHK+4*, OPCHK+5*, OPCHK+6*
    I ASK+1~, ASK+18*
    IEN CLASS+33~
    IFN CLASS+33~
    IOINHI ASK+1~, ASK+4
    IOINORM ASK+1~, ASK+4
    LOC CLASS~, CLASS+34~, CLASS+35, CLASS+38, CLASS+39, ENCHK+1*, ENCHK+6, OPCHK~, OPCHK+5
    ORG CLASS+33~, ENCHK+1*, ENCHK+6, ENCHK+7
    PXBDATA TEST+2!
    PXBDATA( ASK+23
    PXBDATA(3 ASK+18, ASK+19
    >> PXCEAFTR(800 ON+3, ON+4, ON+5, ON+6, ON+7, ON+8, ON+9, ON+10
    >> PXCECAT ON+2, ASK+8, ASK+9, ASK+10, ASK+11, ASK+12, ASK+13, ASK+14, ASK+15, ASK+16
    >> PXDOD ENCHK+2*, OPCHK+1*
    PXIFN TEST+1~*, TEST+2*, TEST+3
    PXVST ASK+1~, ASK+8*, ASK+9, ASK+10, ASK+11, ASK+12, ASK+13, ASK+14, ASK+15, ASK+16
    SDCLOEY CLASS+33~, ON, ON+1, ON+11, ASKCL~, ASKCL+1, ASKCL+2, ASK~, ASK+3
    SDCLOEY( ASK+7, ASK+17, ASK+18*
    SDCLOEY(1 ON+4*
    SDCLOEY(2 ON+5*
    SDCLOEY(3 ON+3*
    SDCLOEY(4 ON+6*
    SDCLOEY(5 ON+7*
    SDCLOEY(6 ON+8*
    SDCLOEY(7 ON+9*
    SDCLOEY(8 ON+10*
    SQUIT CLASS+33~, ON+11, ASK~, ASK+6, ASK+17
    TYPI ASK+1~, ASK+6*, ASK+7, ASK+9, ASK+10, ASK+11, ASK+12, ASK+13, ASK+14, ASK+15
    , ASK+16, ASK+17, ASK+18, ASK+22*, ASK+23
    TYPSEQ ASK+1~, ASK+5*, ASK+6, ASK+22
    U CLASS+30, ASK+8, ASK+9, ASK+10, ASK+11, ASK+12, ASK+13, ASK+14, ASK+15, ASK+16
    >> VADM(6 ENCHK+2, OPCHK+1
    >> VADM(7 ENCHK+4, OPCHK+3
    VISIT CLASS~, CLASS+30, CLASS+31
    X CLASS+33~, CLASS+37*, CLASS+38, ASK+1~, ASK+2*
    X0 CLASS+34*, CLASS+38*, ASK+8, ENCHK~, ENCHK+1, ENCHK+5, ENCHK+7
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All