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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: GMPLRPTR

Package: Problem List

Routine: GMPLRPTR


Information

GMPLRPTR ; SLC/MKB/AJB -- Problem List Report of Removed Problems ;11/14/14 12:18

Source Information

Source file <GMPLRPTR.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 3 WAIT^DICD  ^DIE  ^DIR  
Kernel 2 $$HTFM^XLFDT  $$REPEAT^XLFSTR  
Problem List 2 ($$CODESTS,$$EXTDT,$$PROBTEXT,AUDIT,DTMOD)^GMPLX  ($$NAME,$$PAT)^GMPLX1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Problem List 1 GMPL REPLACE PROBLEMS  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point
HDR ; -- header code
CONTINUE() ; -- end of page prompt
GETLIST ; -- build GMPLIST() of removed problems
SEL() ; -- select problem(s)
REPLACE ; -- replace problem on patient's list
SURE() ; -- are you sure you want to do this?
DISPLAY ; -- show list on screen

External References

Name Field # of Occurrence
WAIT^DICD EN+3
^DIE REPLACE+10
^DIR CONTINUE+3, REPLACE+15, SEL+5, SURE+4
$$CODESTS^GMPLX DISPLAY+6, REPLACE+9
$$EXTDT^GMPLX DISPLAY+14
$$PROBTEXT^GMPLX DISPLAY+4, REPLACE+9, REPLACE+13
AUDIT^GMPLX REPLACE+12
DTMOD^GMPLX REPLACE+12
$$NAME^GMPLX1 DISPLAY+14
$$PAT^GMPLX1 EN+2
$$HTFM^XLFDT REPLACE+6
$$REPEAT^XLFSTR HDR+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!!?10,"No 'removed' problems found for this patient.",!
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: "."
  • Line Location: GETLIST+4
Function Call: WRITE
  • Prompt: !,NUM,?GMPLBUF,PROBLEM,?51,$$EXTDT^GMPLX(DATE),?60,$$NAME^GMPLX1(PROV)
  • Line Location: DISPLAY+14
Function Call: WRITE
  • Prompt: @IOF,"REMOVED PROBLEMS FOR "_$P(GMPDFN,U,2)_" ("_$P(GMPDFN,U,3)_"):"
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !!," Problem",?51,"Removed By Whom",!,$$REPEAT^XLFSTR("-",79)
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: REPLACE+1
Function Call: WRITE
  • Prompt: !!,"Replacing problem(s) on patient's list ..."
  • Line Location: REPLACE+3
Function Call: WRITE
  • Prompt: !!,$$PROBTEXT^GMPLX(GMPLIST(NUM)),!,"has an inactive ICD9 code and will not be replaced."
  • Line Location: REPLACE+9
Function Call: WRITE
  • Prompt: !," "_$$PROBTEXT^GMPLX(DA)
  • Line Location: REPLACE+13
Function Call: WRITE
  • Prompt: !
  • Line Location: REPLACE+15
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: SURE+4
Routine Call
  • DIE
  • Line Location:
    • REPLACE+10
Routine Call
  • DIR
  • Line Location:
    • CONTINUE+3
    • REPLACE+15
    • SEL+5
    • SURE+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPROB - [#9000011] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPROB - [#9000011] GETLIST+3
^AUPNPROB("AC" GETLIST+2
^GMPL(125.8 - [#125.8] DISPLAY+7, DISPLAY+8, DISPLAY+9

Label References

Name Line Occurrences
$$CONTINUE DISPLAY+11
$$SEL REPLACE+2
$$SURE REPLACE+2
DISPLAY EN+5
GETLIST EN+3
HDR DISPLAY+1, DISPLAY+11
REPLACE EN+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AIFN DISPLAY+1~, DISPLAY+8*, DISPLAY+9
CHNGE REPLACE+1~, REPLACE+11*, REPLACE+12
CNT GETLIST+1~*, GETLIST+4*, GETLIST+5
DA REPLACE+1~, REPLACE+10*, REPLACE+11, REPLACE+12, REPLACE+13
DATE DISPLAY+1~, DISPLAY+4*, DISPLAY+10*, DISPLAY+14
DIE REPLACE+1~, REPLACE+10*
DIR CONTINUE+1~, REPLACE+15~, SEL+1~, SURE+1~
DIR("?" SEL+4*, SURE+3*
DIR("A" CONTINUE+2*, SEL+3*, SURE+2*
DIR("B" SURE+2*
DIR(0 CONTINUE+2*, REPLACE+15*, SEL+3*, SURE+2*
DONE DISPLAY+1~, DISPLAY+4!, DISPLAY+7, DISPLAY+8, DISPLAY+10*
DR REPLACE+1~, REPLACE+10*
DT DISPLAY+6, REPLACE+9
>> DTOUT SEL+5
DUZ REPLACE+11
GMPDFN EN+1~, EN+2*, EN+6!, GETLIST+2, HDR+1
GMPLBUF DISPLAY+13~*, DISPLAY+14
GMPLI REPLACE+1~, REPLACE+7*
GMPLIST EN+6!
GMPLIST( GETLIST+4*, DISPLAY+2, DISPLAY+3, REPLACE+9, REPLACE+10
GMPLIST(0 EN+4, GETLIST+5*, SEL+2
GMPLNO REPLACE+1~, REPLACE+6*, REPLACE+7
GMPLSEL REPLACE+1~, REPLACE+2*, REPLACE+6, REPLACE+7
GMPQUIT DISPLAY+1~, DISPLAY+2, DISPLAY+11*
IDT DISPLAY+1~, DISPLAY+7*, DISPLAY+8, DISPLAY+10
IFN GETLIST+1~, GETLIST+2*, GETLIST+3, GETLIST+4, DISPLAY+3*, DISPLAY+4, DISPLAY+6, DISPLAY+7, DISPLAY+8
IOF HDR+1
IOSL DISPLAY+11
MAX SEL+1~, SEL+2*, SEL+3
NODE GETLIST+1~, GETLIST+3*, DISPLAY+1~, DISPLAY+9*, DISPLAY+10
NOW REPLACE+1~, REPLACE+6*, REPLACE+11
NUM DISPLAY+1~, DISPLAY+2*, DISPLAY+3, DISPLAY+14, REPLACE+1~, REPLACE+7*, REPLACE+9, REPLACE+10
PROBLEM DISPLAY+1~, DISPLAY+4*, DISPLAY+6*, DISPLAY+13, DISPLAY+14
PROV DISPLAY+1~, DISPLAY+4*, DISPLAY+10*, DISPLAY+14
U GETLIST+3, DISPLAY+9, DISPLAY+10, HDR+1, REPLACE+11
USER DISPLAY+1~
X CONTINUE+1~, SEL+1~, SEL+5, SURE+1~
Y CONTINUE+1~, CONTINUE+4, SEL+1~, SEL+5*, SEL+6, SURE+1~, SURE+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All