BSDCHKIN ;cmi/anch/maw - BSD CheckIn Auto Refresh 1/25/2007 1:06:21 PM
Source file <BSDCHKIN.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 5 | ^%DT C^%DTC EN^DDIOL ^DIC ^DIR |
Registration | 4 | (KVA,PID)^VADPT (EN,REFRESH)^VALM TERM^VALM0 ($$FDATE,$$SETSTR,CLEAR,PAUSE)^VALM1 |
Scheduling | 4 | (INIT,LARGE,NUL)^SDAM10 $$VALID^SDAM2 EN^SDAMEP ASK2^SDDIV |
IHS Changes To Scheduling | 2 | (BLD1,SET)^BSDCHKI1 ($$ACTV,$$DIVNM,$$INACTMSG,$$INACTVDT,EXPNDPC)^BSDU |
Kernel | 2 | $$FMTE^XLFDT DISP^XQORM1 |
IHS Patient | 1 | KILL^AUPNPAT |
Name | Comments | DBIA/ICR reference |
---|---|---|
FUT | ; -- change date range
|
|
HELPTXT | ; -- help text
|
|
INIT1 | ; added line label
|
|
LIST | ; -- find and build
; input: X := status group ; output: SDAMLIST := array of status' |
|
GETCLN | ;-- get clinics
|
|
HLPQ | ||
HLPS | ; -- short help
|
|
GROUPQ | ||
MCLN(BSDCLNM) | ;-- loop through array and call BLD1
|
|
FUTQ | ||
FNL | ; -- what to do after action
|
|
DR | ;-- select date range
|
|
HDR | ; -- screen head
|
|
REFRESH(BSDDT,BSDCLNA) | ;-- lets build the date/time order array
|
|
EN1 | ;PEP; entry point when clinic or clinic array is known - see technical documentation
|
|
RF | ;-- refresh the screen now
|
|
GUI(BSDCLN,BSDDT) | ;-- future GUI entry point for display
|
|
GROUP(GROUP,SDAMLIST) | ; -- find list
|
|
BLD1 | ; -- scan apts
|
|
CLN | ;-- lets get the clinic
|
|
EN | ;EP; -- main entry point for BSDAM CHECKIN LIST
; variables already set coming into this routine: ; SDCLN = clinic ien in file ; BSDDT = date of clinic appointments to list |
|
HDRC | ;-- clinic header
; input: SDCLN := ifn of pat ; output: VALMHDR() := hdr array |
|
BLD | ; -- entry point to bld list
; input: SDAMLIST := list to build |
|
BLDQ | ||
TOFF | ;-- toggle off auto refresh
|
|
LISTQ | ||
HLP | ; -- help for list
|
|
EXIT | ; -- exit action for protocol
|
|
INITQ | ||
TON | ;-- toggle on auto refresh
|
|
EX | ;-- expand the entry
|
Name | Field # of Occurrence |
---|---|
^%DT | DR+2 |
C^%DTC | FUT+1 |
KILL^AUPNPAT | EN1+3 |
BLD1^BSDCHKI1 | BLD1+19 |
SET^BSDCHKI1 | MCLN+10, MCLN+17 |
$$ACTV^BSDU | GETCLN+8 |
$$DIVNM^BSDU | CLN+5 |
$$INACTMSG^BSDU | GETCLN+3 |
$$INACTVDT^BSDU | GETCLN+9 |
EXPNDPC^BSDU | GETCLN+13 |
EN^DDIOL | GETCLN+10 |
^DIC | GETCLN+4 |
^DIR | RF+9 |
INIT^SDAM10 | MCLN+2 |
LARGE^SDAM10 | BLD1+20 |
NUL^SDAM10 | BLD1+20 |
$$VALID^SDAM2 | BLD1+19 |
EN^SDAMEP | EX+2 |
ASK2^SDDIV | CLN+6 |
KVA^VADPT | EN1+3 |
PID^VADPT | BLD1+19 |
EN^VALM | EN1+2 |
REFRESH^VALM | EXIT+1 |
TERM^VALM0 | EN1+1 |
$$FDATE^VALM1 | HDR+7 |
$$SETSTR^VALM1 | HDR+7 |
CLEAR^VALM1 | EN1+3, INIT1+1, HLP+2, HLP+8 |
PAUSE^VALM1 | LIST+4, HLP+1, HLP+3 |
$$FMTE^XLFDT | DR+1 |
DISP^XQORM1 | HLPS+1 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^SC - [#44] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^BSDTMP("BSDCHK" | FNL+1! |
^DPT - [#2] | BLD1+19 |
^SC - [#44] | REFRESH+5, REFRESH+7, REFRESH+8, REFRESH+10, REFRESH+11, HDRC+8, MCLN+13, BLD1+4, BLD1+5, BLD1+6 , BLD1+7, BLD1+8, BLD1+19 |
^SD(409.62 - [#409.62] | GROUP+2, GROUP+3, GROUP+4 |
^SD(409.63 - [#409.63] | GROUP+5 |
^TMP("BSDCHK" | EN+5!, BLD1+9*, BLD1+11, BLD1+12, BLD1+14 |
^TMP("SDAM" | EN+6!, REFRESH+12*, FNL+1!, BLD1+21* |
^TMP("SDAMIDX" | FNL+1! |
^TMP("VALMIDX" | FNL+1! |
Name | Line Occurrences |
---|---|
BLD | LIST+5 |
BLD1 | MCLN+19 |
CLN | EN+8 |
DR | EN+11 |
EN1 | EN+13 |
EXIT | RF+3 |
GETCLN | CLN+7, GETCLN+14 |
GROUP | BLD+2, LIST+5 |
GROUPQ | GROUP+3 |
HLPQ | HLP+1 |
HLPS | HLP+1 |
LIST | INIT1+2, FUT+3, RF+1 |
LISTQ | LIST+4 |
MCLN | BLD+4 |
RF | TOFF+2, TON+3 |
TOFF | RF+11 |
Name | Field # of Occurrence |
---|---|
^(0 | GROUP+3, BLD1+19 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %DT | DR+1* |
>> %DT("A" | DR+1* |
>> %DT("B" | DR+1* |
AC | MCLN+1~ |
AW | MCLN+1~ |
BL | MCLN+1~ |
BSDA | REFRESH+1~, REFRESH+3*, REFRESH+5, REFRESH+7, REFRESH+8, REFRESH+10, REFRESH+11, REFRESH+12 |
>> BSDACNT | MCLN+8*, MCLN+11, MCLN+15*, MCLN+18 |
BSDB | REFRESH+1~, REFRESH+2*, REFRESH+5 |
BSDCHK | REFRESH+9~, REFRESH+11*, REFRESH+12, BLD1+3~, BLD1+7*, BLD1+9 |
>> BSDCHKIN | BLD1+18* |
BSDCLN | EN+10, GUI~, GETCLN+5!, FNL+3!, BLD+4 |
BSDCLN( | GETCLN+11*, HDRC+6 |
BSDCLNA | REFRESH~, HDRC+4~, HDRC+5*, HDRC+9*, HDRC+11, FNL+3! |
BSDCLNA( | REFRESH+3 |
BSDCLNE | HDRC+7~, HDRC+8*, HDRC+9, MCLN+6~, MCLN+13*, MCLN+14 |
BSDCLNM | MCLN~ |
BSDCLNM( | MCLN+5 |
>> BSDCNT | TON+1* |
BSDDA | REFRESH+6~, REFRESH+7*, REFRESH+8, REFRESH+10, REFRESH+11, HDRC+4~, HDRC+6*, HDRC+8, MCLN+4~, MCLN+5* , MCLN+12 |
BSDDFN | BLD1+3~, BLD1+8*, BLD1+9 |
>> BSDDIV | CLN+2 |
BSDDT | EN+12, GUI~, DR+3!, DR+4*, DR+5, DR+6, REFRESH~, REFRESH+2 |
BSDDTA | REFRESH+4~, REFRESH+5*, REFRESH+7, REFRESH+8, REFRESH+10, REFRESH+11 |
BSDE | REFRESH+1~, REFRESH+2*, REFRESH+5 |
BSDLN | MCLN+6~, MCLN+7*, MCLN+10, MCLN+14*, MCLN+17 |
BSDPAT | REFRESH+9~, REFRESH+10*, REFRESH+12 |
>> BSDQ | CLN+6* |
>> BSDRF | HDR+9, TOFF+1*, TON+2*, TON+3, RF+4 |
BSDTDA | BLD1+10~, BLD1+11*, BLD1+12, BLD1+14, BLD1+18 |
BSDTDTA | BLD1+13~, BLD1+14*, BLD1+15, BLD1+16 |
BSDTIEN | BLD1+10~, BLD1+12*, BLD1+14, BLD1+17 |
DFN | FNL+2!, MCLN+1~, BLD1+17*, BLD1+19* |
>> DIC | GETCLN+1* |
>> DIC("A" | GETCLN+1* |
>> DIC("S" | GETCLN+2* |
>> DIC("W" | GETCLN+3* |
>> DIC(0 | GETCLN+1* |
DIR | RF+10! |
DIR("A" | RF+6* |
DIR("B" | RF+7* |
DIR("T" | RF+8* |
DIR(0 | RF+5* |
>> DIV | CLN+3, CLN+4, CLN+5 |
DT | GETCLN+8, DR+1, FUT+1, FUT+2 |
>> DUOUT | GETCLN+5 |
GROUP | GROUP~, GROUP+2*, GROUP+3, GROUP+4, GROUP+5 |
>> I | GROUP+1*, GROUP+4*, GROUP+5*, HLP+3* |
>> IORVOFF | HDR+9 |
>> IORVON | HDR+9 |
NC | MCLN+1~ |
NW | MCLN+1~ |
SC | MCLN+1~ |
SDACNT | FNL+2!, MCLN+8, MCLN+9*, MCLN+11*, MCLN+15, MCLN+16*, MCLN+18* |
SDAMCNT | FNL+2! |
SDAMDD | MCLN+1~ |
SDAMLIST | HDR+4, FNL+2!, BLD+2, LIST+5, GROUP~, GROUP+1*, GROUP+3* |
SDAMLIST( | GROUP+1!, GROUP+5* |
SDAMLIST("SCR" | GROUP+4* |
SDAMTYP | EN+7*, FNL+2!, BLD+4, LIST+4 |
SDATA | FNL+2!, BLD1+19* |
SDBEG | DR+5*, HDR+7, FNL+2!, BLD1+4 |
SDCL | FNL+2!, MCLN+1~, BLD1+19* |
SDCLN | FNL+2!, MCLN+12*, MCLN+13, BLD1+4, BLD1+5, BLD1+6, BLD1+7, BLD1+8, BLD1+9, BLD1+11 , BLD1+12, BLD1+14, BLD1+19 |
SDDA | FNL+2!, MCLN+1~, BLD1+5*, BLD1+6, BLD1+7, BLD1+8, BLD1+9, BLD1+15*, BLD1+19 |
>> SDEBG | FUT+2* |
SDEND | DR+6*, HDR+7, FNL+2!, FUT+2*, BLD1+4 |
SDFLDD | FNL+2! |
SDFN | FNL+2! |
SDLARGE | MCLN+1~, BLD1+20 |
SDLNX | HDR+1~*, HDR+2*, HDR+5, HDR+7, HDR+8*, HDR+10 |
SDMAX | MCLN+1~ |
SDNAME | MCLN+1~, BLD1+19* |
SDPRD | FNL+2! |
SDT | FNL+2!, MCLN+1~, BLD1+4*, BLD1+5, BLD1+6, BLD1+7, BLD1+8, BLD1+9, BLD1+16*, BLD1+19 |
SDX | HDR+1~, HLP+3*, HLPQ! |
SDY | FNL+2! |
SW | MCLN+1~ |
TC | MCLN+1~ |
TW | MCLN+1~ |
U | REFRESH+8, REFRESH+10, REFRESH+11, HDRC+8, MCLN+13, BLD1+6, BLD1+7, BLD1+8, BLD1+9, BLD1+15 , BLD1+16, BLD1+19, BLD1+21 |
VA | MCLN+1~ |
VA("BID" | BLD1+19 |
>> VALMBCK | LIST+4*, LIST+6*, RF+2*, EXIT+1* |
>> VALMBG | MCLN+3*, EX+1*, EX+3* |
VALMCNT | EN1+2~, BLD1+21 |
VALMHCNT | FNL+2! |
VALMHDR | FUT+2! |
VALMHDR( | HDR+5*, HDR+7*, HDR+10* |
VALMHDR(1 | HDRC+11* |
VALMY | FNL+2! |
VAUTD | CLN+1!, CLN+4*, CLN+5*, CLN+6 |
VAUTD( | CLN+5* |
X | GETCLN+9*, GETCLN+10, INIT1+2*, HDR+1~, HDR+4*, HDR+5, HDR+9*, HDR+10, FNL+2!, LIST+4 , LIST+5, FUT+2*, RF+1*, HLP+1, HLPS+1* |
>> X1 | FUT+1* |
>> X2 | FUT+1* |
XC | MCLN+1~ |
XW | MCLN+1~ |
Y | CLN+6, GETCLN+6, GETCLN+8, GETCLN+9, GETCLN+11, GETCLN+13, DR+3, DR+4, FNL+2!, RF+11 , HLP+3, HLPQ! |
Name | Field # of Occurrence |
---|---|
$T(HELPTXT+I | HLP+3 |