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

Package: Problem List

Routine: GMPLUTL


Information

GMPLUTL ; SLC/MKB/KER/TC -- PL Utilities ;03/30/2020

Source Information

Source file <GMPLUTL.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Problem List 5 GETFLDS^GMPLEDT3  GETPLIST^GMPLMGR1  (EN,NEW)^GMPLSAVE  ($$EXTDT,$$PROBTEXT)^GMPLX  ($$SERVICE,VADPT)^GMPLX1  
Lexicon Utility 3 EN^LEXCODE  $$GETASSN^LEXTRAN1  $$IMPDATE^LEXU  
DRG Grouper 2 ($$CSI,$$SAB)^ICDEX  $$ICDDATA^ICDXCODE  
Kernel 1 $$DT^XLFDT  
PCE Patient Care Encounter 1 $$PROVNARR^PXAPI  

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

Package Total Caller Graph
PCE Patient Care Encounter 7 PXAIPL  PXBAPI  PXBGPL  PXBPL  PXCAPL  PXCAPL1  PXCAPL2  
Clinical Case Registries 3 RORUPD07  RORX013A  RORXU010  
Order Entry Results Reporting 2 ORCPROB  ORQQPL1  
Problem List 2 GMPLCLNP  GMPLX1  
Imaging 1 MAGDHLS  
Oncology 1 ONCPL  
Text Integration Utility 1 TIURP  

Entry Points

