BMENLOD1 ; IHS/PHXAO/TMJ - LOAD THE MEDICAID TAPE ; [ 06/11/03 3:37 PM ]
Source file <AZANLOD1.m>
| Package | Total | Call Graph |
|---|---|---|
| Local Area Programs | 3 | ^AZAGMED ^AZAMED ^AZAMWRN |
| VA Fileman | 2 | NOW^%DTC ^DIR |
| Kernel | 1 | ^%ZTLOAD |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| TASK | ;
|
|
| END | ; -- write the final message
|
|
| CTRM | ; -- check the terminal to make sure it's not a LAT device
|
|
| S | ||
| ASKA | ; -- ask if they are sure
|
|
| ASKB | ; -- ask about current medicaid file
|
|
| CTM | ; -- check to make sure this is after hours (after 4:00pm)
|
|
| MAIN | ; -- this is the main program loop
|
|
| LOOP | ; -- this is the actual process
|
| 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 |
|
| Routine Call |
|
| Name | Line Occurrences |
|---|---|
| ASKA | MAIN+6 |
| ASKB | MAIN+5 |
| CTRM | MAIN+2 |
| END | MAIN+7 |
| LOOP | MAIN+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | CTM+2~ |
| DIR | ASKA+3~, ASKA+4!, ASKB+2~, ASKB+4! |
| DIR("A" | ASKA+3*, ASKB+3* |
| DIR("B" | ASKA+4*, ASKB+2* |
| DIR(0 | ASKA+3*, ASKB+2* |
| >> DIRUT | MAIN+5, MAIN+6, ASKA+4, ASKB+4 |
| GET | MAIN+1!, ASKB+6*, ASKB+9 |
| IO("Q" | LOOP+3! |
| >> NW | CTM+2* |
| S | MAIN+1!, MAIN+2, CTRM+1*, S+4* |
| T | MAIN+1!, MAIN+6, ASKA+4* |
| T1 | MAIN+1!, MAIN+5, ASKB+4*, ASKB+5 |
| TM | MAIN+1!, CTM+1*, CTM+5* |
| X | ASKA+3~, ASKB+2~, ASKB+9* |
| Y | ASKA+3~, ASKA+4, ASKB+2~, ASKB+4 |
| >> ZTDESC | LOOP+4* |
| >> ZTIO | LOOP+4* |
| >> ZTRTN | LOOP+4* |
| ZTSK | LOOP+5! |