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

Package: Registration

Routine: DGPMV32


Information

DGPMV32 ;ALB/MIR - CONTINUE TRANSFER A PATIENT OPTION ;5/7/91 09:08

Source Information

Source file <DGPMV32.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 3 C^%DTC  ^DIE  ^DIK  
Registration 2 (ASIHOF,ECA,UHD)^DGPMV321  SPEC^DGPMV36  

Caller Graph

Caller Graph Total: 8

Package Total Caller Graph
Registration 8 DGPMTSI  DGPMV30  DGPMV31  DGPMV321  DGPMV33  DGPMV331  DGPMVDL  DGPMVDL1  

Entry Points

Name Comments DBIA/ICR reference
ABB ;absence checks
AB ;update absences upon ward/room-bed change during admit or transfer patient options
CONT
Q ;I DGPMA'=DGPMP W !,"Patient Transfer",$S('$D(^DGPM(+DGPMDA,0)):" Deleted.",'DGPMP:"red.",1:" Updated.") K ORQUIT ;IHS/ANMC/LJF 7/26/2001
FINDLAST ;find the last transfer which originated ASIH care (either a TO ASIH or TO ASIH (OTHER FACILITY) transfer)
ASIHOF ;if TO ASIH (OTHER FACILITY) update pseudo discharge
DICS
SET ;set variables if coming from hospital admission (for FINDLAST)

External References

Name Field # of Occurrence
C^%DTC ASIHOF+2
ASIHOF^DGPMV321 ASIHOF+1
ECA^DGPMV321 CONT
UHD^DGPMV321 CONT+2
SPEC^DGPMV36 CONT+4
^DIE ABB+3, ASIHOF+3
^DIK DGPMV32+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Incomplete Transfer...Deleted"
  • Line Location: DGPMV32+5
Function Call: WRITE
  • Prompt: !,"Patient Transfer",$S('$D(^DGPM(+DGPMDA,0)):" Deleted.",'DGPMP:"red.",1:" Updated.")
  • Line Location: Q+0
Function Call: WRITE
  • Prompt: !,"Updating subsequent Absences"
  • Line Location: AB+1
Routine Call
  • DIE
  • Line Location:
    • ABB+3
    • ASIHOF+3

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(405.1 - [#405.1] CONT+3, DICS, DICS+1, DICS+2
^DG(405.2 - [#405.2] DGPMV32+6, ABB+1, DICS+2
^DGPM - [#405] Q+1, AB+2, ABB+3, DICS+4, ASIHOF+3, SET+1, FINDLAST+10
^DGPM("APMV" FINDLAST+10
^DGPM("APTT2" AB+2
^DIC(42 - [#42] DICS+6, DICS+8
^UTILITY("DGPM" ABB+3*, ASIHOF+3*

Label References

Name Line Occurrences
AB DGPMV32+9
ABB AB+2
ASIHOF CONT+1
FINDLAST ASIHOF+1
Q DGPMV32+6, CONT+3

Naked Globals

Name Field # of Occurrence
^( FINDLAST+10
^("E" DGPMV32+6, ABB+1, DICS+2
^("P" ASIHOF+3
^(0 CONT+3, AB+2, DICS+6, DICS+8, SET+1, FINDLAST+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA DGPMV32+6*, AB+3!, ABB+2*, ABB+3, DICS+4, ASIHOF+2*, ASIHOF+3
>> DFN AB+2, FINDLAST+10
DG ABB+2!, ASIHOF+3!
>> DGER DICS*, DICS+1*, DICS+2*, DICS+3*, DICS+4*, DICS+6*, DICS+8*, DICS+9*, DICS+10*, DICS+11*
DGI AB+1*, AB+2*, AB+3!
DGJ AB+2*, AB+3!, ABB+2
DGJJ AB+2*, AB+3!, ABB+1, ABB+2, ABB+3
>> DGPM0 DICS, DICS+2, DICS+3
>> DGPM2 DICS+1, DICS+10
>> DGPMA DGPMV32+6*, DGPMV32+9, CONT+3, Q+1, ASIHOF+1, ASIHOF+2
>> DGPMAB SET+1*, FINDLAST+9*, FINDLAST+10*
>> DGPMABL DGPMV32+9
>> DGPMAN DICS+6, DICS+8, ASIHOF+2, SET+1
>> DGPMCA AB+2, ASIHOF+1
>> DGPMDA DGPMV32+6, CONT+4, Q+1
>> DGPMN ASIHOF+1
DGPMND DGPMV32+9*, AB+1, AB+3!, ABB+2
DGPMNI ASIHOF+1*, SET+1*, FINDLAST+10, FINDLAST+11!
>> DGPMOUT CONT+4
>> DGPMP DGPMV32+9, Q+1, DICS+9
DGPMTN ASIHOF+1*, SET+1*, FINDLAST+9, FINDLAST+10, FINDLAST+11!
>> DGPMTYP DGPMV32+6*, CONT*, CONT+1, CONT+2
>> DGQUIET DGPMV32+6, Q+1
>> DGX DICS*, DICS+1*, DICS+2*, DICS+3, DICS+4, DICS+6, DICS+8, DICS+9, DICS+10
DIC AB+3!
DIC(0 AB+1*
DIE AB+1*, AB+3!, ASIHOF+3*
DIK DGPMV32+6*!
DQ ABB+2!, ASIHOF+3!
>> DR ABB+2*, ASIHOF+3*
>> I FINDLAST+10*
J AB+3!, ABB+2*
ORQUIT Q+1!
>> X ASIHOF+3, FINDLAST+10*
>> X1 ASIHOF+2*
>> X2 ASIHOF+2*
>> Y CONT+4*, DICS, DICS+1, DICS+2
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