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

Package: Automated Medical Information Exchange

Routine: DVBACMRP


Information

DVBACMRP ;ALB/GTS-557/THM-INCOMPETENT RPT ; 1/16/91 7:23 AM

Source Information

Source file <DVBACMRP.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  (,KILL)^%ZTLOAD  $$FMTE^XLFDT  
Automated Medical Information Exchange 3 (DATE,FINAL,KILL)^DVBAUTIL  NOPARM^DVBAUTL2  (ADM,ELIG,RCV)^DVBAVDPT  

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 INCOMPETENT VET REPORT  

Entry Points

Name Comments DBIA/ICR reference
SET
PRINTB
PRINT
PRINT1
TERM
SETUP
EN1
QUEUE
GO
KILL
DEQUE

External References

Name Field # of Occurrence
^%ZIS EN1+2
HOME^%ZIS TERM
^%ZISC KILL
^%ZTLOAD QUEUE+1
KILL^%ZTLOAD KILL
DATE^DVBAUTIL EN1+1
FINAL^DVBAUTIL KILL
KILL^DVBAUTIL SETUPEN1+2, GO+2
NOPARM^DVBAUTL2 SETUP
ADM^DVBAVDPT PRINTB
ELIG^DVBAVDPT PRINTB+10
RCV^DVBAVDPT SET+3
$$FMTE^XLFDT SET+1, SET+2, PRINTB+1, PRINTB+2, SETUP

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,?(80-$L(HEAD)\2),HEAD,!,?(80-$L(HEAD1)\2),HEAD1,!!
  • Line Location: PRINTB+6
Function Call: WRITE
  • Prompt: ?10,"Patient Name:",?26,PNAM,!!,?14,"Claim No:",?26,CNUM,!,?6,"Claim Folder Loc:",?26,CFLOC,!,?9,"Social Sec No:",?26,SSN,!,?8,"Admission Date:",?26,ADMDT,!,?3,"Admitting Diagnosis:",?26,DIAG,!
  • Line Location: PRINTB+7
Function Call: WRITE
  • Prompt: ?8,"Discharge Date:",?26,DCHGDT,!
  • Line Location: PRINTB+8
Function Call: WRITE
  • Prompt: ?5,"Type of Discharge:",?26,TDIS_$S(TO]"":" TO "_$S($D(^DIC(4,+TO,0)):$P(^(0),U,1),1:""),1:""),!
  • Condition for execution: DCHGDT]""
  • Line Location: PRINTB+8
Function Call: WRITE
  • Prompt: ?11,"Bed Service:",?26,BEDSEC,!,?13,"Recv A&A?:",?26,$S(RCVAA=0:"NO",RCVAA=1:"YES",1:"Not specified"),!
  • Line Location: PRINTB+9
Function Call: WRITE
  • Prompt: ?14,"Pension?:",?26,$S(RCVPEN=0:"NO",RCVPEN=1:"YES",1:"Not specified"),!
  • Line Location: PRINTB+10
Function Call: WRITE
  • Prompt: !,?5,"DATE RULED INCOMP:"
  • Line Location: PRINTB+11
Function Call: WRITE
  • Prompt: ?26,ICDAT_" (VA)"
  • Condition for execution: ICDAT]""
  • Line Location: PRINTB+11
Function Call: WRITE
  • Prompt: " - ",ICDAT2_" (CIVIL)"
  • Condition for execution: ICDAT2]""
  • Line Location: PRINTB+11
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINTB+11
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: PRINTB+12
Function Call: WRITE
  • Prompt: *7,!,"Press RETURN to continue or ""^"" to stop "
  • Line Location: PRINTB+12
Function Call: WRITE
  • Prompt: @IOF,!,"VARO INCOMPETENCY REPORT"
  • Line Location: SETUP+0
Function Call: WRITE
  • Prompt: !,HEAD1
  • Line Location: SETUP+2
Function Call: WRITE
  • Prompt: !!,"Please enter dates for search, oldest date first, most recent date last.",!!,"Last report was run on "
  • Line Location: EN1+0
Function Call: WRITE
  • Prompt: Y,!!
  • Line Location: EN1+0