Name Comments DBIA/ICR reference
ACTIVE(GMPDFN,GMPL) ; Returns list of Active Problems for a Patient
  • ICR #928
    • Status: Active
    • Usage: Controlled Subscription
    CREATE(PL,PLY) ; Creates a new problem
  • ICR #928
    • Status: Active
    • Usage: Controlled Subscription
    CR1 ; Ok to Create
    CRQ ; Quit Create
    FIXLEX(PL) ; Fix Lexicon expression pointer value for SNOMED Concepts
    GETDX(CODE,GMPDT) ; Get ICD associated with SNOMED CT Code
    GETDXX
    UPDATE(PL,PLY) ; Update a Problem/Create if Not Found
  • ICR #928
    • Status: Active
    • Usage: Controlled Subscription

    External References

    Name Field # of Occurrence
    GETFLDS^GMPLEDT3 UPDATE+42
    GETPLIST^GMPLMGR1 ACTIVE+35
    EN^GMPLSAVE UPDATE+61
    NEW^GMPLSAVE CR1+16
    $$EXTDT^GMPLX ACTIVE+44
    $$PROBTEXT^GMPLX ACTIVE+42
    $$SERVICE^GMPLX1 CR1+6
    VADPT^GMPLX1 CREATE+41, UPDATE+45
    $$CSI^ICDEX ACTIVE+40, UPDATE+48
    $$SAB^ICDEX ACTIVE+40, UPDATE+48
    $$ICDDATA^ICDXCODE ACTIVE+41
    EN^LEXCODE FIXLEX+3
    $$GETASSN^LEXTRAN1 GETDX+4
    $$IMPDATE^LEXU GETDX+2
    $$PROVNARR^PXAPI CREATE+36
    $$DT^XLFDT CREATE+40, GETDX+1, UPDATE+46

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^AUPNPROB - [#9000011] ACTIVE+39, UPDATE+39, UPDATE+41
    ^DPT - [#2] CREATE+37
    ^GMPL(125.99 - [#125.99] ACTIVE+33, CR1+8
    ^VA(200 - [#200] CREATE+38, UPDATE+40

    Label References

    Name Line Occurrences
    $$GETDX FIXLEX+6
    @( CREATE+42, CREATE+44, UPDATE+53
    CREATE UPDATE+38
    FIXLEX CR1+1
    GETDXX GETDX+5

    Naked Globals

    Name Field # of Occurrence
    ^(1 ACTIVE+39
    ^(802 ACTIVE+39

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    CNT ACTIVE+31~, ACTIVE+32*, ACTIVE+39*, ACTIVE+42, ACTIVE+43, ACTIVE+44, ACTIVE+45, ACTIVE+47, ACTIVE+48
    CODE GETDX~, GETDX+4
    DA CREATE+31~, CR1+16
    DIFFRENT UPDATE+35~, UPDATE+54*, UPDATE+59*, UPDATE+60*, UPDATE+61
    DUZ CR1+10
    DUZ("AG" CREATE+33, UPDATE+37
    DUZ(2 CREATE+33, UPDATE+37
    FLD UPDATE+35~, UPDATE+49*, UPDATE+51, UPDATE+54
    GMPAGTOR CREATE+30~, CREATE+39*, UPDATE+36~, UPDATE+45*
    GMPARAM ACTIVE+31~
    GMPARAM("QUIET" ACTIVE+33*
    GMPARAM("REV" ACTIVE+33*
    GMPCSYS ACTIVE+37~, ACTIVE+40*, ACTIVE+41
    GMPCV CREATE+31~, CREATE+39*
    GMPDFN ACTIVE~, ACTIVE+32, CREATE+31~, CREATE+39*, CREATE+41, UPDATE+35~, UPDATE+41*, UPDATE+43, UPDATE+45
    GMPDT ACTIVE+37~, ACTIVE+40*, ACTIVE+41, GETDX~, GETDX+1*, GETDX+3, GETDX+4, GETDX+5
    GMPFLD CREATE+30~, UPDATE+35~, UPDATE+42
    GMPFLD( CR1+2*, CR1+3*, CR1+4*, CR1+5*, CR1+6*, CR1+7*, CR1+8*, CR1+9*, CR1+10*, CR1+12*
    , CR1+13*, CR1+14*, UPDATE+51, UPDATE+54*, UPDATE+56, UPDATE+57, UPDATE+59*
    GMPFLD(10 CR1+10*, CR1+11*, UPDATE+60*
    GMPFLD(80201 CR1+15*
    GMPGULF CREATE+30~, CREATE+39*, UPDATE+36~, UPDATE+45*
    GMPHNC CREATE+31~, CREATE+39*
    GMPI CREATE+30~, CREATE+42*, CREATE+44*, UPDATE+35~, UPDATE+50*, UPDATE+51, UPDATE+54
    GMPIFN UPDATE+35~, UPDATE+38*, UPDATE+39, UPDATE+41, UPDATE+42, UPDATE+61
    GMPIMPDT GETDX+1~, GETDX+2*, GETDX+3, GETDX+5
    GMPION CREATE+30~, CREATE+39*, UPDATE+36~, UPDATE+45*
    GMPL ACTIVE~
    GMPL( ACTIVE+39*, ACTIVE+42*, ACTIVE+43*, ACTIVE+44*, ACTIVE+45*, ACTIVE+47*
    GMPL(0 ACTIVE+48*
    GMPL0 ACTIVE+37~, ACTIVE+39*, ACTIVE+40, ACTIVE+41, ACTIVE+43
    GMPL1 ACTIVE+37~, ACTIVE+39*, ACTIVE+42, ACTIVE+45, ACTIVE+46
    GMPL802 ACTIVE+37~, ACTIVE+39*, ACTIVE+40
    GMPLIST ACTIVE+31~, ACTIVE+35
    GMPLIST( ACTIVE+36, ACTIVE+38
    >> GMPLUSER CR1+8
    GMPLVIEW ACTIVE+31~, ACTIVE+35
    GMPLVIEW("ACT" ACTIVE+34*
    GMPLVIEW("PROV" ACTIVE+34*
    GMPLVIEW("VIEW" ACTIVE+34*
    GMPMPDEF GETDX+1~, GETDX+3*, GETDX+4
    GMPMST CREATE+31~, CREATE+39*
    GMPORIG UPDATE+35~
    GMPQUIT CREATE+30~, CREATE+42, CREATE+43, CREATE+44, CREATE+45, UPDATE+35~, UPDATE+50, UPDATE+52*, UPDATE+53, UPDATE+55
    GMPROV CREATE+31~, CR1+5*, UPDATE+35~, UPDATE+41*
    GMPSC CREATE+30~, CREATE+39*, UPDATE+36~, UPDATE+45*
    GMPSHD CREATE+31~, CREATE+39*
    GMPTOTAL ACTIVE+31~, ACTIVE+35
    GMPVA CREATE+30~, CREATE+33*, CREATE+41, UPDATE+35~, UPDATE+37*, UPDATE+45
    GMPVAMC CREATE+30~, CREATE+33*, UPDATE+35~, UPDATE+37*
    I ACTIVE+37~, ACTIVE+46*
    ICD GETDX+8~, GETDX+9*, GETDX+10
    ICDC ACTIVE+37~, ACTIVE+41*, ACTIVE+43
    ICDS FIXLEX+1~, FIXLEX+6*, FIXLEX+7
    IFN ACTIVE+31~, ACTIVE+38*, ACTIVE+39, ACTIVE+42
    ITEMS UPDATE+35~, UPDATE+49*, UPDATE+50
    LEX GETDX+1~, GETDX+5
    LEX( GETDX+7, GETDX+9
    LEXS FIXLEX+1~
    LEXS("SCT" FIXLEX+3, FIXLEX+5
    NUM ACTIVE+31~, ACTIVE+36*, ACTIVE+38
    ONSET ACTIVE+37~, ACTIVE+43*, ACTIVE+44
    ORI GETDX+1~, GETDX+6*, GETDX+7*, GETDX+9
    ORY GETDX+1~, GETDX+2*, GETDX+4*, GETDX+5*, GETDX+6*, GETDX+10*, GETDX+11*, GETDXX
    PL CREATE~, CR1+1, FIXLEX~, UPDATE~, UPDATE+38
    PL( UPDATE+51*, UPDATE+52, UPDATE+53, UPDATE+54
    PL("AO" CR1+12
    PL("CODESYS" UPDATE+47, UPDATE+48*
    PL("COMMENT" CR1+11, UPDATE+60
    PL("CV" CR1+14
    PL("DIAGNOSIS" CR1+2, FIXLEX+7*, UPDATE+47, UPDATE+48
    PL("DX_DATE_OF_INTEREST" CREATE+40*, CR1+15, FIXLEX+6, UPDATE+46*, UPDATE+48
    PL("EC" CR1+13
    PL("HNC" CR1+13
    PL("IR" CR1+12
    PL("LEXICON" CR1+1, CR1+3, FIXLEX+5*
    PL("LOCATION" CR1+10
    PL("MST" CR1+13
    PL("NARRATIVE" CREATE+34, CREATE+36, CR1+1, CR1+2, CR1+4, FIXLEX+2, FIXLEX+4*, FIXLEX+5, UPDATE+58, UPDATE+59
    PL("ONSET" CR1+7
    PL("PATIENT" CREATE+37, CREATE+39, UPDATE+43
    PL("PROBLEM" UPDATE+38
    PL("PROVIDER" CREATE+38, CR1+5, CR1+6, UPDATE+40, UPDATE+41
    PL("RECORDED" CR1+7, UPDATE+44
    PL("RESOLVED" CR1+9
    PL("SC" CR1+12
    PL("SHD" CR1+14
    PL("STATUS" CR1+9
    PLY CREATE~, CREATE+32!*, CR1+16*, UPDATE~, UPDATE+37*, UPDATE+38, UPDATE+61*
    PLY(0 CREATE+32*, CREATE+34*, CREATE+36*, CREATE+37*, CREATE+38*, UPDATE+37*, UPDATE+39*, UPDATE+40*, UPDATE+42*, UPDATE+43*
    , UPDATE+44*, UPDATE+52*, UPDATE+56*, UPDATE+57*, UPDATE+58*, UPDATE+61*
    SCT FIXLEX+1~, FIXLEX+2*, FIXLEX+3, FIXLEX+5, FIXLEX+6
    SP ACTIVE+31~, ACTIVE+32*, ACTIVE+46*, ACTIVE+47
    SUB UPDATE+35~, UPDATE+50*, UPDATE+51, UPDATE+52, UPDATE+53, UPDATE+54
    U ACTIVE+33, ACTIVE+40, ACTIVE+41, ACTIVE+42, ACTIVE+43, ACTIVE+44, ACTIVE+45, ACTIVE+46, CREATE+36, CR1+1
    , CR1+2, CR1+4, CR1+8, FIXLEX+5, FIXLEX+7, GETDX+5, UPDATE+41, UPDATE+50, UPDATE+51, UPDATE+54
    , UPDATE+58, UPDATE+59
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All