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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: EHMDGPMV3

Package: Electronic Health Modernization

Routine: EHMDGPMV3


Information

EHMDGPMV3 ;ALB/WTC - EHRM - AUTOMATED PATIENT DISCHARGE TOOL; Jul 24, 2024@13:18:19

Source Information

Source file <EHMDGPMV3.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Registration 9 RESET^DGPMDDCN  RESET^DGPMDDLD  ^DGPMEVT  CHK^DGPMV30  NEW^DGPMV301  SI^DGPMV33  (AFTER,PRIOR)^DGPMV36  EN^DGPMVBM  
START^DGPWB  
VA FileMan 5 ^%DT  (HELP,NOW)^%DTC  YN^DICN  ^DIE  ^DIK  

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

Package Total Caller Graph
Electronic Health Modernization 1 EHMDGPMV2  

Entry Points

Name Comments DBIA/ICR reference
DGPMV3 ;ALB/MIR - ENTER TRANSACTION INFORMATION; 8 MAY 89 ; 3/18/13 11:24am
DT
DR ;select input template for transaction type
EVENTS ;
Q
OKD
VAR ;Set up variables
NEW ;Entry point to add a new entry to ^DGPM
PRODAT(NODE) ;-- This function will add the ward and other data from the
; previous TS movement to the provider TS movement.
CPTCK ; DG*5.3*895 Admission Deletion - Check to see if there is 801 screen data on file (DGPMFLG = okay to delete)

External References

Name Field # of Occurrence
^%DT DT+4
HELP^%DTC DT+1, DT+4
NOW^%DTC DGPMV3+3
RESET^DGPMDDCN EVENTS+2
RESET^DGPMDDLD EVENTS+1
^DGPMEVT EVENTS+6
CHK^DGPMV30 DT+5
NEW^DGPMV301 NEW+1
SI^DGPMV33 EVENTS+2
AFTER^DGPMV36 DR+11, OKD+4, OKD+5
PRIOR^DGPMV36 OKD, OKD+5, VAR+3, VAR+8
EN^DGPMVBM EVENTS+4
START^DGPWB EVENTS+3
YN^DICN OKD+1
^DIE DR+5
^DIK DR+10, OKD+3, OKD+5

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: DT+0
Function Call: WRITE
  • Prompt: !,DGPME
  • Line Location: DT+5
Function Call: WRITE
  • Prompt: !,"Incomplete check-in...deleted"
  • Line Location: DR+10
Function Call: WRITE
  • Prompt: !
  • Line Location: OKD+0
Function Call: WRITE
  • Prompt: !?5,"Answer yes to delete this ",DGPMUC," or no to continue"
  • Line Location: OKD+1
Function Call: WRITE
  • Prompt: !!,"CANNOT DELETE THE ADMISSION. THE PTF HAS ACTIVE ORDERS OR CPT ENTRIES."
  • Line Location: CPTCK+6
Function Call: WRITE
  • Prompt: !
  • Line Location: CPTCK+6
