BSDAL2 ; IHS/ANMC/LJF - IHS APPT LIST - CONTINUED ;
Source file <BSDAL2.m>
Package | Total | Call Graph |
---|---|---|
IHS Changes To Scheduling | 3 | $$ACTV^BSDU PCP^BSDU1 $$WALKIN^BSDU2 |
IHS Changes To ADT | 2 | $$INPT1^BDGF1 ($$DEAD,$$DOD,$$HRCN,$$INSUR)^BDGF2 |
Kernel | 2 | $$FMTE^XLFDT ($$REPEAT,$$STRIP)^XLFSTR |
IHS Patient | 1 | $$AGE^AUPNPAT |
Registration | 1 | (ADD,DEM)^VADPT |
Scheduling | 1 | TM^SDROUT0 |
VA Fileman | 1 | $$GET1^DIQ |
Package | Total | Caller Graph |
---|---|---|
IHS Changes To Scheduling | 2 | BSDALL BSDAPI2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
SET(DATA,NUM) | ; put display line into display array
|
|
APPTLN(CLN,DATE,IEN) | ; -- for each individual appt, print patient data
|
|
PAD(D,L) | ;EP -- SUBRTN to pad length of data
; -- D=data L=length |
|
SP(N) | ; -- SUBRTN to pad N number of spaces
|
|
CCLK(CLN,DATE) | ; -- list chart requests for this clinic and date
|
|
CHECK(CLN,APDT) | ;check if clinic for this division and not cancelled or inactive
|
|
START | ;EP; called by list template INIT^BSDALL
|
|
CLINIC | ; called for each clinic
|
|
AGE(P) | ; returns shortened printable age ;IHS/OIT/LJF 7/15/2005 PATCH 1004
|
|
ACTIVITY(CLN,APDT) | ;Determine if clinic has activity to print for appt date
|
Name | Field # of Occurrence |
---|---|
$$AGE^AUPNPAT | AGE+1 |
$$INPT1^BDGF1 | APPTLN+26 |
$$DEAD^BDGF2 | APPTLN+32 |
$$DOD^BDGF2 | APPTLN+33 |
$$HRCN^BDGF2 | APPTLN+37, CCLK+9 |
$$INSUR^BDGF2 | APPTLN+50 |
$$ACTV^BSDU | CHECK+3 |
PCP^BSDU1 | APPTLN+89 |
$$WALKIN^BSDU2 | APPTLN+7 |
$$GET1^DIQ | CLINIC+9, APPTLN+66, APPTLN+68, APPTLN+78, APPTLN+79, APPTLN+97, CCLK+8, CCLK+13, CCLK+15, CHECK+1 , CHECK+2 |
TM^SDROUT0 | APPTLN+15, APPTLN+22, APPTLN+44 |
ADD^VADPT | APPTLN+76 |
DEM^VADPT | APPTLN+9 |
$$FMTE^XLFDT | CLINIC+10, APPTLN+39, APPTLN+67, CCLK+3, CCLK+14 |
$$REPEAT^XLFSTR | CLINIC+12, PAD+2 |
$$STRIP^XLFSTR | AGE+1 |
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^VA(200 - [#200] | GET1^DIQ |
^SC - [#44] | GET1^DIQ |
^AUPNPAT - [#9000001] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | APPTLN+8, APPTLN+28 |
^SC - [#44] | CLINIC+16, CLINIC+19, CLINIC+20, APPTLN+2, APPTLN+21, APPTLN+35, CCLK+2, CCLK+5, CCLK+6, CCLK+7 , CHECK+4, ACTIVITY+1, ACTIVITY+4, ACTIVITY+5, ACTIVITY+6 |
^SC("B" | START+3, START+5 |
^TMP("BSDAL" | SET+2* |
Name | Line Occurrences |
---|---|
$$ACTIVITY | CLINIC+7 |
$$AGE | APPTLN+39 |
$$CHECK | CLINIC+7 |
$$PAD | APPTLN+19, APPTLN+26, APPTLN+36, APPTLN+37, APPTLN+44, APPTLN+50, CCLK+9, CCLK+10, SP+1 |
$$SP | CLINIC+25, APPTLN+15, APPTLN+33, APPTLN+35, APPTLN+50, APPTLN+66, APPTLN+72, APPTLN+81, APPTLN+83, APPTLN+91 , APPTLN+97, CCLK+13 |
APPTLN | CLINIC+21 |
CCLK | CLINIC+28 |
CLINIC | START+5 |
SET | CLINIC+11, CLINIC+12, CLINIC+25, CLINIC+27, APPTLN+16, APPTLN+29, APPTLN+33, APPTLN+45, APPTLN+51, APPTLN+55 , APPTLN+57, APPTLN+60, APPTLN+69, APPTLN+82, APPTLN+84, APPTLN+92, APPTLN+98, APPTLN+101, CCLK+3, CCLK+11 , CCLK+17 |
Name | Field # of Occurrence |
---|---|
^( | APPTLN+28 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
APDT | CHECK~, CHECK+3, CHECK+4, ACTIVITY~, ACTIVITY+1, ACTIVITY+3, ACTIVITY+4 |
BSD | CLINIC+1~, CLINIC+15*, CLINIC+16*, CLINIC+19, CLINIC+20, CLINIC+21 |
BSDACT | CLINIC+1~, CLINIC+15*, CLINIC+23, CLINIC+24*, CLINIC+25, APPTLN+101* |
>> BSDAMB | APPTLN+63, CCLK+12 |
BSDARR | APPTLN+89~* |
BSDARR(1 | APPTLN+91 |
BSDC | CCLK+1~ |
>> BSDCC | APPTLN+96 |
BSDCN | START+1~, START+2*, START+3*, START+5 |
BSDCPH | APPTLN+77~, APPTLN+79*, APPTLN+83 |
>> BSDCR | CLINIC+28, ACTIVITY+1 |
>> BSDD | CLINIC+6*, CLINIC+7, CLINIC+10, CLINIC+15, CLINIC+16, CLINIC+28 |
>> BSDD( | CLINIC+5, CLINIC+6 |
BSDDA | CLINIC+4~, CLINIC+5*, CLINIC+6 |
BSDLOA | APPTLN+4~, APPTLN+5*, APPTLN+15 |
BSDN | CCLK+1~, CCLK+7*, CCLK+10, CCLK+13, CCLK+14, CCLK+15 |
>> BSDPCMM | APPTLN+72, APPTLN+88 |
>> BSDPH | APPTLN+72, APPTLN+74 |
>> BSDPRT | CLINIC+8, CLINIC+12 |
>> BSDWI | APPTLN+7 |
BSDWPH | APPTLN+77~, APPTLN+78*, APPTLN+81 |
BSDZ | APPTLN+1~ |
BSDZ( | APPTLN+42*, APPTLN+44 |
BSDZ(3 | APPTLN+41* |
BSDZ(4 | APPTLN+41* |
BSDZ(5 | APPTLN+41* |
CLN | APPTLN~, APPTLN+2, CCLK~, CCLK+2, CCLK+5, CCLK+6, CCLK+7, CHECK~, CHECK+1, CHECK+2 , CHECK+3, CHECK+4, ACTIVITY~, ACTIVITY+1, ACTIVITY+4, ACTIVITY+5, ACTIVITY+6 |
D | PAD~, PAD+2 |
DATA | APPTLN+1~, APPTLN+8*, APPTLN+20, APPTLN+24, APPTLN+42, SET~, SET+2 |
DATE | APPTLN~, APPTLN+2, APPTLN+7, APPTLN+8, APPTLN+15, APPTLN+21, APPTLN+26, APPTLN+35, APPTLN+50, CCLK~ , CCLK+2, CCLK+3, CCLK+5, CCLK+6, CCLK+7, ACTIVITY+2~, ACTIVITY+3*, ACTIVITY+4*, ACTIVITY+5, ACTIVITY+6 , AGE+1 |
DFN | APPTLN+1~, APPTLN+2*, APPTLN+7, APPTLN+8, APPTLN+26, APPTLN+28, APPTLN+32, APPTLN+33, APPTLN+37, APPTLN+39 , APPTLN+50, APPTLN+78, APPTLN+79, APPTLN+89, APPTLN+97, CCLK+1~, CCLK+6*, CCLK+8, CCLK+9, AGE+1 |
DUZ(2 | APPTLN+37, CCLK+9 |
FIRST | CLINIC+1~, CLINIC+18*, APPTLN+13, APPTLN+15* |
FOUND | ACTIVITY+2~, ACTIVITY+3*, ACTIVITY+4, ACTIVITY+5, ACTIVITY+6*, ACTIVITY+7 |
IEN | CLINIC+1~, CLINIC+18*, CLINIC+19*, CLINIC+20, CLINIC+21, APPTLN~, APPTLN+2, APPTLN+21, APPTLN+35, CCLK+1~ , CCLK+5*, CCLK+6, CCLK+7 |
L | PAD~, PAD+2 |
LINE | CLINIC+1~, CLINIC+8*, CLINIC+9*, CLINIC+10*, CLINIC+11, APPTLN+1~, APPTLN+15*, APPTLN+16*, APPTLN+19*, APPTLN+20* , APPTLN+22*, APPTLN+24*, APPTLN+26*, APPTLN+27*, APPTLN+28*, APPTLN+29, APPTLN+35*, APPTLN+36*, APPTLN+37*, APPTLN+39* , APPTLN+44*, APPTLN+45, APPTLN+50*, APPTLN+51, APPTLN+54*, APPTLN+55, APPTLN+56*, APPTLN+57, APPTLN+59*, APPTLN+60 , APPTLN+66*, APPTLN+67*, APPTLN+68*, APPTLN+69, APPTLN+72*, APPTLN+80*, APPTLN+81*, APPTLN+82, APPTLN+83*, APPTLN+84 , APPTLN+91*, APPTLN+92, APPTLN+97*, APPTLN+98, CCLK+8*, CCLK+9*, CCLK+10*, CCLK+11, CCLK+13*, CCLK+14* , CCLK+16*, CCLK+17 |
N | ACTIVITY+2~, ACTIVITY+5*, ACTIVITY+6, SP~, SP+1 |
NODE | APPTLN+1~, APPTLN+2*, APPTLN+5, APPTLN+53, APPTLN+54, APPTLN+56, APPTLN+58, APPTLN+59, APPTLN+65 |
NUM | SET~, SET+1*, SET+2 |
P | AGE~ |
SC | START+1~, START+4*, START+5*, CLINIC+7, CLINIC+9, CLINIC+16, CLINIC+19, CLINIC+20, CLINIC+21, CLINIC+28 , APPTLN+21, APPTLN+35 |
SPACE | APPTLN+1~, APPTLN+41*, APPTLN+44* |
U | CLINIC+20, APPTLN+5, APPTLN+8, APPTLN+20, APPTLN+21, APPTLN+24, APPTLN+42, APPTLN+53, APPTLN+54, APPTLN+56 , APPTLN+58, APPTLN+59, APPTLN+65, CCLK+10, CCLK+13, CCLK+15, ACTIVITY+6 |
VA | APPTLN+1~ |
VADM | APPTLN+1~ |
VADM(1 | APPTLN+36 |
VADM(3 | APPTLN+39 |
>> VALMCNT | CLINIC+11, CLINIC+12, CLINIC+25, CLINIC+27, APPTLN+16, APPTLN+29, APPTLN+33, APPTLN+45, APPTLN+51, APPTLN+55 , APPTLN+57, APPTLN+60, APPTLN+69, APPTLN+82, APPTLN+84, APPTLN+92, APPTLN+98, APPTLN+101, CCLK+3, CCLK+11 , CCLK+17 |
VAPA | APPTLN+1~, APPTLN+75! |
VAPA(8 | APPTLN+80 |
>> VAUTC | START+3 |
>> VAUTC( | START+3 |
>> VAUTD | CHECK+2 |
>> VAUTD( | CHECK+2 |
X | APPTLN+1~, APPTLN+15*, APPTLN+21*, APPTLN+22, APPTLN+26*, APPTLN+27, APPTLN+42*, APPTLN+44*, APPTLN+64~, APPTLN+65* , APPTLN+66, APPTLN+68, CCLK+15*, CCLK+16 |
Y | APPTLN+64~, APPTLN+65*, APPTLN+67 |
Z | APPTLN+1~, APPTLN+44*, APPTLN+64~, APPTLN+68* |