©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
DGBTUTL ;ALB/SCK - BENEFICIARY/TRAVEL UTILITY ROUTINES; 1/6/93@1130
Source file <DGBTUTL.m>
| Package | Total | Caller Graph |
|---|---|---|
| Beneficiary Travel | 3 | DGBTCE DGBTEE DGBTEE2 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DICLKUP(DGBTRN,DGBTDX,DGBTP) | ;
|
|
| START | ;
|
|
| EXIT | ;
|
|
| TEST | ;
|
|
| DEPCTY(ZIPCDE) | ;
|
|
| MILES(DGBTRN,DGBTDX) | ;
; DGBTRN holds the record no., and DGBTDX holds the division pointer passed in during the function call |
| Name | Field # of Occurrence |
|---|---|
| ^DIC | DICLKUP+3, DEPCTY+2 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DGBT(392.1 - [#392.1] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGBT(392.1 - [#392.1] | MILES+4, MILES+5, MILES+6 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | MILES+5, DICLKUP+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DGBTCHK | MILES+2~, MILES+5* |
| >> DGBTDEF | MILES+3*, MILES+6* |
| DGBTDX | MILES~, MILES+5, MILES+7!, DICLKUP~, DICLKUP+2 |
| DGBTML | MILES+2~, MILES+3*, MILES+4, MILES+5*, MILES+6*, MILES+8 |
| DGBTP | DICLKUP~, DICLKUP+5, DICLKUP+6 |
| DGBTRN | MILES~, MILES+4, MILES+5, MILES+6, MILES+7!, DICLKUP~ |
| DIC | DICLKUP+2*, DEPCTY+2*! |
| DIC(0 | DICLKUP+2*, DEPCTY+2* |
| >> DTOUT | TEST+2* |
| RETURN | DICLKUP+1~, DICLKUP+2*, DICLKUP+5*, DICLKUP+6*, DICLKUP+7, DEPCTY+1~, DEPCTY+2*, DEPCTY+4 |
| U | MILES+5, MILES+6, DICLKUP+5, DICLKUP+6 |
| >> X | DICLKUP+2*, DEPCTY+2*, TEST+2* |
| XX | MILES+2~, MILES+3*, MILES+4*, MILES+5, DICLKUP+1~ |
| >> Y | DICLKUP+4, DEPCTY+2 |
| >> Y(0 | DICLKUP+5, DICLKUP+6 |
| ZIPCDE | DEPCTY~, DEPCTY+2, DEPCTY+3! |