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* |