DGBTSP ;ALB/BLD - BENEFICIARY TRAVEL SPECIAL MODE OF TRANSPORTATION ; 12/18/2011@1000 ; 12/23/2012
Source file <DGBTSP.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Beneficiary Travel | 3 | DGBTE DGBTSP DGBTSP1 |
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 | ;
|
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 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine 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 |
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 |
Name | Line Occurrences |
---|---|
ADDINFO | RESTART+29 |
INST | ADDINFO+4 |
PREAUTH | RESTART+27 |
SPRMKS | RESTART+26 |
VENDOR | RESTART+28 |
>> | 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 |