DGENRPD2 ;ALB/CJM/EG -Veteran with Future Appts and no Enrollment App Report - Continue 01/19/2005 ; 1/20/05 1:27pm
Source file <DGENRPD2.m>
Package | Total | Call Graph |
---|---|---|
Registration | 5 | ($$FINDCUR,$$STATUS)^DGENA ($$CATEGORY,$$EXTCAT)^DGENA4 ($$GET,$$VET)^DGENPTA $$EXT^DGENU $$SITE^VASITE |
Kernel | 3 | ^%ZISC $$FMTE^XLFDT $$LJ^XLFSTR |
Scheduling | 1 | $$SDAPI^SDAMA301 |
VA Fileman | 1 | ^DIR |
Package | Total | Caller Graph |
---|---|---|
Registration | 3 | DGENRPD1 DGQPTQ2 DGRP14 |
Name | Comments | DBIA/ICR reference |
---|---|---|
PAUSE | ;
|
|
ERR | ;
|
|
LJ(STRING,LENGTH) | ;
|
|
DATE(DATE) | ;
|
|
GETPAT | ;
; Description: Gets patients to include in the report |
|
HEADER | ;
|
|
SETTMP(CLINIC,DFN,APPT) | ;
; NOENREC is for patients without enrollment records ; SITE2 is for other excluded enrollment records |
|
PATIENTS(SUBSCRPT) | ;
|
|
VALREC(CLINIC,DFN) | ;
|
|
;
|
||
FAPCHK() | ;
|
|
LINE(LINE) | ;
|
Name | Field # of Occurrence |
---|---|
^%ZISC | PRINT+16 |
$$FINDCUR^DGENA | SETTMP+10 |
$$STATUS^DGENA | SETTMP+11 |
$$CATEGORY^DGENA4 | VALREC+10 |
$$EXTCAT^DGENA4 | PATIENTS+31 |
$$GET^DGENPTA | PATIENTS+26 |
$$VET^DGENPTA | VALREC+14 |
$$EXT^DGENU | PATIENTS+30 |
^DIR | PAUSE+6 |
$$SDAPI^SDAMA301 | GETPAT+4 |
$$SITE^VASITE | SETTMP+6 |
$$FMTE^XLFDT | HEADER+6, HEADER+10, DATE+1 |
$$LJ^XLFSTR | LJ+1 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
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] | GETPAT+17, GETPAT+25, GETPAT+35 |
^SC - [#44] | GETPAT+14, GETPAT+16, GETPAT+23, GETPAT+24, GETPAT+33, GETPAT+34, SETTMP+7 |
^TMP($J | PRINT+2!, PRINT+18!, GETPAT+13, GETPAT+15, GETPAT+22, GETPAT+27, GETPAT+31, GETPAT+36, GETPAT+38!, ERR+5* , ERR+6!, VALREC+3, VALREC+6, SETTMP+10*, SETTMP+11*, PATIENTS+7, PATIENTS+12, PATIENTS+17, PATIENTS+20, PATIENTS+22 , PATIENTS+23, FAPCHK+2, FAPCHK+3 |
Name | Line Occurrences |
---|---|
$$DATE | PATIENTS+28, PATIENTS+29 |
$$FAPCHK | GETPAT+9 |
$$LJ | PATIENTS+9, PATIENTS+14, PATIENTS+27, PATIENTS+28, PATIENTS+29, PATIENTS+30, PATIENTS+31 |
ERR | GETPAT+9 |
GETPAT | PRINT+7 |
HEADER | PRINT+11, LINE+7, LINE+12 |
LINE | PATIENTS+8, PATIENTS+9, PATIENTS+10, PATIENTS+13, PATIENTS+14, PATIENTS+18, PATIENTS+32 |
PATIENTS | PRINT+13 |
PAUSE | PRINT+14, LINE+4 |
SETTMP | VALREC+16 |
VALREC | GETPAT+18, GETPAT+27, GETPAT+36 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
APPT | VALREC+2~, VALREC+3*, VALREC+6, VALREC+16, SETTMP~, SETTMP+6, SETTMP+10, SETTMP+11 |
APPTYPE | PATIENTS+3~, PATIENTS+25* |
BEGIN | GETPAT+2~, GETPAT+3* |
CATEGORY | GETPAT+2~, VALREC+10*, VALREC+11, SETTMP+10, SETTMP+11, PATIENTS+3~, PATIENTS+16*, PATIENTS+17*, PATIENTS+20, PATIENTS+22 , PATIENTS+23, PATIENTS+31 |
CLINIC | GETPAT+13*, GETPAT+14, GETPAT+15, GETPAT+16, GETPAT+18, GETPAT+22*, GETPAT+23, GETPAT+24, GETPAT+27, GETPAT+31* , GETPAT+32, GETPAT+33, GETPAT+34, GETPAT+36, VALREC~, VALREC+3, VALREC+6, VALREC+16, SETTMP~, SETTMP+7 , SETTMP+11, PATIENTS+3~, PATIENTS+11*, PATIENTS+12*, PATIENTS+14, PATIENTS+17, PATIENTS+20, PATIENTS+22, PATIENTS+23 |
CLNAME | SETTMP+5~, SETTMP+7*, SETTMP+8*, SETTMP+10, SETTMP+11 |
CRT | PRINT+1~, PRINT+5*, PRINT+9, PRINT+14, LINE+3, LINE+10 |
DATE | DATE~, DATE+1 |
DFN | GETPAT+15*, GETPAT+18, GETPAT+27*, GETPAT+36*, VALREC~, VALREC+3, VALREC+6, VALREC+10, VALREC+14, VALREC+16 , SETTMP~, SETTMP+10, SETTMP+11, PATIENTS+21*, PATIENTS+22*, PATIENTS+23, PATIENTS+26 |
DGARRAY | GETPAT+2~, GETPAT+4, GETPAT+38!, ERR+6! |
DGARRAY("FLDS" | GETPAT+4* |
DGARRAY(1 | GETPAT+3* |
>> DGENRP("ALL" | GETPAT+12 |
>> DGENRP("BEGIN" | GETPAT+3, HEADER+6 |
>> DGENRP("CLINIC" | GETPAT+30, GETPAT+32 |
>> DGENRP("DIVISION" | GETPAT+21, GETPAT+26 |
>> DGENRP("END" | GETPAT+3, HEADER+6 |
>> DGENRP("JUSTONCE" | VALREC+4 |
DGPAT | PATIENTS+3~, PATIENTS+26 |
DGPAT("DOB" | PATIENTS+28 |
DGPAT("NAME" | PATIENTS+27 |
DGPAT("PID" | PATIENTS+27 |
DIR | PAUSE+3~ |
DIR(0 | PAUSE+5* |
>> DIRUT | PAUSE+7 |
DIVISION | GETPAT+2~, GETPAT+16*, GETPAT+17*, GETPAT+24*, GETPAT+25*, GETPAT+26, GETPAT+34*, GETPAT+35*, SETTMP+6, PATIENTS+3~ , PATIENTS+6*, PATIENTS+7*, PATIENTS+9, PATIENTS+12, PATIENTS+14, PATIENTS+17, PATIENTS+20, PATIENTS+22, PATIENTS+23 |
DIVNAME | SETTMP+5~, SETTMP+6*, SETTMP+10, SETTMP+11 |
DT | ERR+5, HEADER+10 |
END | GETPAT+2~, GETPAT+3* |
ENRSTAT | PATIENTS+3~, PATIENTS+24*, PATIENTS+30 |
ERR | FAPCHK+1~, FAPCHK+2*, FAPCHK+3 |
IO | PRINT+8 |
IOF | PRINT+9, LINE+6, LINE+11, HEADER+4 |
IOSL | LINE+3, LINE+10, PAUSE+4 |
IOST | PRINT+5 |
JUSTONCE | VALREC+2~*, VALREC+3, VALREC+4* |
LENGTH | LJ~, LJ+1 |
LINE | LINE~, LINE+8, LINE+13, LINE+15, HEADER+3~, HEADER+14*, HEADER+15, PATIENTS+27*, PATIENTS+28*, PATIENTS+29* , PATIENTS+30*, PATIENTS+31*, PATIENTS+32 |
NAM | GETPAT+2~, GETPAT+9*, ERR+2*, ERR+3*, ERR+4*, ERR+5, ERR+6! |
NODE | PATIENTS+3~, PATIENTS+23*, PATIENTS+24, PATIENTS+25 |
PAGE | PRINT+1~, PRINT+4*, PRINT+9, PRINT+10*, HEADER+7, HEADER+8* |
PATIENT | PATIENTS+3~ |
QUIT | PRINT+1~, PRINT+3*, PRINT+14, LINE+5, PAUSE+7*, PATIENTS+7, PATIENTS+8, PATIENTS+9, PATIENTS+10, PATIENTS+12 , PATIENTS+13, PATIENTS+15, PATIENTS+17, PATIENTS+18, PATIENTS+20, PATIENTS+22, PATIENTS+33 |
SDCNT | GETPAT+2~, GETPAT+4*, GETPAT+9, GETPAT+38!, ERR+6! |
STATUS | VALREC+2~, VALREC+6*, VALREC+7 |
STRING | LJ~, LJ+1 |
SUBSCRPT | PRINT+1~, PRINT+12*, PRINT+13, PATIENTS~, PATIENTS+7, PATIENTS+12, PATIENTS+17, PATIENTS+20, PATIENTS+22, PATIENTS+23 |
TIME | PATIENTS+3~, PATIENTS+19*, PATIENTS+20*, PATIENTS+22, PATIENTS+23, PATIENTS+29 |
U | GETPAT+16, GETPAT+24, GETPAT+33, GETPAT+34, VALREC+6, VALREC+7, SETTMP+6, SETTMP+11 |
X | GETPAT+9~*, PAUSE+3~ |
Y | PAUSE+3~, PAUSE+7 |
>> ZTQUEUED | PRINT+15 |
>> ZTREQ | PRINT+15* |