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

Package: Automated Medical Information Exchange

Routine: DVBCLOG


Information

DVBCLOG ;ALB/GTS-557/THM-LOG A 2507 REQUEST ; 9/21/91 9:26 PM

Source Information

Source file <DVBCLOG.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Automated Medical Information Exchange 7 ^DVBCEEXM  (CLINSF,INSUF)^DVBCLOG2  ^DVBCLOGE  ^DVBCPATA  KILL^DVBCUTIL  DDIS^DVBCUTL2  CONTMES^DVBCUTL4  
VA FileMan 5 ^%DT  (FILE,YN)^DICN  ^DIE  ^DIK  ^DIR  
Kernel 1 HOME^%ZIS  

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
Automated Medical Information Exchange 1 DVBA C ENTER C&P REQUEST  

Entry Points

Name Comments DBIA/ICR reference
SETUP
EN
WARD
EDIT1
EXIT
HDR
DEL
KILL
DR

External References

Name Field # of Occurrence
^%DT EN+1
HOME^%ZIS SETUP
FILE^DICN WARD+5
YN^DICN WARD
^DIE EDIT1+3
^DIK DEL
^DIR EDIT1+6
^DVBCEEXM WARD+5
CLINSF^DVBCLOG2 EDIT1+3, EDIT1+7
INSUF^DVBCLOG2 WARD+8, EDIT1+7, EDIT1+8
^DVBCLOGE EDIT1+13
^DVBCPATA EN
KILL^DVBCUTIL EXIT
DDIS^DVBCUTL2 WARD+5
CONTMES^DVBCUTL4 DEL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!!,"Your division number is missing.",!!
  • Line Location: DVBCLOG+3
Function Call: WRITE
  • Prompt: !!,*7,"Your user number is invalid."
  • Line Location: DVBCLOG+4
Function Call: WRITE
  • Prompt: !!,*7,"Invalid division",!!
  • Line Location: DVBCLOG+5
Function Call: WRITE
  • Prompt: @FF,?(IOM-$L(HD1)\2),HD1,!!!
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: @IOF,!,HD1," continued ---",!!!!!!
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: *7,"Vet is an INPATIENT, on ward "_WARD,!,"Want to continue"
  • Line Location: WARD+0
Function Call: WRITE
  • Prompt: !!,"Enter Y to proceed with the request or N to go",!,"back and re-select.",!!
  • Line Location: WARD+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: WARD+3
Function Call: WRITE
  • Prompt: *7," ... Timed out! "
  • Line Location: WARD+5
