AVAP3 ;IHS/ORDC/LJF - MOVE LICENSURE BACK TO FILE 6 [ 10/27/93 9:47 AM ]
Source file <AVAP3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MOVE1 | ||
| MOVE | ;**> SUBRTN to move licensure data to file 6 then delete in file 200
|
|
| END | ;***> eoj
|
|
| LOOP | ; loop thru provider file
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(16 - [#16] | LOOP+8, LOOP+10 |
| ^DIC(6 - [#6] | LOOP+1, LOOP+4, LOOP+5, LOOP+6, MOVE+2, MOVE+3*, MOVE+6* |
| ^VA(200 - [#200] | LOOP+13, MOVE+1, MOVE+3, MOVE+5, MOVE+6, MOVE1! |
| Name | Line Occurrences |
|---|---|
| MOVE | LOOP+14 |
| MOVE1 | MOVE+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| LJF200 | LOOP+10*, LOOP+11, LOOP+13, END+1!, MOVE+1, MOVE+3, MOVE+5, MOVE+6, MOVE1 |
| LJF6 | LOOP+3*, LOOP+4*, LOOP+5, LOOP+6, LOOP+7, LOOP+8, LOOP+9, LOOP+10, LOOP+12, END+1! , MOVE+2, MOVE+3, MOVE+6 |
| U | LOOP+6, LOOP+10, MOVE+3 |
| X | END+2!, MOVE+4*, MOVE+5*, MOVE+6 |
| Y | END+2! |