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 |  Local Variables  | All
Print Page as PDF
Routine: DGBTSP

Package: Beneficiary Travel

Routine: DGBTSP


Information

DGBTSP ;ALB/BLD - BENEFICIARY TRAVEL SPECIAL MODE OF TRANSPORTATION ; 12/18/2011@1000 ; 12/23/2012

Source Information

Source file <DGBTSP.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 4 MSG^DIALOG  (,FILE)^DIE  $$GET1^DIQ  ^DIR  
Beneficiary Travel 3 (CLRLTR,DGBTDR)^DGBTDLT  ACTFILE^DGBTSP  (DELSP,INVAMT)^DGBTSP1  

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

Package Total Caller Graph
Beneficiary Travel 3 DGBTE  DGBTSP  DGBTSP1  

Entry Points

Name Comments DBIA/ICR reference
EN(DGBTSP) ;main entry point from DGBTE
RESTART(DGBTCMTY)
SPRMKS(DGBTSP) ;will allow user to enter other remarks about special mode transportation
PREAUTH(DGBTSP) ;this will ask if trip was pre-authorized. If answer is no then ask end user if claim is approved or denied.
VENDOR(DGBTSP) ;allows the user to select from a vendor already in the FMS system
ADDINFO(DGBTSP) ;this will ask additional questions of the end user about the invoice presented by the patient.
INST(DGBTINST) ;get destination information
CLEANUP ;this will clean up the ^DGBT(392,D0) file for nodes "M","D","T" and the 3 and 4 piece of the "A" node
ACTFILE ;

External References

Name Field # of Occurrence
CLRLTR^DGBTDLT PREAUTH+15, PREAUTH+31
DGBTDR^DGBTDLT PREAUTH+28
ACTFILE^DGBTSP RESTART+10
DELSP^DGBTSP1 EN+40
INVAMT^DGBTSP1 ADDINFO+143
MSG^DIALOG ACTFILE+6
^DIE EN+39
FILE^DIE EN+35, CLEANUP+19
$$GET1^DIQ EN+8, EN+31, EN+32, EN+34, RESTART+7, RESTART+14, RESTART+19, SPRMKS+2, PREAUTH+7, PREAUTH+17
, VENDOR+4, ADDINFO+10, ADDINFO+18, ADDINFO+27, ADDINFO+35, ADDINFO+43, ADDINFO+56, ADDINFO+64, ADDINFO+73, ADDINFO+81
, ADDINFO+89, ADDINFO+97, ADDINFO+105, ADDINFO+115, ADDINFO+124, ADDINFO+134, ADDINFO+150, INST+3, INST+4, INST+5
, INST+6, INST+7, INST+8
^DIR EN+21, RESTART+24, SPRMKS+7, PREAUTH+12, PREAUTH+22, VENDOR+10, ADDINFO+12, ADDINFO+21, ADDINFO+29, ADDINFO+37
, ADDINFO+45, ADDINFO+58, ADDINFO+67, ADDINFO+75, ADDINFO+83, ADDINFO+91, ADDINFO+99, ADDINFO+111, ADDINFO+120, ADDINFO+130
, ADDINFO+140, ADDINFO+155, ACTFILE+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: RESTART+17
Function Call: WRITE
  • Prompt: !
  • Line Location: SPRMKS+1
Function Call: WRITE
  • Prompt: !
  • Line Location: PREAUTH+5
Function Call: WRITE
  • Prompt: !!,"CLAIM HAS BEEN DENIED AND DENIAL OF BENEFITS LETTER HAS ALREADY BEEN ISSUED"
  • Line Location: PREAUTH+26
Function Call: WRITE
  • Prompt: !!,"CLAIM HAS BEEN DENIED AND DENIAL OF BENEFITS LETTER WILL BE ISSUED"
  • Line Location: PREAUTH+27
Function Call: WRITE
  • Prompt: !
  • Line Location: VENDOR+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ADDINFO+51
Function Call: WRITE
  • Prompt: !
  • Line Location: ADDINFO+104
Function Call: WRITE
  • Prompt: !
  • Line Location: ADDINFO+114
Function Call: WRITE
  • Prompt: !
  • Line Location: ADDINFO+123
Function Call: WRITE
  • Prompt: !
  • Line Location: ADDINFO+133
