©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
ACRFSAMT ;IHS/OIRM/DSD/AEF - SEARCH FOR PAYMENT BY AMOUNT [ 11/01/2001 9:44 AM ]
Source file <ACRFSAMT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;----- MAIN ENTRY POINT
|
|
| DISP(D0,D1,D2) | ||
| AMT(AMT) | ;----- PROMPT FOR DOLLAR AMOUNT
|
|
| EXP(X,AMT) | ||
| DATES(BEG,END) | ||
| SEARCH(AMT,BEG,END) | ||
| D | ;
|
| Name | Field # of Occurrence |
|---|---|
| ^DIR | AMT+6, D+5, D+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 |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AFSLAFP - [#9002325] | EXP+8, EXP+9, DISP+3, DISP+4, DISP+5, DISP+7, DISP+9 |
| ^AFSLAFP("EXP" | EXP+4, EXP+6 |
| Name | Line Occurrences |
|---|---|
| AMT | EN+3 |
| D | D+12 |
| DATES | EN+5 |
| DISP | EXP+10 |
| EXP | SEARCH+5 |
| SEARCH | EN+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AMT | EN+2~, EN+3, EN+4, EN+8, AMT~, AMT+3*, AMT+9*, AMT+10*, SEARCH~, SEARCH+5 , EXP~, EXP+10, DISP+9*, DISP+10*, DISP+13 |
| >> BATCH | DISP+3*, DISP+14 |
| BEG | EN+2~, EN+5, EN+6, EN+8, DATES~, D+2!, D+7*, D+12, SEARCH~, SEARCH+3* , SEARCH+5 |
| >> CERT | DISP+5*, DISP+6*, DISP+16 |
| D0 | EXP+3*, EXP+4*, EXP+6, EXP+8, EXP+9, EXP+10, DISP~, DISP+3, DISP+4, DISP+5 , DISP+7, DISP+9 |
| D1 | EXP+5*, EXP+6*, EXP+8, EXP+9, EXP+10, DISP~, DISP+3, DISP+4, DISP+5, DISP+7 , DISP+9 |
| D2 | EXP+7*, EXP+8*, EXP+9, EXP+10, DISP~, DISP+9 |
| DIR | AMT+2~, D+1~ |
| DIR("A" | AMT+5*, D+4*, D+8* |
| DIR(0 | AMT+4*, D+3* |
| DIRUT | AMT+2~, AMT+8, D+1~, D+6, D+10 |
| >> DOL | EXP+9*, EXP+10 |
| DTOUT | AMT+2~, AMT+8, D+1~, D+6, D+10 |
| DUOUT | AMT+2~, AMT+8, D+1~, D+6, D+10 |
| END | EN+2~, EN+5, EN+7, EN+8, DATES~, D+2!, D+11*, D+12, SEARCH~, SEARCH+4* , SEARCH+5 |
| >> EXP | DISP+7*, DISP+8*, DISP+12, DISP+17 |
| >> SCHNO | DISP+4*, DISP+15 |
| U | EXP+9, DISP+3, DISP+4, DISP+5, DISP+7, DISP+9 |
| X | AMT+2~, D+1~, SEARCH+5*, EXP~, EXP+4, EXP+6 |
| Y | AMT+2~, AMT+7, AMT+9, D+1~, D+7, D+11 |