IBDFN1 ;ALB/CJM - ENCOUNTER FORM - INTERFACE ROUTINES ;NOV 16,1992
Source file <IBDFN1.m>
| Package | Total | Call Graph | 
|---|---|---|
| Registration | 2 | SDA^VADPT $$SITE^VASITE | 
| Automated Information Collection System | 1 | $$DIVISION^IBDF1B5 | 
| VA Fileman | 1 | $$GET1^DIQ | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DIVISION | ;returns the name of the division of IBCLINIC in ien^name format | |
| GETAPPTS(TO,CLINIC) | ; | |
| CLINIC | ;returns clinic name | |
| SAMEDAY | ;get all future, same day appts | |
| INST | ;returns the name of the institution of IBCLINIC | |
| CLNCFUTR | ;get all future appts for the same clinic | |
| ALLFUTR | ;get all future appts | 
| FileNo | Call Tags | 
|---|---|
| ^DIC(4 - [#4] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^SC - [#44] | CLINIC+1, INST+3 | 
| ^UTILITY("VASD" | GETAPPTS+8, GETAPPTS+9, GETAPPTS+13! | 
| Name | Line Occurrences | 
|---|---|
| GETAPPTS | SAMEDAY+3, ALLFUTR+1, CLNCFUTR+2 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| CLINIC | GETAPPTS~, GETAPPTS+6 | 
| CNT | GETAPPTS+2~, GETAPPTS+8*, GETAPPTS+10*, GETAPPTS+12 | 
| >> DFN | GETAPPTS+1 | 
| >> IBAPPT | SAMEDAY+2, GETAPPTS+1, GETAPPTS+4 | 
| >> IBARY | CLINIC+1, DIVISION+2, INST+6, GETAPPTS+12 | 
| >> IBCLINIC | CLINIC+1, DIVISION+1, DIVISION+2, INST+1, INST+3, INST+4, CLNCFUTR+1, CLNCFUTR+2 | 
| INST | INST+2~, INST+3*, INST+4*, INST+5*, INST+6 | 
| NODE | GETAPPTS+2~, GETAPPTS+9*, GETAPPTS+11, GETAPPTS+12 | 
| SUB | GETAPPTS+2~, GETAPPTS+8*, GETAPPTS+9 | 
| TIME | GETAPPTS+2~, GETAPPTS+11*, GETAPPTS+12 | 
| TO | SAMEDAY+1~, SAMEDAY+2*, SAMEDAY+3, GETAPPTS~, GETAPPTS+5 | 
| VADPT | GETAPPTS+3!, GETAPPTS+13! | 
| VAERR | GETAPPTS+8, GETAPPTS+13! | 
| VASD | GETAPPTS+3!, GETAPPTS+13! | 
| VASD("C" | GETAPPTS+6* | 
| VASD("F" | GETAPPTS+4* | 
| VASD("T" | GETAPPTS+5* |