Function Call: WRITE
  • Prompt: !
  • Line Location: ADDINFO+149
Routine Call
  • DIALOG
  • Line Location:
    • ACTFILE+6
Routine Call
  • DIE
  • Line Location:
    • EN+39
Routine Call
  • DIE
  • Line Location:
    • EN+35
    • CLEANUP+19
Routine Call
  • DIR
  • Line Location:
    • EN+21
    • RESTART+24
    • SPRMKS+7
    • PREAUTH+12
    • PREAUTH+22
    • VENDOR+10
    • ADDINFO+12
    • ADDINFO+21
    • ADDINFO+29
    • ADDINFO+37
    • ADDINFO+45
    • ADDINFO+58
    • ADDINFO+67
    • ADDINFO+75
    • ADDINFO+83
    • ADDINFO+91
    • ADDINFO+99
    • ADDINFO+111
    • ADDINFO+120
    • ADDINFO+130
    • ADDINFO+140
    • ADDINFO+155
    • ACTFILE+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^VA(200 - [#200] GET1^DIQ
^DGBT(392 - [#392] Classic Fileman Calls,  GET1^DIQ
^DGBT(392.3 - [#392.3] GET1^DIQ
^DIC(4 - [#4] GET1^DIQ
^DG(40.8 - [#40.8] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGBT(392 - [#392] EN+22, EN+23, EN+40, RESTART+13*, RESTART+24, SPRMKS+7, PREAUTH+12, VENDOR+10, ADDINFO+12, ADDINFO+21
, ADDINFO+29, ADDINFO+37, ADDINFO+45, ADDINFO+58, ADDINFO+67, ADDINFO+75, ADDINFO+83, ADDINFO+91, ADDINFO+99, ADDINFO+111
, ADDINFO+120, ADDINFO+130, ADDINFO+140, ADDINFO+155, CLEANUP+3!
^DGBT(392.3 - [#392.3] RESTART+4, RESTART+6

Label References

Name Line Occurrences
ADDINFO RESTART+29
INST ADDINFO+4
PREAUTH RESTART+27
SPRMKS RESTART+26
VENDOR RESTART+28

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN+39*
>> ACCT RESTART+3*, RESTART+4*, RESTART+5, RESTART+6, RESTART+9, ACTFILE+2
ACTTYPE EN+5~
AUTHORIZED EN+4~, PREAUTH+17*, PREAUTH+21
BASERATE EN+5~
>> CHZFLG EN+23, RESTART+11
>> DA EN+39*
>> DEPCITY ADDINFO+27*, ADDINFO+28
>> DEPL1 ADDINFO+10*, ADDINFO+11
>> DEPL2 ADDINFO+18*, ADDINFO+19
>> DEPST ADDINFO+35*, ADDINFO+36
>> DEPZIP ADDINFO+43*, ADDINFO+44
>> DFN EN+32, PREAUTH+6, VENDOR+3, ADDINFO+2
DGBTACTYPE EN+4~, EN+8*
>> DGBTADDR(1 ADDINFO+11
>> DGBTADDR(2 ADDINFO+19
>> DGBTADDR(4 ADDINFO+28
>> DGBTADDR(5 ADDINFO+36
>> DGBTADDR(6 ADDINFO+44
>> DGBTAPPTYP PREAUTH+26, PREAUTH+27, PREAUTH+28, PREAUTH+31
DGBTCMTY EN+6*, EN+25*, EN+34, EN+39, EN+40*, RESTART~
>> DGBTDIVI INST+3
>> DGBTDIVN INST+4, INST+5, INST+6, INST+7, INST+8
>> DGBTDL("CLAIM DENIED" , CLEANUP+7*, CLEANUP+13
>> DGBTDL("DENIE D REASON" , CLEANUP+9*, CLEANUP+15
>> DGBTDL("DT DE NIED" , CLEANUP+8*, CLEANUP+14
>> DGBTDL("ISSUE D DATE" , CLEANUP+6*, CLEANUP+12
>> DGBTDL("ISSUED" CLEANUP+5*, CLEANUP+11
>> DGBTDT EN+8, EN+33, EN+39, EN+40, RESTART+13, RESTART+19, SPRMKS+2, PREAUTH+7, PREAUTH+17, VENDOR+4
, ADDINFO+105, ADDINFO+115, ADDINFO+124, ADDINFO+134, ADDINFO+150
>> DGBTDTE ADDINFO+119
>> DGBTDTI EN+22, EN+23, EN+28, EN+29, EN+30, EN+31, EN+32, EN+33, EN+34, RESTART+24
, SPRMKS+7, PREAUTH+12, VENDOR+10, ADDINFO+10, ADDINFO+12, ADDINFO+18, ADDINFO+21, ADDINFO+27, ADDINFO+29, ADDINFO+35
, ADDINFO+37, ADDINFO+43, ADDINFO+45, ADDINFO+56, ADDINFO+58, ADDINFO+64, ADDINFO+67, ADDINFO+73, ADDINFO+75, ADDINFO+81
, ADDINFO+83, ADDINFO+89, ADDINFO+91, ADDINFO+97, ADDINFO+99, ADDINFO+111, ADDINFO+120, ADDINFO+130, ADDINFO+140, ADDINFO+155
CLEANUP+2, CLEANUP+3, CLEANUP+11, CLEANUP+12, CLEANUP+13, CLEANUP+14, CLEANUP+15, CLEANUP+16, CLEANUP+17, CLEANUP+18
>> DGBTELL EN+27
DGBTFDA EN+4~, CLEANUP+19!
DGBTFDA(392 EN+28*, EN+29*, EN+30*, EN+31*, EN+32*, EN+34*, CLEANUP+11*, CLEANUP+12*, CLEANUP+13*, CLEANUP+14*
CLEANUP+15*, CLEANUP+16*, CLEANUP+17*, CLEANUP+18*
DGBTINST ADDINFO+4, INST~
DGBTINST("ADDRESS1" ADDINFO+74, ADDINFO+76*, INST+5*
DGBTINST("CITY" ADDINFO+82, ADDINFO+84*, INST+6*
DGBTINST("DIVISION" ADDINFO+57, ADDINFO+59*, INST+3*
DGBTINST("INS T NAME" , ADDINFO+65, ADDINFO+68*, INST+4*
DGBTINST("STATE" ADDINFO+90, ADDINFO+92*, INST+7*
DGBTINST("ZIP CODE" , ADDINFO+98, ADDINFO+100*, INST+8*
DGBTINTO EN+4~, EN+5~, ADDINFO+143
>> DGBTOLD RESTART+11*
>> DGBTQ RESTART+3*, RESTART+4, RESTART+7*
DGBTSP EN~, EN+6*, EN+23!*, EN+40!*, RESTART+24!*, RESTART+26, RESTART+27, RESTART+28, RESTART+29, SPRMKS~
, SPRMKS+7!*, PREAUTH~, PREAUTH+6, PREAUTH+12!*, PREAUTH+16*, VENDOR~, VENDOR+3, VENDOR+10!*, ADDINFO~, ADDINFO+2
, ADDINFO+12*, ADDINFO+21*, ADDINFO+29*, ADDINFO+37*, ADDINFO+45*, ADDINFO+48, ADDINFO+58*, ADDINFO+67*, ADDINFO+75*, ADDINFO+83*
, ADDINFO+91*, ADDINFO+99*, ADDINFO+102, ADDINFO+111!*, ADDINFO+120!*, ADDINFO+130!*, ADDINFO+140!*, ADDINFO+143, ADDINFO+147, ADDINFO+155!*
DGBTSP("ACCOUNT" RESTART+14*
DGBTSP("AUTHORIZED" PREAUTH+15!*, PREAUTH+21, PREAUTH+23*, PREAUTH+24*
DGBTSP("CITY OF DEPARTURE" , ADDINFO+30*
DGBTSP("CLAIM TYPE" , EN+25*, EN+28, EN+38
DGBTSP("DT IN VOICE REC" , ADDINFO+119, ADDINFO+121*
DGBTSP("INVOI CE NUMBER" , ADDINFO+109, ADDINFO+110, ADDINFO+112*, ADDINFO+119
DGBTSP("MODE OF TRANS" , RESTART+22, RESTART+23, RESTART+25*
DGBTSP("OTHER TRANS REMARKS" , SPRMKS+6, SPRMKS+8*
DGBTSP("PLACE OF DEPARTURE 2" , ADDINFO+22*,  OF DEPARTURE" , ADDINFO+13*
DGBTSP("PRE-AUTHORIZED" PREAUTH+11, PREAUTH+13*, PREAUTH+14*, PREAUTH+15
DGBTSP("RT/ON E WAY" , ADDINFO+128, ADDINFO+129, ADDINFO+131*
DGBTSP("SP MO DE OTHER REMARKS" , ADDINFO+154, ADDINFO+156*
DGBTSP("STATE OF DEPARTURE" , ADDINFO+38*
DGBTSP("TOTAL INVOICE" , ADDINFO+143,  MILES" , ADDINFO+138, ADDINFO+139, ADDINFO+141*
DGBTSP("VENDOR" VENDOR+8, VENDOR+9, VENDOR+11*
DGBTSP("ZIP C ODE/DEPARTURE" , ADDINFO+46*
>> DGBTTOUT EN+23*, RESTART+11*, ACTFILE+10*
>> DIE EN+39*
DIR EN+16!, EN+21!, RESTART+24!, SPRMKS+7!, PREAUTH+12!, PREAUTH+22!, VENDOR+10!, ADDINFO+12!, ADDINFO+21!, ADDINFO+29!
, ADDINFO+37!, ADDINFO+45!, ADDINFO+58!, ADDINFO+67!, ADDINFO+75!, ADDINFO+83!, ADDINFO+91!, ADDINFO+99!, ADDINFO+111!, ADDINFO+120!
, ADDINFO+130!, ADDINFO+140!, ADDINFO+155!, ACTFILE+1!
DIR("?" RESTART+20*, SPRMKS+4*, PREAUTH+10*, PREAUTH+19*, VENDOR+6*, ADDINFO+8*, ADDINFO+16*, ADDINFO+25*, ADDINFO+33*, ADDINFO+41*
, ADDINFO+54*, ADDINFO+62*, ADDINFO+71*, ADDINFO+79*, ADDINFO+87*, ADDINFO+95*, ADDINFO+107*, ADDINFO+117*, ADDINFO+126*, ADDINFO+136*
, ADDINFO+152*
DIR("A" EN+18*, EN+19*, RESTART+20*, SPRMKS+3*, PREAUTH+8*, PREAUTH+18*, VENDOR+5*, ADDINFO+7*, ADDINFO+15*, ADDINFO+24*
, ADDINFO+32*, ADDINFO+40*, ADDINFO+53*, ADDINFO+61*, ADDINFO+70*, ADDINFO+78*, ADDINFO+86*, ADDINFO+94*, ADDINFO+106*, ADDINFO+116*
, ADDINFO+125*, ADDINFO+135*, ADDINFO+151*
DIR("B" EN+20*, RESTART+23*, SPRMKS+6*, PREAUTH+11*, PREAUTH+21*, VENDOR+9*, ADDINFO+11*, ADDINFO+19*, ADDINFO+20!, ADDINFO+28*
, ADDINFO+36*, ADDINFO+44*, ADDINFO+57*, ADDINFO+65*, ADDINFO+66!, ADDINFO+74*, ADDINFO+82*, ADDINFO+90*, ADDINFO+98*, ADDINFO+110*
, ADDINFO+119*, ADDINFO+129*, ADDINFO+139*, ADDINFO+154*
DIR(0 EN+17*, RESTART+21*, SPRMKS+5*, PREAUTH+9*, PREAUTH+10*, PREAUTH+19*, PREAUTH+20*, VENDOR+7*, ADDINFO+9*, ADDINFO+17*
, ADDINFO+26*, ADDINFO+34*, ADDINFO+42*, ADDINFO+55*, ADDINFO+63*, ADDINFO+72*, ADDINFO+80*, ADDINFO+88*, ADDINFO+96*, ADDINFO+108*
, ADDINFO+118*, ADDINFO+127*, ADDINFO+137*, ADDINFO+153*, ACTFILE+8*
>> DISTCITY ADDINFO+81*, ADDINFO+82
>> DISTL1 ADDINFO+56*, ADDINFO+57, ADDINFO+73*, ADDINFO+74
>> DISTL2 ADDINFO+64*, ADDINFO+65
>> DISTST ADDINFO+89*, ADDINFO+90
>> DISTZIP ADDINFO+97*, ADDINFO+98
>> DR EN+39*
DT RESTART+7
>> DTOUT EN+23, RESTART+24, RESTART+27, RESTART+28, RESTART+29, SPRMKS+7, PREAUTH+12, PREAUTH+16, PREAUTH+22, VENDOR+10
, ADDINFO+12, ADDINFO+21, ADDINFO+29, ADDINFO+37, ADDINFO+45, ADDINFO+58, ADDINFO+67, ADDINFO+75, ADDINFO+83, ADDINFO+91
, ADDINFO+99, ADDINFO+111, ADDINFO+120, ADDINFO+130, ADDINFO+140, ADDINFO+155
>> DUOUT EN+23*, RESTART+12*, RESTART+24, RESTART+27, RESTART+28, RESTART+29, SPRMKS+7, PREAUTH+12, PREAUTH+16, PREAUTH+22
, VENDOR+10, ADDINFO+12, ADDINFO+21, ADDINFO+29, ADDINFO+37, ADDINFO+45, ADDINFO+58, ADDINFO+67, ADDINFO+75, ADDINFO+83
, ADDINFO+91, ADDINFO+99, ADDINFO+111, ADDINFO+120, ADDINFO+130, ADDINFO+140, ADDINFO+155
DUZ EN+31
ERRMSG EN+5~, EN+37
ERROR INST+2~
EXTRACREW EN+5~
FAC INST+2~
FIELDS INST+2~
I ADDINFO+3~, ADDINFO+143*, CLEANUP+3*
INVDT EN+4~, ADDINFO+115*, ADDINFO+119
INVOICE EN+4~, ADDINFO+105*, ADDINFO+109*, ADDINFO+110
MILEAGEFEE EN+5~
MODEOFTRANS EN+4~, RESTART+19*, RESTART+22*, RESTART+23
>> MYHELP("DIHELP" ACTFILE+4*, ACTFILE+5*
NOSHOW EN+5~
OTHERTRANRMKS EN+4~
OTHERTRANSRMKS EN+5~, SPRMKS+2*, SPRMKS+6
>> OWRTP ADDINFO+124*, ADDINFO+128*, ADDINFO+129
OWTRP EN+4~
PREAUTH EN+4~, PREAUTH+7*, PREAUTH+11
REMARKS EN+5~, ADDINFO+150*, ADDINFO+154
SPACCT RESTART+1~, RESTART+2*
SPACTIEN RESTART+1~, RESTART+3*, RESTART+6*, RESTART+7, RESTART+14
>> SPCOMPLETE EN+6*, EN+22*, EN+23*, EN+37*, EN+40*, RESTART+11*, RESTART+12*, RESTART+18*, RESTART+24*, RESTART+27
, SPRMKS+7*, PREAUTH+12*, PREAUTH+16, PREAUTH+22*, PREAUTH+28, PREAUTH+30*, PREAUTH+32*, VENDOR+10*, ADDINFO+12*, ADDINFO+21*
, ADDINFO+29*, ADDINFO+37*, ADDINFO+45*, ADDINFO+58*, ADDINFO+67*, ADDINFO+75*, ADDINFO+83*, ADDINFO+91*, ADDINFO+99*, ADDINFO+111*
, ADDINFO+120*, ADDINFO+130*, ADDINFO+140*, ADDINFO+155*
SPEQUIP EN+5~
TEMP INST+2~
TOTALMILES EN+4~, ADDINFO+134*, ADDINFO+138*, ADDINFO+139
TOTINVOICE EN+4~
TRNSMDE EN+4~, RESTART+24*, RESTART+26
U ADDINFO+44
>> VAEL(1 EN+29
>> VAEL(3 EN+30
VENDOR EN+4~, VENDOR+4*, VENDOR+8*, VENDOR+9
WAITTIME EN+5~
>> Y EN+23, EN+24*, EN+25, SPRMKS+8, PREAUTH+13, PREAUTH+16, PREAUTH+22, PREAUTH+23, VENDOR+11, ADDINFO+13
, ADDINFO+22, ADDINFO+30, ADDINFO+38, ADDINFO+46, ADDINFO+59, ADDINFO+68, ADDINFO+76, ADDINFO+84, ADDINFO+92, ADDINFO+100
, ADDINFO+112, ADDINFO+131, ADDINFO+141, ADDINFO+156
>> Y(0 EN+24*, RESTART+24, RESTART+25, PREAUTH+14, PREAUTH+24, PREAUTH+25, ADDINFO+121
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 |  Local Variables  | All