Function Call: WRITE
  • Prompt: "."
  • Line Location: GO+0
Function Call: WRITE
  • Prompt: !!,*7,"No data found for parameters entered.",!!
  • Line Location: GO+1
Routine Call
  • %ZIS
  • Line Location:
    • EN1+2
Routine Call
  • %ZIS
  • Line Location:
    • TERM

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" EN1
^DG(405.2 - [#405.2] PRINTB+4
^DGPM - [#405] PRINTB+3
^DGPM("AMV1" GO
^DIC(4 - [#4] PRINTB+8
^DPT - [#2] SETSET+3
^DVB(396.1 - [#396.1] SETUP
^TMP($J DVBACMRP+2!, SET+4*, PRINT+1, PRINT1GO+1, GO+2, DEQUE!

Label References

Name Line Occurrences
GO DEQUE
KILL EN1+1, QUEUE+1, GO+1
PRINT GO+2
PRINT1 PRINT+1
PRINTB PRINT1
SET GO
TERM DVBACMRP+2

Naked Globals

Name Field # of Occurrence
^( SETPRINT1
^(0 PRINTB+3, PRINTB+4, PRINTB+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS EN1+2*!
>> ADM PRINTB+3, PRINT1*
>> ADMDT PRINTB+1*, PRINTB+7
>> ANS PRINTB+12*
>> BDATE GO
>> BEDSEC PRINTB+9
>> CFLOC SET+3, SET+4, PRINTB+7, PRINT+1*, PRINT1
>> CNUM SET+4, PRINTB*, PRINTB+7
>> DA SETSET+3, SET+4, PRINTB, PRINT1*, GO*
>> DATA PRINTB, PRINT1*
>> DCHGDT PRINTB+2*, PRINTB+8
>> DCHPTR PRINTB+3*
>> DFN SET+3*, PRINTB*
>> DIAG PRINTB+7
DT SETUP
>> DTAR SETUP*, SETUP+1, EN1
DTIME PRINTB+12
DVBAON2 PRINTB+5, PRINTB+13*, GO+2!, KILL!
>> DVBAQUIT PRINTB+12*, SETUPGO+2
>> EDATE GO
>> FDT(0 SETUP*, SETUP+1
>> HEAD PRINTB+6, SETUP+1*
>> HEAD1 PRINTB+6, SETUP+1*, SETUP+2
>> I QUEUE*
>> ICDAT SET*, SET+1*, SET+4, PRINTB*, PRINTB+11
>> ICDAT2 SET*, SET+2*, SET+4, PRINTB*, PRINTB+11
>> INCMP SET*, SET+4, PRINTB*
IO PRINTGO+1
IO("Q" QUEUEQUEUE+1
IOF PRINTB+5, SETUP
ION QUEUE
IOST PRINTB+5, PRINTB+12
>> J PRINT+1*, GO*
>> K PRINT1*
>> L PRINT1*
>> LADM PRINTB+3*
>> M PRINT+1*
>> MA SET+4, PRINTB*, GO*
>> MB SET+4, GO*
NOASK TERM!, QUEUE*, GO
>> PNAM PRINTB+7
>> POP EN1+2
>> QUIT PRINTB+12*, PRINT*, PRINT+1, PRINT1
>> QUIT1 PRINTB*
>> RCVAA SET+4, PRINTB*, PRINTB+9
>> RCVPEN SET+4, PRINTB*, PRINTB+10
>> RO SET+3
>> RONUM SET+3
>> SSN PRINTB+7
>> TDIS PRINTB+3*, PRINTB+4*, PRINTB+8
>> TO PRINTB+3*, PRINTB+8
U SETSET+4, PRINTBPRINTB+3, PRINTB+4, PRINTB+8, PRINTB+12, SETUP+1, EN1
>> X EN1+1, KILL*
>> XCN SET+4, PRINT+1*, PRINT1
>> Y EN1*, EN1+1
>> ZTDESC QUEUE*
>> ZTIO QUEUE*
>> ZTQUEUED KILL
>> ZTRTN QUEUE*
>> ZTSAVE( QUEUE*
>> ZTSK QUEUE+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All