Routine Call
  • DIE
  • Line Location:
    • DR+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGPM - [#405] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" DT
^DG(405.2 - [#405.2] VAR+7
^DGCPT(46 - [#46] CPTCK+4
^DGICD9(46.1 - [#46.1] CPTCK+5
^DGPM - [#405] DGPMV3+10, DR+2, DR+8, DR+10, DR+11, OKD, OKD+4, OKD+5, VAR+2, VAR+5
, VAR+6, PRODAT+4
^DGPM("APCA" VAR+6
^DGPM("APHY" OKD+5
^DGPM("APMV" VAR+5
^DGPM("ATS" PRODAT+4
^UTILITY("DGPM" DGPMV3+2!, DR+8*, DR+11*, EVENTS+5, Q+4!, OKD*, OKD+4*, OKD+5*, VAR+2*

Label References

Name Line Occurrences
$$PRODAT DGPMV3+8
@( DR+9, OKD, OKD+2
CPTCK DT+2
DR DGPMV3+10, DT
DT DGPMV3+3, DT+1, DT+4, DT+5, OKD+1
EVENTS OKD+6
NEW DGPMV3+9
OKD DT+3, OKD+1
Q DGPMV3+9, DT, DR+5, OKD, OKD+1
VAR DGPMV3+10, DT

Naked Globals

Name Field # of Occurrence
^( EVENTS+5, VAR+6, PRODAT+4
^("A" OKD+5*
^("DIR" DR+8, DR+11, VAR+2
^("E" VAR+7
^("LD" DR+10
^("ODS" DR+2
^("P" EVENTS+5
^(0 DR+8, OKD+5, VAR+5, VAR+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DGPMV3+3, OKD+1*
%DT DT+1*, DT+5!, Q+3!, OKD!
%DT(0 DT+1*
DA DGPMV3+9*, DGPMV3+10, DR+10*, Q+3!, OKD+3*, OKD+5*, VAR+2*
>> DFN DGPMV3+4, EVENTS+3, VAR+5, VAR+6, PRODAT+4
DG DR+5!
DGER Q+3!
DGIDX Q+1!
DGNOW DGPMV3+3*, Q+3!
DGODS Q+2!
DGODSPT DR+2*, Q+2!
DGOK EVENTS+5*, EVENTS+6, Q+3!
DGOTY Q+1!
DGOWD Q+1!
DGPM0 Q+3!, VAR+5*
DGPM0ND DGPMV3+4*, DGPMV3+6*, DGPMV3+8*, Q+3!
>> DGPM1X DT
DGPM2 Q+3!, VAR+6*, VAR+7
DGPMA DR+8*, DR+10*, DR+11*, EVENTS+3, Q+3!, OKD+4*
DGPMAB Q+3!
DGPMABL Q+3!, VAR+7*
>> DGPMAN DGPMV3+10*, CPTCK+2
>> DGPMBYP Q*
>> DGPMCA DGPMV3+4, DGPMV3+10*, DR+2, VAR+5, VAR+6, PRODAT+4
DGPMDA DGPMV3+9*, DR+8, DR+10, DR+11, Q, Q+3!, OKD, OKD+3, OKD+4, OKD+5
, VAR+2, VAR+3, VAR+8, CPTCK+1~, CPTCK+2*, CPTCK+3, CPTCK+4, CPTCK+5
DGPME DT+5!
DGPMER Q+3!, OKD*
DGPMFLG CPTCK+1~, CPTCK+2*, CPTCK+4*, CPTCK+5*, CPTCK+6
DGPMHY DGPMV3+3*, DT, DT+5, Q+3!
DGPMI CPTCK+1~, CPTCK+2*, CPTCK+4, CPTCK+5*
>> DGPMN DGPMV3+3, DR+1, VAR+2
DGPMNI Q+3!
DGPMOC Q+3!
DGPMOS Q+3!
DGPMOUT DGPMV3+3*, DR+6*, Q+3!
DGPMP DT+5, Q+3!, OKD*, OKD+4, VAR+2*, VAR+4
>> DGPMPC DGPMV3+8
DGPMPHY Q+3!
DGPMPHY0 Q+3!
DGPMPTF Q+3!
>> DGPMSA DGPMV3+6
DGPMSP Q+3!
>> DGPMT DGPMV3+4, DGPMV3+6, DGPMV3+8, DGPMV3+10, DR+1, DR+5, DR+8, DR+9, DR+10, DR+11
, EVENTS+1, EVENTS+2, OKD, OKD+2, OKD+3, OKD+4, VAR+2, VAR+3, VAR+8
DGPMTN Q+3!
DGPMTYP Q+3!
>> DGPMUC DT, DT+2, OKD+1
DGPMWD Q+3!
>> DGPMY DGPMV3+3, DGPMV3+4, DT*, DT+5*, VAR+4
DGSV Q+3!
DGT Q+3!
DGX Q+3!, VAR+4*, VAR+5, VAR+6
DGX1 Q+3!
DGZ DR+8!
DIC Q+4!
DIE DR+1*, DR+5!, Q+4!
DIE("NO^" DR+1*
DIK DR+10*!, Q+4!, OKD+3*, OKD+5*
DQ DR+5!
DR DR+5*, Q+4!
DTIME DT
I EVENTS+5*, Q+4!, CPTCK+4*
I1 Q+4!
J EVENTS+5*, Q+4!
K Q+4!
NODE PRODAT~, PRODAT+4
U DR+8, DR+11, VAR+2, PRODAT+4, PRODAT+5, CPTCK+2
X DGPMV3+3*, DT*, DT+1, DT+2, DT+3, DT+5, Q+4!, VAR+5*, VAR+6*, PRODAT+3~
, PRODAT+4*, PRODAT+5, CPTCK+6*
X1 Q+4!, VAR+5*
X2 Q+4!
Y DGPMV3+9, DT*, DT+1, DT+4, DT+5, DR+6, DR+11*, Q+4!, OKD*, OKD+4*
, OKD+5*, VAR+3*, VAR+8*, PRODAT+3~, PRODAT+4*, PRODAT+5*, PRODAT+6
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 |  Naked Globals |  Local Variables  | All