DGBTSP1 ;ALB/BLD-BENEFICIARY TRAVEL SPECIAL MODE OF TRANSPORTATION; 12/18/2011@1000; 12/23/2012
Source file <DGBTSP1.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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ACCT | ; allowed to select only valid active accounts
|
|
| DGBTDC(DGBTDT,DFN) | ;this will process denies the claim and issue a denial letter
|
|
| DELSP(DGBTDT) | ;this will delete the special mode data when editing a claim and the claim changes from a Special Mode to a Mileage Claim
|
|
| FILE(DGBTDT) | ;this will file the special mode into file 392 (Beneficiary Travel Claim File).
|
|
| INVAMT | ;this will ask the dollar amount of any extra fees
|
|
| DENREA(DGBTCMTY) | ;denial reasons
|
| Name | Field # of Occurrence |
|---|---|
| DGBTDR^DGBTDLT | DGBTDC+3 |
| EXIT2^DGBTE | FILE+65 |
| $$DEFLT1^DGBTEE1 | ACCT+2 |
| CLEANUP^DGBTSP | FILE+6 |
| $$PAUSE^DGBTUTL | FILE+54 |
| ^DIC | ACCT+4, DENREA+5 |
| FILE^DIE | DELSP+24, FILE+50, FILE+53 |
| $$GET1^DIQ | DELSP+6, FILE+33, INVAMT+4, INVAMT+15, INVAMT+26, INVAMT+37, INVAMT+48, INVAMT+59, INVAMT+70 |
| ^DIR | FILE+61, INVAMT+10, INVAMT+21, INVAMT+32, INVAMT+43, INVAMT+54, INVAMT+65, INVAMT+75 |
| $$FMTE^XLFDT | FILE+34 |
| 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 |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| ^DGBT(392 - [#392] | GET1^DIQ |
| ^DGBT(392.3 - [#392.3] | Classic Fileman Calls, GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGBT(392 - [#392] | DELSP+7!, FILE+64!, INVAMT+10, INVAMT+21, INVAMT+32, INVAMT+43, INVAMT+54, INVAMT+65, INVAMT+75 |
| ^DGBT(392.3 - [#392.3] | ACCT+1, ACCT+2, DELSP+4, DELSP+5 |
| ^TMP("DGBTE" | FILE+60* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACCT | DELSP+2~, DELSP+3*, DELSP+4*, DELSP+5, DELSP+6 |
| ACTNBR | DELSP+2~, DELSP+3*, DELSP+4, DELSP+5*, DELSP+6*, DELSP+14 |
| >> BASERATE | INVAMT+4*, INVAMT+8*, INVAMT+9 |
| >> CHZFLG | FILE+66* |
| DFN | DGBTDC~ |
| >> DGBTA | FILE+5 |
| >> DGBTACCT | ACCT+6*, DENREA+6* |
| >> DGBTACTN | ACCT+6*, DENREA+6* |
| >> DGBTAPPTYP | DGBTDC+3 |
| DGBTCMTY | DELSP+23, DENREA~ |
| >> DGBTDI | FILE+34 |
| >> DGBTDIVI | FILE+10 |
| DGBTDL | DELSP+2~ |
| DGBTDL("ACCT | NBR" , DELSP+14*, DELSP+22 |
| DGBTDL("CLAIM | DENIED" , DELSP+11*, DELSP+19, TYPE" , DELSP+15* |
| DGBTDL("DENIE | D REASON" , DELSP+13*, DELSP+21 |
| DGBTDL("DT DE | NIED" , DELSP+12*, DELSP+20 |
| DGBTDL("ISSUE | D DATE" , DELSP+10*, DELSP+18 |
| DGBTDL("ISSUED" | DELSP+9*, DELSP+17 |
| DGBTDT | DGBTDC~, DELSP~, DELSP+7, FILE~, FILE+63*, INVAMT+4, INVAMT+15, INVAMT+26, INVAMT+37, INVAMT+48 , INVAMT+59, INVAMT+70 |
| DGBTDTI | DELSP+17, DELSP+18, DELSP+19, DELSP+20, DELSP+21, DELSP+22, DELSP+23, FILE+2~, FILE+5*, FILE+7 , FILE+8, FILE+9, FILE+10, FILE+12, FILE+13, FILE+14, FILE+15, FILE+16, FILE+17, FILE+18 , FILE+19, FILE+20, FILE+21, FILE+22, FILE+23, FILE+24, FILE+25, FILE+26, FILE+27, FILE+29 , FILE+30, FILE+31, FILE+33, FILE+36, FILE+37, FILE+38, FILE+39, FILE+40, FILE+42, FILE+43 , FILE+44, FILE+45, FILE+46, FILE+47, FILE+48, FILE+52, FILE+53, FILE+60, FILE+63, FILE+64 , INVAMT+10, INVAMT+21, INVAMT+32, INVAMT+43, INVAMT+54, INVAMT+65, INVAMT+75 |
| DGBTERR | FILE+56~, FILE+57*, FILE+58, FILE+59 |
| DGBTERR2 | FILE+56~, FILE+58*, FILE+59 |
| DGBTFDA | DELSP+24!, FILE+2~ |
| DGBTFDA(392 | DELSP+17*, DELSP+18*, DELSP+19*, DELSP+20*, DELSP+21*, DELSP+22*, DELSP+23*, FILE+7*, FILE+8*, FILE+9* , FILE+10*, FILE+12*, FILE+13*, FILE+14*, FILE+15*, FILE+16*, FILE+17*, FILE+18*, FILE+19*, FILE+20* , FILE+21*, FILE+22*, FILE+23*, FILE+24*, FILE+25*, FILE+26*, FILE+27*, FILE+29*, FILE+30*, FILE+31* , FILE+33*, FILE+34*, FILE+36*, FILE+37*, FILE+38*, FILE+39*, FILE+40*, FILE+42*, FILE+43*, FILE+44* , FILE+45*, FILE+46*, FILE+47*, FILE+48* |
| >> DGBTFDA1(392 | FILE+52*, FILE+53* |
| >> DGBTINST("ADDRESS1" | FILE+44 |
| >> DGBTINST("CITY" | FILE+45 |
| >> DGBTINST("DIVISION" | FILE+42 |
| >> DGBTINST("INS | T NAME" , FILE+43 |
| >> DGBTINST("STATE" | FILE+46 |
| >> DGBTINST("ZIP | CODE" , FILE+47 |
| >> DGBTINTO | INVAMT+2*, INVAMT+12*, INVAMT+23*, INVAMT+34*, INVAMT+45*, INVAMT+56*, INVAMT+67* |
| >> DGBTML | ACCT+8* |
| >> DGBTMLT | ACCT+8* |
| >> DGBTMR | ACCT+8 |
| >> DGBTOACT | ACCT+1* |
| >> DGBTOLD | FILE+63* |
| >> DGBTOWRT | ACCT+8* |
| DGBTSP | FILE+54*, FILE+65*, FILE+66*, INVAMT+10*, INVAMT+21!*, INVAMT+32!*, INVAMT+43!*, INVAMT+54!*, INVAMT+65!*, INVAMT+75* |
| DGBTSP("ACCOUNT" | FILE+9 |
| DGBTSP("AUTHORIZED" | FILE+31, FILE+32 |
| DGBTSP("BASE | RATE FEE" , FILE+18, INVAMT+8, INVAMT+9, INVAMT+11* |
| DGBTSP("CITY | OF DEPARTURE" , FILE+38 |
| DGBTSP("CLAIM | TYPE" , FILE+13 |
| DGBTSP("DT IN | VOICE REC" , FILE+16 |
| DGBTSP("EXTRA | CREW" , FILE+22, INVAMT+52, INVAMT+53, INVAMT+55* |
| DGBTSP("INVOI | CE NUMBER" , FILE+15 |
| DGBTSP("MILEA | GE FEE" , FILE+19, INVAMT+19, INVAMT+20, INVAMT+22* |
| DGBTSP("MODE | OF TRANS" , FILE+14 |
| DGBTSP("NO SH | OW" , FILE+20, INVAMT+30, INVAMT+31, INVAMT+33* |
| DGBTSP("OTHER | TRANS REMARKS" , FILE+26 |
| DGBTSP("PLACE | OF DEPARTURE " , FILE+30, OF DEPARTURE 2" , FILE+37, OF DEPARTURE" , FILE+36 |
| DGBTSP("PRE-AUTHORIZED" | FILE+27 |
| DGBTSP("RT/ON | E WAY" , FILE+24 |
| DGBTSP("SP EQ | UIP" , FILE+23, INVAMT+63, INVAMT+64, INVAMT+66* |
| DGBTSP("SP MO | DE OTHER REMARKS" , FILE+29 |
| DGBTSP("STATE | OF DEPARTURE" , FILE+39 |
| DGBTSP("TOTAL | INVOICE" , FILE+17, INVAMT+74, INVAMT+76*, MILES" , FILE+25 |
| DGBTSP("VENDOR" | FILE+52 |
| DGBTSP("WAIT | TIME" , FILE+21, INVAMT+41, INVAMT+42, INVAMT+44* |
| DGBTSP("ZIP C | ODE/DEPARTURE" , FILE+40 |
| >> DGBTTOUT | ACCT+4*, FILE+63*, DENREA+5* |
| >> DGBTVAR("M" | ACCT+8 |
| >> DGBTVAR(0 | ACCT+1, ACCT+2 |
| DIC | ACCT+3*, ACCT+4!, DENREA+4*, DENREA+5! |
| DIC("A" | ACCT+2*, DENREA+3* |
| DIC("B" | ACCT+2*, DENREA+3* |
| DIC("S" | ACCT+3* |
| DIC(0 | ACCT+3*, DENREA+4* |
| DIR | FILE+61~, INVAMT+10!, INVAMT+21!, INVAMT+32!, INVAMT+43!, INVAMT+54!, INVAMT+65!, INVAMT+75! |
| DIR("?" | INVAMT+6*, INVAMT+17*, INVAMT+28*, INVAMT+39*, INVAMT+50*, INVAMT+61*, INVAMT+72* |
| DIR("A" | FILE+61*, INVAMT+5*, INVAMT+16*, INVAMT+27*, INVAMT+38*, INVAMT+49*, INVAMT+60*, INVAMT+71* |
| DIR("B" | INVAMT+9*, INVAMT+20*, INVAMT+31*, INVAMT+42*, INVAMT+53*, INVAMT+64*, INVAMT+74* |
| DIR(0 | FILE+61*, INVAMT+7*, INVAMT+18*, INVAMT+29*, INVAMT+40*, INVAMT+51*, INVAMT+62*, INVAMT+73* |
| DT | FILE+12, FILE+34 |
| DTOUT | ACCT+4!, INVAMT+10, INVAMT+21, INVAMT+32, INVAMT+43, INVAMT+54, INVAMT+65, INVAMT+75, DENREA+5! |
| >> DUOUT | INVAMT+10, INVAMT+21, INVAMT+32, INVAMT+43, INVAMT+54, INVAMT+65, INVAMT+75 |
| DUZ | FILE+33, FILE+53 |
| >> ERRMSG | FILE+51, FILE+55, FILE+60 |
| >> ERRMSG("DIERR" | FILE+57, FILE+58, FILE+59 |
| >> EXTRACREW | INVAMT+48*, INVAMT+52*, INVAMT+53 |
| >> MILEAGEFEE | INVAMT+15*, INVAMT+19*, INVAMT+20 |
| >> NOSHOW | INVAMT+26*, INVAMT+30*, INVAMT+31 |
| NULL | DELSP+2~, DELSP+3* |
| >> PROMPT | FILE+61* |
| >> SPCOMPLETE | FILE+54*, INVAMT+10*, INVAMT+21*, INVAMT+32*, INVAMT+43*, INVAMT+54*, INVAMT+65*, INVAMT+75* |
| >> SPEQUIP | INVAMT+59*, INVAMT+63*, INVAMT+64 |
| >> TOTINVOICE | INVAMT+70*, INVAMT+74 |
| >> VADM(1 | FILE+48 |
| >> VAEL(1 | FILE+7 |
| >> VAEL(3 | FILE+8 |
| >> WAITTIME | INVAMT+37*, INVAMT+41*, INVAMT+42 |
| X | ACCT+2!*, DENREA+3!* |
| >> Y | ACCT+5, ACCT+6, INVAMT+10, INVAMT+11, INVAMT+12, INVAMT+22, INVAMT+23, INVAMT+33, INVAMT+34, INVAMT+44 , INVAMT+45, INVAMT+55, INVAMT+56, INVAMT+66, INVAMT+67, INVAMT+75, INVAMT+76, DENREA+6 |
| >> Y(0 | ACCT+6, DENREA+6 |