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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: DVBACRRP

Package: Automated Medical Information Exchange

Routine: DVBACRRP


Information

DVBACRRP ;ALB/GTS-557/THM-REPRINT 21-DAY CERT FOR MAS ;21 JUL 89

Source Information

Source file <DVBACRRP.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Automated Medical Information Exchange 5 KILL^DVBAUTIL  NOPARM^DVBAUTL2  WR^DVBAUTL4  ($$PAT,$$SELECT)^DVBAUTL5  $$SITE^DVBCUTL4  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  (,KILL)^%ZTLOAD  
VA FileMan 1 ^%DT  

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

Package Total Caller Graph
Automated Medical Information Exchange 2 DVBA MAS REPRINT 21-DAY CERT  DVBACRRR  

Entry Points

Name Comments DBIA/ICR reference
KIL
DATA ;
KILL
CREATE ;CERTIFICATE CREATE
INIT ;
DATE() ;THis function returns a date of the original request from the user.
DEVICE ;

External References

Name Field # of Occurrence
^%DT INIT+7, DATE+3
^%ZIS DEVICE+5
HOME^%ZIS INIT+3
^%ZISC DEVICE+12
^%ZTLOAD DEVICE+11
KILL^%ZTLOAD KILL+1
KILL^DVBAUTIL KILL+2
NOPARM^DVBAUTL2 INIT+4
WR^DVBAUTL4 DATA+12, INIT+10, DEVICE+2, DEVICE+15
$$PAT^DVBAUTL5 DVBACRRP+6
$$SELECT^DVBAUTL5 DVBACRRP+4
$$SITE^DVBCUTL4 INIT+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Patient record missing for DFN ",DFN,!!
  • Line Location: CREATE+4
Function Call: WRITE
  • Prompt: !,FDT(0),?32,"REPORT OF CONTACT",!,?31,"21-DAY CERTIFICATE",?(80-11),"PAGE: 1",!,?(80-$L(HD1)\2),HD1,!!!!!!!,"Patient name: ",?16,PNAM,!,?9,"SSN: ",?16,SSN,?33,"Claim #: ",?43,CNUM,!!,?9,"Ward: ",?16,WARD,?30,"Bed: ",?36,BED,!!!
  • Line Location: CREATE+9
Function Call: WRITE
  • Prompt: " The patient above has been hospitalized for 21 consecutive days ",!,"from "
  • Line Location: CREATE+10
Function Call: WRITE
  • Prompt: Y," to "
  • Line Location: CREATE+10
Function Call: WRITE
  • Prompt: Y," to "
  • Line Location: CREATE+10
Function Call: WRITE
  • Prompt: "Physician signature: "
  • Line Location: CREATE+11
Function Call: WRITE
  • Prompt: "_"
  • Line Location: CREATE+11
Function Call: WRITE
  • Prompt: !!!," Approved by: "
  • Line Location: CREATE+12
Function Call: WRITE
  • Prompt: "_"
  • Line Location: CREATE+12
Function Call: WRITE
  • Prompt: !!?5,"R0C 119",!
  • Line Location: CREATE+13
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+5
Routine Call
  • %ZIS
  • Line Location:
    • INIT+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" CREATE+10, INIT+8
^DPT - [#2] CREATE+3, CREATE+4, CREATE+5, CREATE+6
^DVB(396 - [#396] DATA+4, DATA+7, CREATE+1, CREATE+2, CREATE+7
^TMP($J INIT+1!

Label References

Name Line Occurrences
$$DATE DVBACRRP+5
CREATE DATA+4, DATA+8
DATA DVBACRRP+10
DEVICE DVBACRRP+8
INIT DVBACRRP+2
KIL DVBACRRP+3, DVBACRRP+5, DVBACRRP+6, DVBACRRP+7, DVBACRRP+9
KILL KIL

Naked Globals

Name Field # of Occurrence
^( CREATE+6
^(0 DATA+4, CREATE+6, CREATE+7
^(2 CREATE+2
^(4 CREATE+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT DATE+2*, DATE+4!
%DT("A" DATE+2*
%DT(0 KILL!, DATE+1*
%ZIS DEVICE+4*, DEVICE+5!
>> ADMDT CREATE+7*, CREATE+10
>> BED CREATE+7*, CREATE+9
>> CNUM CREATE+6*, CREATE+9
CONT DVBACRRP+3, DVBACRRP+9, KILL!, INIT+2*, INIT+5*, DEVICE+6*, DEVICE+8*
>> DCHGDT CREATE+7*, CREATE+10
>> DFN DATA+4*, DATA+7*, CREATE+3, CREATE+4, CREATE+5, CREATE+6
DT INIT+7*, INIT+8, DATE+1
DVBAON2 KILL!, CREATE+3, CREATE+5*, CREATE+8, CREATE+15*
>> DVBAQUIT INIT+5
DVBSEL DVBACRRP+4*, DVBACRRP+5, DVBACRRP+6, DVBACRRP+7, DATA+1, DATA+6, KILL!
>> FDT(0 CREATE+9, INIT+8*
>> HD INIT+2*, INIT+9
>> HD1 CREATE+9, INIT+6*
>> I DEVICE+10*
IO DATA+2, CREATE+8
IO("Q" DEVICE+7
IOF CREATE+3, CREATE+8
ION DEVICE+9
IOST CREATE+3, CREATE+8
>> J DATA+4*
>> LINE CREATE+11*, CREATE+12*
>> NAME DATA+3*, DATA+4*
>> NODTA DATA+10, CREATE+14*, INIT+2*
>> PNAM CREATE+6*, CREATE+9
>> POP DEVICE+6
SDATE DVBACRRP+5*, DATA+4, KILL!
>> SSN CREATE+6*, CREATE+9
U DATA+4, DATA+7, CREATE+2, CREATE+6, CREATE+7
VAR DATA+13!, KILL!, INIT+11!, DEVICE+3!, DEVICE+16!
VAR(1 DATA+11*, INIT+9*, DEVICE+1*, DEVICE+14*
>> WARD CREATE+7*, CREATE+9
>> X INIT+7*
>> XDA DVBACRRP+6*, DATA+4*, DATA+7, CREATE+1, CREATE+2, CREATE+7
>> Y CREATE+10*, INIT+7, INIT+8*, DATE+5
>> ZTDESC DEVICE+9*
>> ZTIO DEVICE+9*
>> ZTQUEUED KILL+1
>> ZTRTN DEVICE+9*
>> ZTSAVE( DEVICE+10*
>> ZTSK DEVICE+13
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All