ABSPOSMC ; IHS/FCS/DRS - General Inquiry/Report .57; [ 09/12/2002 10:14 AM ]
Source file <ABSPOSMC.m>
| Package | Total | Call Graph | 
|---|---|---|
| Pharmacy Point of Sale | 4 | ($$DRGNAME,$$PATIENT,$$RXI,$$RXR)^ABSPOS57 ACTION^ABSPOSMD $$OUTPUT^ABSPOSMZ $$LIST^ABSPOSU4 | 
| VA Fileman | 2 | EN1^DIP $$GET1^DIQ | 
| Package | Total | Caller Graph | 
|---|---|---|
| Pharmacy Point of Sale | 2 | ABSPOSMB ABSPOSMD | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| A | ; | |
| INIANS | ||
| ANSCOUNT() | ||
| DHIT | ;EP - called here indirectly when in Inquiry mode and a hit is found | |
| OPEN(X) | ;EP - | |
| SELECT1() | ; | |
| FR | ; FR and TO range of sort ; order must correspond with order of BY fields | |
| DHD | ; Header | |
| DIPSETUP | ; This routine sets up the call to EN1^DIP | |
| FLDS | ; Which fields to print?  If inquiry mode:  print no fields | |
| FR1 | ; | |
| CONTINUE | ;EP - continued (via GOTO) from ABSPOSMB | |
| ANSLIST() | ; EP | |
| IEN57 | ; build IEN57 list based on ANSLIST | |
| ACTION | ||
| IENLIST() | ; EP | |
| DIS | ; screens | |
| BY | ; Which fields to sort on? | |
| INILIST | ||
| SELECT | ||
| LIST() | ;EP | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^ABSPTL - [#9002313.57] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ABSPF(9002313.83 - [#9002313.83] | DHIT+28, DHIT+29 | 
| ^ABSPTL - [#9002313.57] | DHIT+15 | 
| ^DPT - [#2] | DHIT+35 | 
| Name | Line Occurrences | 
|---|---|
| $$ANSLIST | SELECT+2, SELECT1+4, ANSCOUNT, IEN57+1, INIANS | 
| $$IENLIST | IEN57+1 | 
| $$LIST | A+8, A+10, SELECT1+3, IEN57+1, INILIST, INILIST+1, INILIST+2, DHIT+3*, DHIT+39, DHIT+40 | 
| $$OPEN | SELECT1+3, SELECT1+4 | 
| $$SELECT1 | SELECT | 
| ACTION | ACTION+3 | 
| BY | DIPSETUP+4 | 
| DHD | DIPSETUP+6 | 
| DIPSETUP | A+1 | 
| DIS | DIPSETUP+19 | 
| FLDS | DIPSETUP+3 | 
| FR | DIPSETUP+5 | 
| FR1 | FR+3, FR+5 | 
| IEN57 | SELECT+4 | 
| INIANS | A+2, SELECT1+10 | 
| INILIST | A+2 | 
| SELECT | ACTION+1 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| A | IEN57+1~*, IEN57+3 | 
| >> ABSPOSMA("BY | WHICH DATE" , BY+4 | 
| >> ABSPOSMA("MODE" | A+2, A+4, A+6, DIPSETUP+10, DIPSETUP+17, FLDS+1, DHD+1 | 
| >> ABSPOSMA("SCREEN" | DIS+2 | 
| >> ABSPOSMA("SORT" | BY+1, BY+6, FR+5, FR1+1, FR1+2, FR1+3 | 
| ACTION | CONTINUE+3~, ACTION*, ACTION+1 | 
| ANSCOUNT | CONTINUE+3~, SELECT+2*, SELECT+3, SELECT+5 | 
| AROOT | SELECT1+1~, SELECT1+4*, SELECT1+12 | 
| B | IEN57+1~*, IEN57+5 | 
| BY | CONTINUE+1~, BY+1!, BY+3*, BY+4*, BY+8*, BY+9* | 
| C | IEN57+1~*, IEN57+4 | 
| >> D0 | DHIT+2 | 
| DATA | DHIT+2~, DHIT+5*, DHIT+7*, DHIT+10*, DHIT+11*, DHIT+12*, DHIT+13*, DHIT+24*, DHIT+32*, DHIT+38* , DHIT+39 | 
| DCOPIES | CONTINUE+2~ | 
| DHD | CONTINUE+1~, DHD+1* | 
| DHIT | CONTINUE+1~, DIPSETUP+11*, DIPSETUP+12! | 
| DIASKHD | CONTINUE+1~, DIPSETUP+7! | 
| DIC | CONTINUE+1~, DIPSETUP+2* | 
| DIOBEG | CONTINUE+1~ | 
| DIOEND | CONTINUE+1~ | 
| DIPCRIT | CONTINUE+1~, DIPSETUP+8* | 
| DIS | CONTINUE+2~, DIS+1! | 
| DIS( | DIS+2* | 
| DISPAR | CONTINUE+2~ | 
| DISTOP | CONTINUE+2~, DIPSETUP+21* | 
| DISUPNO | CONTINUE+2~ | 
| DQTIME | CONTINUE+2~ | 
| DT | DHIT+17, DHIT+18, DHIT+19, DHIT+20 | 
| F | BY+5~*, BY+6*, BY+7, BY+8, FR+3~*, FR+4*, FR+5*, FR1+1, FR1+2, FR1+3 | 
| FLDS | CONTINUE+1~, FLDS+1*, FLDS+4* | 
| FR | CONTINUE+1~, FR+2*, FR+6*, FR1+2* | 
| I | DIS+2~* | 
| IEN57 | IEN57+2~, IEN57+4*, IEN57+5, DHIT+2~*, DHIT+15, DHIT+26, DHIT+40 | 
| IOP | CONTINUE+2~, DIPSETUP+17* | 
| L | CONTINUE+1~, DIPSETUP+1* | 
| LROOT | SELECT1+1~, SELECT1+3*, SELECT1+12 | 
| NLINE | DHIT+2~, DHIT+3*, DHIT+39, DHIT+40 | 
| OPT | SELECT1+1~, SELECT1+7*, SELECT1+12 | 
| PG | CONTINUE+1~, DIPSETUP+9! | 
| PGLEN | SELECT1+1~, SELECT1+8*, SELECT1+12 | 
| PROMPT | SELECT1+1~ | 
| SELECT | CONTINUE+3~, SELECT*, SELECT+1 | 
| STITLE | SELECT1+1~, SELECT1+5*, SELECT1+12 | 
| SY | DHIT+17~*, DHIT+21 | 
| TIMEOUT | SELECT1+1~, SELECT1+9*, SELECT1+12 | 
| TO | CONTINUE+1~, FR+2*, FR+6*, FR1+3* | 
| TYPE | SELECT1+1~, SELECT1+2*, SELECT1+12 | 
| U | DHIT+15, DHIT+29, DHIT+35 | 
| X | CONTINUE+3~, SELECT+2*, SELECT1+11~, SELECT1+12*, SELECT1+13, OPEN~, OPEN+1, IEN57+2~*, IEN57+3*, IEN57+4 , DHIT+2~, DHIT+8*, DHIT+9, DHIT+10, DHIT+11, DHIT+15*, DHIT+16, DHIT+17, DHIT+26*, DHIT+27 , DHIT+28, DHIT+30*, DHIT+31*, DHIT+32, DHIT+34*, DHIT+35*, DHIT+36*, DHIT+37*, DHIT+38 | 
| XD | DHIT+16~*, DHIT+18*, DHIT+19*, DHIT+20*, DHIT+21*, DHIT+22*, DHIT+23*, DHIT+24 | 
| XT | DHIT+16~*, DHIT+22, DHIT+23 | 
| Y | DHIT+28~*, DHIT+29*, DHIT+30 | 
| Name | Field # of Occurrence | 
|---|---|
| $T( | LIST+1, ANSLIST+1, IENLIST+1, DIPSETUP+11 |