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

Package: Beneficiary Travel

Routine: DGBTR


Information

DGBTR ;ALB/LM - BENEFICIARY TRAVEL RE-PRINT; 1/30/89@8:00 ;4/26/91 14:32

Source Information

Source file <DGBTR.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Beneficiary Travel 5 MONTOT^DGBT1  SCREEN^DGBTCD  SCREEN^DGBTCDSP  START^DGBTCR  QUIT^DGBTEND  
VA FileMan 3 ^DIC  $$GET1^DIQ  ^DIR  
Registration 2 ^VADATE  6^VADPT  
Kernel 1 ^%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: 2

Package Total Caller Graph
Beneficiary Travel 2 DGBT BENE TRAVEL REPRINT  DGBT BENE TRAVEL VIEW  

Entry Points

Name Comments DBIA/ICR reference
DISPLAY ;display the selected claim
REPRINT ;
ASK ;
LIST ;list the patients claim by newest claim first
CHOZ ;
CHOZLAST ;
QUIT
HELP
CLMTYP(DGBTCMTY) ;this will return the claim type from ^DGBT(392,IEN,0) field #56. If equal null then mileage claim, if equal "S", special mode claim

External References

Name Field # of Occurrence
^%ZIS DISPLAY+13
MONTOT^DGBT1 REPRINT+10
SCREEN^DGBTCD DISPLAY+14
SCREEN^DGBTCDSP DISPLAY+7
START^DGBTCR REPRINT+11
QUIT^DGBTEND DISPLAY+2
^DIC ASK+1
$$GET1^DIQ DISPLAY+5, REPRINT+4, LIST+11, LIST+13, CLMTYP+1
^DIR CHOZ+3
^VADATE DISPLAY+11, LIST+11, LIST+13
6^VADPT ASK+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"CLAIM WAS DENIED. NO VOUCHER FOR THIS CLAIM",!!
  • Line Location: REPRINT+5
Function Call: WRITE
  • Prompt: !!,"There are no computer entries on file for this patient.",!
  • Line Location: ASK+4
Function Call: WRITE
  • Prompt: !,"There are no computer entries on file for this patient with these account types.",!
  • Line Location: LIST+5
Function Call: WRITE
  • Prompt: !,"Select Claim DATE/TIME: ",!
  • Line Location: LIST+6
Function Call: WRITE
  • Prompt: !!,"ANSWER WITH NUMERIC CHOICE. BECAUSE ENTRIES ARE STORED BY DATE.TIME.SECONDS,",!,"YOU MUST ENTER A NUMERIC CHOICE."
  • Line Location: HELP+0
Routine Call
  • %ZIS
  • Line Location:
    • DISPLAY+13
Routine Call
  • DIC
  • Line Location:
    • ASK+1
Routine Call
  • DIR
  • Line Location:
    • CHOZ+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^DGBT(392 - [#392] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGBT(392 - [#392] DISPLAY+9, REPRINT+6, ASK+4, LIST+4, LIST+5
^UTILITY($J ASK+6!, LIST+4*, LIST+5, LIST+6, LIST+8, LIST+9, LIST+13, CHOZ+3

Label References

Name Line Occurrences
ASK DISPLAY+3, REPRINT+2, ASK+4, LIST+5, LIST+14
CHOZ LIST+12, CHOZLAST+3
CHOZLAST LIST+8
CLMTYP DISPLAY+6
DISPLAY DISPLAY+7, DISPLAY+16
LIST ASK+7
QUIT DISPLAY+3, DISPLAY+4, DISPLAY+7, DISPLAY+8, DISPLAY+9, DISPLAY+15, REPRINT+3, REPRINT+5, REPRINT+6, REPRINT+12
, ASK+2, LIST+8
REPRINT REPRINT+5

Naked Globals

Name Field # of Occurrence
^( LIST+4, LIST+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CDAT QUIT+1!
DEDUCT QUIT+1!
DFN DISPLAY+3, ASK+3*, ASK+4, LIST+4, LIST+5, QUIT!
DGBTA REPRINT+9, LIST+13*, QUIT!
DGBTACCT QUIT+1!
DGBTC LIST+3*, LIST+4*, CHOZ+2, QUIT!
DGBTCH LIST+3*, LIST+8, LIST+9, LIST+12, LIST+13, LIST+14, CHOZ+1, CHOZ+3*, CHOZLAST+2, QUIT!
DGBTCMTY DISPLAY+1~, DISPLAY+5*, DISPLAY+6, DISPLAY+7, CLMTYP~, CLMTYP+1*, CLMTYP+2*
DGBTCNU QUIT!
DGBTDCLM LIST+2~, LIST+11*, LIST+12, LIST+13*
DGBTDLTR REPRINT+1~, REPRINT+4*, REPRINT+5
DGBTDT DISPLAY+4, DISPLAY+5, DISPLAY+8, DISPLAY+9, DISPLAY+10, REPRINT+3, REPRINT+4, REPRINT+6, LIST+13*, QUIT!
, CLMTYP+1
DGBTDTE DISPLAY+12*, QUIT!
DGBTDTI REPRINT+8~, REPRINT+9*
DGBTFCTY QUIT!
DGBTMR QUIT!
DGBTR DISPLAY+3*, REPRINT+2*, ASK+7, LIST+4, QUIT!
DGBTRDV REPRINT+8~
DGBTRET REPRINT+8~
DGBTSP DISPLAY+7!
DGBTTCTY QUIT!
DGBTVAR QUIT!
DGPGM QUIT+1!
DGVAR QUIT+1!
DIC ASK+1*, QUIT!
DIC(0 ASK+1*
DIR CHOZ+3!
DIR("?" CHOZ+2*
DIR("A" CHOZ+2*, CHOZ+3*
DIR(0 CHOZ+3*
DTOTAL QUIT+1!
DTOUT LIST+8, LIST+12, CHOZ+3*, QUIT!
>> DUOUT LIST+8, LIST+12
EDATE QUIT+1!
EMONTH QUIT+1!
I LIST+4*, LIST+8*, LIST+9, LIST+10, LIST+12, CHOZLAST+1, QUIT!
>> IOP DISPLAY+12*
J LIST+4*, LIST+9*, LIST+10, QUIT!
K LIST+10*, LIST+12, CHOZ+2, CHOZ+3, QUIT!
MDATA QUIT+1!
MONTHDED REPRINT+8~, REPRINT+10
MONTOT REPRINT+7~
NOLINE DISPLAY+1~, DISPLAY+7*
ONEWAY REPRINT+8~, REPRINT+10, QUIT+1!
PDATA QUIT+1!
RDVMSG REPRINT+8~
RT REPRINT+8~, REPRINT+10
RTRIP QUIT+1!
TDED REPRINT+8~, REPRINT+10
TFIEN REPRINT+8~
TOTRIPS REPRINT+8~, REPRINT+10
TTRIPS REPRINT+8~, REPRINT+10
VA QUIT!
VADAT QUIT!
VADAT("W" DISPLAY+10*, LIST+10*, LIST+11, LIST+13*
VADATE QUIT!
VADATE("E" DISPLAY+12, LIST+12, LIST+13
VADM QUIT!
VAEL QUIT!
VAERR QUIT!
VAPA QUIT!
WAIVER REPRINT+8~, REPRINT+10
WTYPE REPRINT+8~, REPRINT+10
X LIST+3*, LIST+8, LIST+13, QUIT!
Y ASK+2, ASK+3, CHOZ+3, QUIT!
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