Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: GMPLUTL2

Package: Problem List

Routine: GMPLUTL2


Information

GMPLUTL2 ; ISL/MKB,KER,JER,TC -- PL Utilities (OE/TIU) ;02/16/17 12:21

Source Information

Source file <GMPLUTL2.m>

Entry Points

Name Comments DBIA/ICR reference
LIST(GMPL,GMPDFN,GMPSTAT,GMPCOMM) ; Returns list of Problems for Patient
  • ICR #2741
    • Status: Active
    • Usage: Controlled Subscription
    DETAIL(IFN,GMPL) ; Returns Detailed Data for Problem
  • ICR #2741
    • Status: Active
    • Usage: Controlled Subscription
    RESOLVE(IEN,FIELD,FORMAT) ; Call GET1^DIQ to resolve field values
    ; Input: IEN = Record #
    ; FIELD = Field # in PROBLEMS file #9000011
    ; FORMAT = "I"nternal, "E"xternal, or "IE" -> both
    ; Output: GMPLY = value as specified by format
    AUDIT ; 14 Sep 99 - MA - Add audit trail to OE Problem List.
    ; Called from DETAIL, requires IFN and sets GMPL("AUDIT")
    FLDNAME(NUM) ; Returns field name for display
    FNQ
    ADD(DFN,LOC,GMPROV) ; -- Interactive LMgr action to add new problem
  • ICR #2741
    • Status: Active
    • Usage: Controlled Subscription
    SETVARS ; -- Define GMP* variables used in ADD and EDIT
    EDIT(DFN,LOC,GMPROV,GMPIFN) ; Interactive LMgr action to edit a problem
  • ICR #2741
    • Status: Active
    • Usage: Controlled Subscription
    REMOVE(GMPIFN,GMPROV,TEXT,PLY) ; -- Remove problem GMPIFN
  • ICR #2741
    • Status: Active
    • Usage: Controlled Subscription
    PARAM() ; -- Returns parameter values from 125.99
  • ICR #2741
    • Status: Active
    • Usage: Controlled Subscription
    VAF(DFN,SILENT) ; -- print PL VA Form chart copy
  • ICR #2741
    • Status: Active
    • Usage: Controlled Subscription
    SCTTEXT(GMPLCODE,GMPDT,GMPSYS) ; Get Preferred Text for SCT Code
    SCTTEXQ
    ICDDESC(GMPLCODE,GMPDT,GMPLCSYS) ; Get description for ICD Code
    ICDDESQ

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!,">>> Please enter another problem, or press <return> to exit."
    • Line Location: ADD+10
    Function Call: WRITE
    • Prompt: $C(7),!!,$$LOCKED^GMPLX,!
    • Line Location: EDIT+3
    Function Call: WRITE
    • Prompt: !!,"No problems available."
    • Line Location: VAF+7

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^VA(200 - [#200] GET1^DIQ
    ^AUPNPROB - [#9000011] GET1^DIQ
    Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call