SCRPW63 ;BP-CIOFO/KEITH - SC veterans awaiting appointments (cont.) ; 23 August 2002@20:23
Source file <SCRPW63.m>
Package | Total | Call Graph |
---|---|---|
Scheduling | 4 | DISP0^SCRPW23 DHDR^SCRPW40 (DELIM,HDR,SCEL)^SCRPW62 $$CPAIR^SCRPW71 |
Kernel | 2 | $$S^%ZTLOAD ($$FMDIFF,$$FMTE)^XLFDT |
Registration | 1 | ($$PRIM,$$SITE)^VASITE |
VA Fileman | 1 | ^DIR |
Name | Comments | DBIA/ICR reference |
---|---|---|
A | ;Gather data for future appointments report
|
|
E | ;Gather data for patients entered report
|
|
CSCEL(SDEL) | ;Convert SC elig. to external
|
|
ASUM | ||
ESUM | ;Print summary
|
|
STOP | ;Check for stop task request
|
|
PLINE(DFN,SD0,SDEL) | ;Print patient detail line
|
|
AQ | ||
ADPRT(SDIV) | ;Print report for a division
|
|
DIV(SDIV) | ;Check division
|
|
EQ | ||
SCHAPP(DFN) | ;Look for scheduled appointments not cancelled by clinic
; Input: DFN=patient ifn |
Name | Field # of Occurrence |
---|---|
$$S^%ZTLOAD | STOP+1 |
^DIR | E+30, EQ, A+53, AQ |
DISP0^SCRPW23 | E+26, A+47 |
DHDR^SCRPW40 | A+49, ADPRT+1 |
DELIM^SCRPW62 | PLINE+30, PLINE+56 |
HDR^SCRPW62 | E+28, E+33, E+37, ESUM+2, A+49, ASUM+1, ADPRT+2, ADPRT+6, ADPRT+13 |
SCEL^SCRPW62 | E+3, A+3 |
$$CPAIR^SCRPW71 | PLINE+44 |
$$PRIM^VASITE | A+40, DIV+1 |
$$SITE^VASITE | PLINE+51 |
$$FMDIFF^XLFDT | E+17, A+15, PLINE+40, PLINE+53, PLINE+54 |
$$FMTE^XLFDT | PLINE+6, PLINE+38, PLINE+40, PLINE+49, PLINE+52, PLINE+53 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DG(40.8 - [#40.8] | A+44 |
^DIC(31 - [#31] | PLINE+24 |
^DIC(5 - [#5] | PLINE+9 |
^DPT - [#2] | E+6, E+7, E+10, E+14, E+15, E+36, SCHAPP+5, SCHAPP+6, A+4, A+6 , A+8, A+9, A+10, A+11, A+16, ADPRT+10, ADPRT+11, PLINE+8, PLINE+13, PLINE+20 , PLINE+22, PLINE+23 |
^SC - [#44] | A+12, PLINE+39, PLINE+44, PLINE+46, PLINE+47, PLINE+48 |
^TMP("SCRPW" | E+20*, E+23*, E+27, E+33, E+34, E+35, E+38, ESUM+4, ESUM+5, ESUM+7 , ESUM+8, A+18*, A+19*, A+24, A+25, A+26, A+27, A+28*, A+29, A+30* , A+43, A+48, ASUM+5, ASUM+6, ASUM+7, ADPRT+2, ADPRT+7, ADPRT+8, ADPRT+9, ADPRT+12 , PLINE+35, PLINE+36 |
Name | Line Occurrences |
---|---|
$$CSCEL | ESUM+6, ASUM+8, PLINE+8 |
$$DIV | A+12 |
$$SCHAPP | E+16 |
ADPRT | A+58 |
AQ | ASUM |
ASUM | A+55 |
EQ | ESUM+1 |
PLINE | E+38, ADPRT+14 |
STOP | E+8, A+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | E+1~, E+6*, E+7, E+8, E+10, E+14, E+15, E+16, E+23, E+34* , E+35*, E+36, E+38, SCHAPP~, SCHAPP+5, SCHAPP+6, A+1~, A+4*, A+5, A+6 , A+8, A+9, A+10, A+11, A+16, A+18, A+19, A+27*, A+29, ADPRT+9* , ADPRT+10, ADPRT+11, ADPRT+12, ADPRT+14, PLINE~, PLINE+8, PLINE+13, PLINE+20, PLINE+22, PLINE+23 , PLINE+35, PLINE+36, PLINE+47 |
DIR | E+30~, EQ~, A+53~, AQ~ |
DIR(0 | E+30*, EQ*, A+53*, AQ* |
DT | E+4, E+17, A+9 |
IOM | A+52 |
IOSL | E+37, ADPRT+13 |
IOST | E+26, E+30, EQ, A+47, A+53, AQ |
SD0 | E+1~, E+10*, E+11, E+22, E+23, A+2~, ADPRT+10*, ADPRT+14, PLINE~, PLINE+6 |
SDA0 | A+1~, A+11*, A+12, A+14, A+18, PLINE+36*, PLINE+39, PLINE+40, PLINE+44, PLINE+46 , PLINE+47, PLINE+48, PLINE+53, PLINE+54 |
SDADD | PLINE+5~, PLINE+8*, PLINE+9, PLINE+12, PLINE+18, PLINE+19 |
SDADM | PLINE+43~, PLINE+45*, PLINE+48*, PLINE+49, PLINE+54 |
SDADME | PLINE+43~, PLINE+45*, PLINE+49*, PLINE+51 |
SDAPT | A+1~, ASUM+7*, ASUM+9 |
SDATE | E+1~, E+4*, E+12, E+13 |
>> SDATES | E+4, A+15 |
SDC0 | PLINE+43~, PLINE+44*, PLINE+51, PLINE+52 |
SDCP | PLINE+43~, PLINE+44, PLINE+51 |
SDCZ | PLINE+43~, PLINE+44*, PLINE+51*, PLINE+52 |
SDDATE | A+1~, A+10*, A+15, A+18 |
>> SDDIV | A+39, A+40, A+42, DIV+2 |
>> SDDIV( | A+38, DIV+2 |
SDDTE | PLINE+5~, PLINE+6*, PLINE+12, PLINE+18 |
SDEDT | E+1~, E+11*, E+12, E+13, E+17 |
SDEL | E+1~, E+14*, E+18*, E+20, E+23, E+33*, E+34, E+35, E+36, E+38 , ESUM+5*, ESUM+6, ESUM+7, ESUM+8, A+1~, A+6*, A+7*, A+18, A+19, A+25* , A+26, A+27, A+28, A+29, A+30, ASUM+6*, ASUM+7, ASUM+8, ADPRT+7*, ADPRT+8 , ADPRT+9, ADPRT+11, ADPRT+12, ADPRT+14, PLINE~, PLINE+8*, PLINE+22, PLINE+35, PLINE+36, CSCEL~ , CSCEL+1 |
>> SDELIM | ESUM+1, A+51, ASUM, ADPRT+1, ADPRT+4, PLINE+11, PLINE+15, PLINE+30, PLINE+37, PLINE+42 , PLINE+60 |
SDELN | PLINE+5~, PLINE+8*, PLINE+12, PLINE+17 |
>> SDFMT | E+18, E+33, A+55 |
SDI | SCHAPP+3~, SCHAPP+4*, SCHAPP+5*, SCHAPP+6, A+1~, A+9*, A+10, A+11, A+15, A+18 , A+29*, A+42*, A+43*, A+44, PLINE+5~, PLINE+22*, PLINE+23, PLINE+34*, PLINE+35*, PLINE+36 , PLINE+38, PLINE+40, PLINE+46, PLINE+47, PLINE+48, PLINE+52, PLINE+53 |
SDIFF | A+1~, A+15* |
SDII | PLINE+5~, PLINE+45*, PLINE+46*, PLINE+47, PLINE+48, PLINE+49* |
SDIV | A+2~, A+12*, A+18, A+19, A+24*, A+25, A+26, A+27, A+28, A+29 , A+30, A+38*, A+49*, A+58*, ASUM+2*, ASUM+5*, ASUM+6, ASUM+7, ASUM+8, DIV~ , DIV+1*, DIV+2, ADPRT~, ADPRT+2, ADPRT+7, ADPRT+8, ADPRT+9, ADPRT+12, PLINE+35, PLINE+36 |
SDIV( | A+38*, A+40*, A+44*, A+57, A+58, ASUM+3, ASUM+4 |
SDIVL | A+1~, ASUM+2*, ASUM+4*, ASUM+9, ASUM+12 |
SDIVN | A+1~, A+57*, A+58, ASUM+2*, ASUM+3*, ASUM+4 |
SDIVN( | ASUM+4*, ASUM+8 |
>> SDLINE | ESUM+11, ASUM+12 |
SDLVDT | E+1~, E+9*, E+11*, E+13, E+17 |
SDNAME | E+2~, E+22*, E+23, E+34*, E+35, E+38, A+2~, A+16*, A+18, A+19 , A+26*, A+27, A+29, ADPRT+8*, ADPRT+9, ADPRT+12, PLINE+5~, PLINE+6*, PLINE+12, PLINE+17 , PLINE+35, PLINE+36 |
>> SDOUT | E+30, E+33, E+34, E+35, E+37, E+41, ESUM+2, A+26, A+53, A+57 , A+60, ASUM+1, AQ, STOP+1*, ADPRT+2, ADPRT+6, ADPRT+7, ADPRT+8, ADPRT+9, ADPRT+13 |
>> SDPAGE | ADPRT+1* |
SDREL | E+1~, E+36*, E+37, A+2~, ADPRT+11*, ADPRT+12*, ADPRT+13 |
>> SDRPT | PLINE+29 |
SDSCEL | E+1~, E+3, A+1~, A+3 |
SDSCEL( | E+14, E+18, A+6, A+7 |
>> SDSCVT | E+3, A+3 |
SDSDT | E+1~, E+4* |
SDSSN | PLINE+5~, PLINE+6*, PLINE+7*, PLINE+12, PLINE+17 |
SDST | PLINE+5~, PLINE+9*, PLINE+13, PLINE+19 |
>> SDSTOP | E+4*, E+6, E+8, E+25, A+4, A+5, A+22, A+36 |
>> SDT | A+49, ADPRT+1 |
>> SDT(3 | ESUM+2*, ASUM+1* |
SDTOT | E+1~, ESUM+3*, ESUM+8*, ESUM+11, A+2~, ASUM+2*, ASUM+7*, ASUM+12 |
SDX | E+1~, E+28*, E+29, E+38*, ESUM+6*, ESUM+7, SCHAPP+3~, SCHAPP+6*, SCHAPP+7*, A+1~ , A+14*, A+44*, A+50*, A+51, A+52, ASUM+8*, ASUM+9, ADPRT+3*, ADPRT+4, ADPRT+5 , PLINE+5~, PLINE+23*, PLINE+24, PLINE+26 |
SDY | SCHAPP+3~, SCHAPP+4*, SCHAPP+5, SCHAPP+8*, SCHAPP+10, PLINE+5~, PLINE+24*, PLINE+25 |
SDYR | E+1~, E+17*, E+20, ESUM+3*, ESUM+4*, ESUM+5, ESUM+6, ESUM+7, ESUM+8 |
SDZ | PLINE+5~, PLINE+12*, PLINE+13*, PLINE+30, PLINE+55, PLINE+56 |
SDZ(1 | PLINE+30*, PLINE+55* |
SDZA | PLINE+5~, PLINE+45*, PLINE+52*, PLINE+53*, PLINE+54*, PLINE+55 |
SDZIP | PLINE+5~, PLINE+9*, PLINE+10*, PLINE+13, PLINE+19 |
U | E+11, E+22, E+36, SCHAPP+7, A+12, A+14, A+16, A+18, A+39, A+40 , A+42, A+44, ADPRT+11, PLINE+6, PLINE+9, PLINE+12, PLINE+13, PLINE+18, PLINE+19, PLINE+20 , PLINE+23, PLINE+25, PLINE+26, PLINE+39, PLINE+44, PLINE+46, PLINE+47, PLINE+48, PLINE+51, PLINE+52 , PLINE+53, PLINE+54 |
>> ZTQUEUED | STOP+1 |
>> ZTSTOP | STOP+1* |