Function Call: WRITE
  • Prompt: *7
  • Line Location: WARD+5
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: EDIT1+0
Function Call: WRITE
  • Prompt: *7,!!,"""^"" NOT allowed here"
  • Line Location: EDIT1+1
Function Call: WRITE
  • Prompt: !!,"[RETURN] will continue to exam selection, E will allow",!,"editing of what you have entered and X will DELETE",!,"the entire request"
  • Line Location: EDIT1+2
Function Call: WRITE
  • Prompt: !?20,"(Cancel) "
  • Line Location: EDIT1+11
Function Call: WRITE
  • Prompt: !!,*7,"Must be the RETURN key, X, or E "
  • Line Location: EDIT1+12
Function Call: WRITE
  • Prompt: @FF,?(IOM-$L(HD)\2),HD,!!,"Veteran name: ",$P(PNAM,",",2,99)," ",$P(PNAM,",",1),?55,"SSN: ",SSN,!?53,"C-NUM: ",CNUM,!
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!,*7,"Request DELETED.",!
  • Line Location: DEL+0
Routine Call
  • DIE
  • Line Location:
    • EDIT1+3
Routine Call
  • DIR
  • Line Location:
    • EDIT1+6
Routine Call
  • %ZIS
  • Line Location:
    • SETUP

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DVB(396.3 - [#396.3] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] WARD
^DVB(396.3 - [#396.3] WARD+8, EDIT1+3, EDIT1+4, EDIT1+8
^TMP($J SETUP!, KILL!

Label References

Name Line Occurrences
DEL WARD+5, WARD+9, EDIT1EDIT1+9, EDIT1+11, EDIT1+13, EDIT1+14
DR WARD+5
EDIT1 EDIT1+1, EDIT1+2, EDIT1+10, EDIT1+12
EN WARD+2, WARD+5, WARD+6, WARD+9, EDIT1+9, EDIT1+11, EDIT1+15
EXIT DVBCLOG+3, DVBCLOG+4, DVBCLOG+5, ENWARDEDIT1
HDR WARD+5, EDIT1+3
KILL ENEDIT1+15
WARD WARD+1

Naked Globals

Name Field # of Occurrence
^( WARD

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% WARD*, WARD+2, KILL!
%DT EN+1*!, KILL!
%Y WARD+1, KILL+1!
ADD1 KILL+1!
ADD2 KILL+1!
ANS EDIT1!*, EDIT1+1, EDIT1+2, EDIT1+3, EDIT1+4, EDIT1+8, EDIT1+9, EDIT1+10, EDIT1+11!, EDIT1+12
EDIT1+13!
CITY KILL+1!
CNTY KILL+1!
CNUM HDR, KILL!
CTIM EN+1*, KILL+1!, DR
D0 KILL+1!
DA WARD+3!, WARD+7*, EDIT1+3*, EDIT1+7*, DEL*!, KILL!, KILL+1!
DD WARD+3!, KILL!
DFN WARDWARD+4, WARD+5, KILL!
DIC WARD+4*, EDIT1+13!, KILL+1!
DIC("DR" DR*
DIC("W" WARD+5!
DIC(0 WARD+4*
DIE WARD+4*, EDIT1+3*, EDIT1+13!, KILL+1!
DIK DEL*!, KILL!
DIR EDIT1+7!
DIR("?" EDIT1+6*
DIR("A" EDIT1+5*
DIR("B" EDIT1+6*
DIR(0 EDIT1+5*
DLAYGO WARD+4*, WARD+5!
DO WARD+3!, KILL!
DR EDIT1+3*, KILL!
DTA KILL!
DTIME EDIT1
DTOUT WARDWARD+5, KILL+1!
DUOUT KILL+1!
DUZ DVBCLOG+4
>> DUZ(2 DVBCLOG+3, DVBCLOG+5
DVBADTOT KILL+1!
DVBAINRQ EDIT1+3!*, EDIT1+4, EDIT1+8, EDIT1+10!
DVBAOUT WARD+9, EDIT1+9, KILL+1!
DVBCLCKD EDIT1+14, KILL+1!
DVBCNEW WARD+3!, KILL+1!
DX KILL+1!
DXCOD KILL!
DXNUM KILL!
EDIT EN+2!, KILL!
ELIG KILL+1!
EX KILL!
EXMNM KILL!
EXMPT KILL!
>> FF SETUP*, ENHDR
>> HD SETUP*, HDR
>> HD1 SETUP*, ENEN+2
>> HD2 SETUP*
INCMP KILL+1!
IOF SETUPEN+2
IOM ENHDRHDR+1
JJ KILL!
>> LINE HDR+1*
OUT EN!, WARD+5!, EDIT1+13!, DEL*
PCT KILL!
PNAM HDR, KILL!
PRDSV KILL+1!
REQDA WARD+5*, WARD+7*, WARD+8, EDIT1+3, EDIT1+4, EDIT1+7, EDIT1+8, DEL!, KILL!
ROUTLOC KILL!
SC KILL!
SSN HDR, KILL!
STATE KILL+1!
U WARDEDIT1+1
VX KILL!
WARD WARD*, KILL+1!
X EN+1*!, WARD+3!, WARD+4*, WARD+5*, KILL!
Y EN+1!, WARD+3!, WARD+5, WARD+6, WARD+7, EDIT1+7!, KILL+1!
ZIP KILL+1!
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