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
Print Page as PDF
Routine: GMPL

Package: Problem List

Routine: GMPL


Information

GMPL ; SLC/MKB/AJB/TC -- Problem List Driver;09/07/17 13:29

Source Information

Source file <GMPL.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point for GMPL PROBLEM LIST
DE ; -- main entry point for GMPL DATA ENTRY
ADD ; -- add a new problem
ADD1
ADDQ
STATUS ; -- inactivate a problem
STQ
NOTES ; -- annotate a problem
NTQ
EDIT ; -- edit allowable fields of a problem
EDQ
DELETE ; -- delete a problem
DELQ
VERIFY ; -- verify a problem
VERQ
EXPAND ; -- detailed display of a problem
EXPQ

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ADD+9
Function Call: WRITE
  • Prompt: !!!,">>> Please enter another problem, or press <return> to exit."
  • Line Location: ADD+9
Function Call: WRITE
  • Prompt: $C(7),!!,"Currently displayed problems are already inactive!",!
  • Line Location: STATUS+2
Function Call: WRITE
  • Prompt: !!,$$PROBTEXT^GMPLX(GMPIFN),!,"is already inactive!",!
  • Line Location: STATUS+7
Function Call: WRITE
  • Prompt: !!,$$PROBTEXT^GMPLX(GMPIFN),!,"has been removed from this patient's problem list!",!
  • Line Location: STATUS+8
Function Call: WRITE
  • Prompt: $C(7),!!,$$LOCKED^GMPLX,!
  • Line Location: STATUS+9
Function Call: WRITE
  • Prompt: !!,$$PROBTEXT^GMPLX(GMPIFN),!,"has been removed from this patient's problem list!",!
  • Line Location: NOTES+4
Function Call: WRITE
  • Prompt: $C(7),!!,$$LOCKED^GMPLX,!
  • Line Location: NOTES+5
Function Call: WRITE
  • Prompt: !!,$$PROBTEXT^GMPLX(GMPIFN),!,"has an inactive ICD code.",!
  • Line Location: EDIT+5
Function Call: WRITE
  • Prompt: !!,$$PROBTEXT^GMPLX(GMPIFN),!,"has been removed from this patient's problem list!",!
  • Line Location: EDIT+6
Function Call: WRITE
  • Prompt: $C(7),!!,$$LOCKED^GMPLX,!
  • Line Location: EDIT+7
Function Call: WRITE
  • Prompt: !!,$$PROBTEXT^GMPLX(GMPIFN),!,"has already been removed from this patient's problem list!",!
  • Line Location: DELETE+6
Function Call: WRITE
  • Prompt: $C(7),!!,$$LOCKED^GMPLX,!
  • Line Location: DELETE+7
Function Call: WRITE
  • Prompt: !!,"Select the problem(s) you wish to verify as correct."
  • Line Location: VERIFY+2
Info |  Source |  Entry Points |  Interaction Calls