BSDU2 ; IHS/ANMC/LJF - IHS UTILITY CALLS-APPT INFO ; [ 12/22/2003 8:37 AM ]
Source file <BSDU2.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 4 | C^%DTC %XY^%RCR EN^DDIOL $$GET1^DIQ |
IHS Changes To Scheduling | 2 | $$DIV^BSDU $$OI^BSDU2 |
Kernel | 2 | ($$FMTE,$$NOW)^XLFDT $$REPEAT^XLFSTR |
IHS Changes To ADT | 1 | ($$READ,MSG)^BDGF |
Name | Comments | DBIA/ICR reference |
---|---|---|
PEND(DFN,BSDTALK,BSDARRAY) | ;PEP - description follows:
; called by SDAM2 & AMER1 to display pending appts ; BSDTALK=1 means display results to current device ; BSDTALK=0 means be silent ; BSDARRAY if set, is array for returning data found ; array(2-9999)=date^clinic name^other info |
|
GETVST(PAT,DATE) | ;PEP; returns visit ien for appt date and patient
|
|
CO(PAT,CLINIC,DATE,SDIEN) | ;PEP; -- returns 1 if appt already checked-out
|
|
LASTNOS(PAT,CLINIC,DATE) | ; -- returns appt display line
|
|
SCIEN(PAT,CLINIC,DATE) | ;PEP; returns ien for appt in ^SC
|
|
WALKIN(PAT,DATE) | ;PEP; -- returns 1 if appt is walk-in
|
|
PAD(D,L) | ; -- SUBRTN to pad length of data
; -- D=data L=length |
|
APPTYP(PAT,DATE) | ;PEP; -- returns type of appt (scheduled or walk-in)
|
|
NOSHOWA | ;-- ask to print no show list PATCH 1010 RQMT 2
|
|
APPT(PAT,CLN,DATE,LEN) | ;EP; called by SDM1A to display appt made
|
|
SP(N) | ; -- SUBRTN to pad N number of spaces
|
|
CI(PAT,CLINIC,DATE,SDIEN) | ;PEP; -- returns 1 if appt already checked-in
|
|
NOSHOW(DFN,CLINIC) | ;EP; -- called to print # noshows for patient
; will count patient's no-shows in this clinic & principal clinic ; date range for search is based on division and clinic parameters |
|
OI(PAT,CLINIC,DATE) | ;PEP; returns other info comments for patient's appt
|
Name | Field # of Occurrence |
---|---|
C^%DTC | NOSHOW+13, NOSHOW+19 |
%XY^%RCR | PEND+36 |
$$READ^BDGF | NOSHOWA+2 |
MSG^BDGF | APPT+1, APPT+2, APPT+3, APPT+4 |
$$DIV^BSDU | NOSHOW+7 |
$$OI^BSDU2 | PEND+24 |
EN^DDIOL | PEND+33, NOSHOW+42 |
$$GET1^DIQ | PEND+23, APPT+2, APPT+3, NOSHOW+7, NOSHOW+9, NOSHOWA+5, NOSHOWA+12 |
$$FMTE^XLFDT | PEND+19, PEND+23, APPT+3, LASTNOS+2, NOSHOWA+12 |
$$NOW^XLFDT | PEND+9 |
$$REPEAT^XLFSTR | APPT+1, APPT+4, PAD+2 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^SC - [#44] | GET1^DIQ |
^BSDSC - [#9009017.2] | GET1^DIQ |
^BSDPAR - [#9009020.2] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | APPTYP+1, WALKIN+1, GETVST+3, PEND+10, PEND+11, NOSHOW+14, NOSHOW+15, NOSHOW+20, NOSHOW+21, NOSHOW+24 , NOSHOW+28, NOSHOWA+8, NOSHOWA+10 |
^SC - [#44] | SCIEN+2, SCIEN+3, SCIEN+4, OI+3, CI+4, CO+4, NOSHOW+5, LASTNOS+4, LASTNOS+5, LASTNOS+6 |
^SC("AIHSPC" | NOSHOW+28 |
^SCE - [#409.68] | GETVST+5 |
Name | Line Occurrences |
---|---|
$$LASTNOS | NOSHOW+25 |
$$PAD | PEND+24, NOSHOW+33, NOSHOW+36, NOSHOW+39, SP+1 |
$$SCIEN | OI+2, CI+3, CO+3 |
$$SP | APPT+1, APPT+2, APPT+3, APPT+4 |
NOSHOWA | NOSHOW+43 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%X | PEND+36~* |
%Y | PEND+36~* |
APPDT | NOSHOW+3~, NOSHOW+13*, NOSHOW+14*, NOSHOW+15, NOSHOW+19*, NOSHOW+20*, NOSHOW+21, NOSHOW+24, NOSHOW+25, NOSHOW+28 |
BSDARRAY | PEND~, PEND+35, PEND+36 |
BSDCNT | PEND+7~, PEND+9*, PEND+18*, PEND+19, PEND+22*, PEND+24, PEND+25, PEND+27, PEND+29 |
BSDDA | NOSHOWA+7~, NOSHOWA+8*, NOSHOWA+10, NOSHOWA+12 |
BSDDATA | NOSHOWA+9~, NOSHOWA+10*, NOSHOWA+11, NOSHOWA+12 |
BSDLN | PEND+7~, PEND+33 |
BSDLN( | PEND+19*, PEND+24*, PEND+25*, PEND+29* |
BSDLN(1 | PEND+28*, PEND+31* |
BSDNSD | NOSHOWA+1~, NOSHOWA+2*, NOSHOWA+3, NOSHOWA+4 |
BSDSP | PEND+7~, PEND+8*, PEND+19, PEND+23, PEND+24 |
BSDT | PEND+7~, PEND+9*, PEND+10*, PEND+11, PEND+23, PEND+24 |
BSDTALK | PEND~, PEND+8, PEND+33 |
CLINIC | SCIEN~, SCIEN+2, SCIEN+3, SCIEN+4, OI~, OI+2, OI+3, CI~, CI+3, CI+4 , CO~, CO+3, CO+4, NOSHOW~, NOSHOW+4, NOSHOW+5, NOSHOW+9, NOSHOW+24, NOSHOW+25, LASTNOS~ , LASTNOS+4, LASTNOS+5, LASTNOS+6 |
CLN | APPT~, APPT+3 |
D | PAD~, PAD+2 |
DATE | SCIEN~, SCIEN+2, SCIEN+3, SCIEN+4, OI~, OI+2, OI+3, APPTYP~, APPTYP+1, WALKIN~ , WALKIN+1, CI~, CI+3, CI+4, CO~, CO+3, CO+4, GETVST~, GETVST+2, GETVST+3 , APPT~, APPT+3, LASTNOS~, LASTNOS+2, LASTNOS+4, LASTNOS+5, LASTNOS+6 |
DFN | PEND~, PEND+10, PEND+11, PEND+24, NOSHOW~, NOSHOW+4, NOSHOW+14, NOSHOW+15, NOSHOW+20, NOSHOW+21 , NOSHOW+24, NOSHOW+25, NOSHOW+28, NOSHOWA+5, NOSHOWA+8, NOSHOWA+10 |
DT | NOSHOW+13, NOSHOW+19 |
I | PEND+7~, PEND+17*, PEND+19, PEND+29* |
IEN | SCIEN+1~, SCIEN+2, SCIEN+4*, SCIEN+5 |
L | PAD~, PAD+2 |
LASTNOS | NOSHOW+3~, NOSHOW+25*, NOSHOW+40 |
LEN | APPT~, APPT+2 |
LINE | NOSHOW+3~, NOSHOW+42 |
LINE( | NOSHOW+38*, NOSHOW+39*, NOSHOW+40*, NOSHOW+41* |
LINE(1 | NOSHOW+32*, NOSHOW+33* |
LINE(2 | NOSHOW+35*, NOSHOW+36* |
LMT | NOSHOW+3~, NOSHOW+7*, NOSHOW+8*, NOSHOW+10, NOSHOW+13, NOSHOW+32 |
LMT2 | NOSHOW+3~, NOSHOW+9*, NOSHOW+10*, NOSHOW+19, NOSHOW+35, NOSHOW+38 |
N | SP~, SP+1 |
NOCLN | NOSHOW+3~, NOSHOW+6*, NOSHOW+25*, NOSHOW+31, NOSHOW+39 |
NODE | PEND+7~, PEND+11*, PEND+13, PEND+14, PEND+17, PEND+23, PEND+24, PEND+25 |
PAT | SCIEN~, SCIEN+4, OI~, OI+2, APPTYP~, APPTYP+1, WALKIN~, WALKIN+1, CI~, CI+3 , CO~, CO+3, GETVST~, GETVST+2, GETVST+3, GETVST+6, APPT~, APPT+2, LASTNOS~, LASTNOS+5 |
PCNT | NOSHOW+3~, NOSHOW+6*, NOSHOW+28*, NOSHOW+31, NOSHOW+36 |
PRINC | NOSHOW+3~, NOSHOW+5*, NOSHOW+28, NOSHOW+34, NOSHOW+37 |
SDIEN | CI~, CI+2, CO~, CO+2 |
TOTL | NOSHOW+3~, NOSHOW+6*, NOSHOW+16*, NOSHOW+31, NOSHOW+33 |
U | SCIEN+3, OI+3, APPTYP+1, WALKIN+1, CI+4, CO+4, GETVST+4, GETVST+6, GETVST+7, PEND+8 , PEND+13, PEND+14, PEND+17, PEND+19, NOSHOW+5, NOSHOW+15, NOSHOW+21, LASTNOS+5, LASTNOS+7, NOSHOWA+3 , NOSHOWA+11, NOSHOWA+12 |
X | SCIEN+1~, SCIEN+2*, SCIEN+3, SCIEN+4, OI+1~, OI+2*, OI+3, APPTYP+1~*, APPTYP+2, CI+1~ , CI+2*, CI+3*, CI+4*, CI+5, CO+1~, CO+2*, CO+3*, CO+4*, CO+5, GETVST+1~ , GETVST+3*, GETVST+4*, GETVST+5*, GETVST+6, GETVST+7, PEND+7~, PEND+17*, PEND+19, PEND+23*, PEND+24 , NOSHOW+3~, NOSHOW+13, NOSHOW+15*, NOSHOW+19, NOSHOW+21*, NOSHOW+37*, NOSHOW+38, NOSHOW+39, NOSHOW+40, NOSHOW+41 , LASTNOS+1~, LASTNOS+2*, LASTNOS+7*, LASTNOS+8 |
X1 | NOSHOW+3~, NOSHOW+13*, NOSHOW+19* |
X2 | NOSHOW+3~, NOSHOW+13*, NOSHOW+19* |
Y | LASTNOS+1~, LASTNOS+4*, LASTNOS+5, LASTNOS+6 |
Z | LASTNOS+1~, LASTNOS+4, LASTNOS+6*, LASTNOS+7 |