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

Package: Automated Medical Information Exchange

Routine: DVBACRMS


Information

DVBACRMS ;ALB/GTS-557/THM - PRINT 21-DAY CERT FOR RO ;21 JUL 89

Source Information

Source file <DVBACRMS.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 4 ^%DT  ^DIE  ^DIWP  ^DIWW  
Automated Medical Information Exchange 2 (DUZ2,KILL)^DVBAUTIL  NOPARM^DVBAUTL2  
Kernel 2 (,HOME)^%ZIS  (,KILL)^%ZTLOAD  

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 RO PRINT 21-DAY CERT  DVBAB82  

Entry Points

Name Comments DBIA/ICR reference
DATA
KILL
CREATE ;CERTIFICATE CREATE

External References

Name Field # of Occurrence
^%DT DVBACRMS+8
^%ZIS DVBACRMS+12
HOME^%ZIS DVBACRMS+6
^%ZTLOAD DVBACRMS+14
KILL^%ZTLOAD KILL
^DIE CREATE+16
^DIWP CREATE+13
^DIWW CREATE+14
DUZ2^DVBAUTIL DVBACRMS+3
KILL^DVBAUTIL DVBACRMS+6, KILL
NOPARM^DVBAUTL2 DVBACRMS+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,"There are no new 21-DAY CERTIFICATES to print.",!
  • Line Location: DVBACRMS+4
Function Call: WRITE
  • Prompt: !!,*7,"Your USER NUMBER is missing. Call the site manager.",!!
  • Line Location: DVBACRMS+5
Function Call: WRITE
  • Prompt: @IOF,!?(IOM-$L(HD)\2),HD,!!!,"This program generates ORIGINAL Regional Office 21-day certificates.",!!
  • Line Location: DVBACRMS+10
Function Call: WRITE
  • Prompt: !!,"Patient record missing for DFN ",DFN,!!
  • Line Location: CREATE+5
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+10
Function Call: WRITE
  • Prompt: " The patient above has been hospitalized for 21 consecutive days ",!,"from "
  • Line Location: CREATE+11
Function Call: WRITE
  • Prompt: Y," to "
  • Line Location: CREATE+11
Function Call: WRITE
  • Prompt: Y," to "
  • Line Location: CREATE+11
Function Call: WRITE
  • Prompt: !!!,"A signed copy of this document is on file at "_HD1,!
  • Line Location: CREATE+14
Function Call: WRITE
  • Prompt: !!?5,"R0C 119",!
  • Line Location: CREATE+15
Routine Call
  • DIE
  • Line Location:
    • CREATE+16
Routine Call
  • %ZIS
  • Line Location:
    • DVBACRMS+12
Routine Call
  • %ZIS
  • Line Location:
    • DVBACRMS+6

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" DVBACRMS+9, CREATE+11
^DPT - [#2] CREATE+4, CREATE+5, CREATE+6, CREATE+7
^DVB(396 - [#396] DVBACRMS+4, DATACREATE+3, CREATE+8, CREATE+13
^DVB(396.1 - [#396.1] DVBACRMS+6
^UTILITY($J CREATE+12!
^VA(200 - [#200] DVBACRMS+7

Label References

Name Line Occurrences
CREATE DATA
DATA DVBACRMS+15
KILL DVBACRMS+3, DVBACRMS+5, DVBACRMS+12, DVBACRMS+14

Naked Globals

Name Field # of Occurrence
^( CREATE+7, CREATE+13
^(0 DVBACRMS+7, CREATE+7, CREATE+8
^(2 CREATE+3
^(4 CREATE+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DVBACRMS+12*!
>> ADMDT CREATE+8*, CREATE+11
>> BED CREATE+8*, CREATE+10
>> CNUM CREATE+7*, CREATE+10
>> DA CREATE+16*
>> DCHGDT CREATE+8*, CREATE+11
>> DFN DATA*, CREATE+4, CREATE+5, CREATE+6, CREATE+7
>> DIE CREATE+16*
>> DIWF CREATE+13*
>> DIWL CREATE+13*
>> DIWR CREATE+13*
>> DR CREATE+16*
DT DVBACRMS+8*, DVBACRMS+9, CREATE+16
>> DTAR DVBACRMS+6*
DUZ DVBACRMS+5, DVBACRMS+7
>> DVBAD2 DVBACRMS+4, DATA
DVBAON2 KILL!, CREATE+4, CREATE+6*, CREATE+9, CREATE+17*
>> DVBAQUIT DVBACRMS+3, DVBACRMS+6
>> DVBGUI DVBACRMS+6, DVBACRMS+11, KILL
>> FDT(0 DVBACRMS+9*, CREATE+10
>> HD DVBACRMS+6*, DVBACRMS+10
>> HD1 DVBACRMS+6*, CREATE+10, CREATE+14
>> I DVBACRMS+13*
IO DATACREATE+9
IO("Q" DVBACRMS+13, DVBACRMS+14
IOF DVBACRMS+10, CREATE+4, CREATE+9
IOM DVBACRMS+10
ION DVBACRMS+13
IOST CREATE+4, CREATE+9
>> LINE CREATE+13*
>> OPER DVBACRMS+7*, CREATE+16
>> PNAM CREATE+7*, CREATE+10
>> POP DVBACRMS+12
>> SSN CREATE+7*, CREATE+10
U DVBACRMS+6, DVBACRMS+7, DATACREATE+3, CREATE+7, CREATE+8
>> WARD CREATE+8*, CREATE+10
>> X DVBACRMS+8*, CREATE+13*
>> XDA DATA*, CREATE+3, CREATE+8, CREATE+13, CREATE+16
>> Y DVBACRMS+8, DVBACRMS+9*, CREATE+11*
ZTDESC DVBACRMS+13*, DVBACRMS+14!
ZTIO DVBACRMS+13*, DVBACRMS+14!
>> ZTQUEUED KILL
ZTRTN DVBACRMS+13*, DVBACRMS+14!
>> ZTSAVE( DVBACRMS+13*
ZTSK DVBACRMS+14!
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