DGHTENR ;ALB/JAM - Home Telehealth Patient Sign-up;10 January 2005 ; 9/20/07 8:27am
Source file <DGHTENR.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 6 | ^DIC FILE^DICN DQ^DICQ ^DIE $$GET1^DIQ ^DIR |
Consult Request Tracking | 2 | GUI^GMRCASV1 OER^GMRCSLM1 |
Registration | 2 | ($$BLDHL7,$$SNDHL7)^DGHTHL7 $$LOCREC^DGHTINAC |
Kernel | 1 | ($$FMTE,$$NOW)^XLFDT |
Package | Total | Caller Graph |
---|---|---|
Registration | 2 | DGHT PATIENT SIGNUP DGHTINAC |
Name | Comments | DBIA/ICR reference |
---|---|---|
HTADD | ||
PATOK(DFN) | ||
FILE1 | ;Add/Update fields in #391.31
|
|
EN | ||
MIDUPD | ;Update File #391.31 with message ID
|
|
SNDMSG(TYPE) | ||
CONHELP | ;Help for consult #
|
|
GETPROV(DEFAULT) | ;Prompt for Care Coordinator
|
|
DSPREC(DGIEN) | ;Display Home Telehealth record
|
|
GETVEN() | ;Prompt user for receiving vendor
|
|
SGNUPCHK(DGARY) | ||
FILE | ;File patient data in #391.31
|
|
GETPAT() | ||
GCONSULT(DFN,DEFAULT) | ;Prompt Consult number from file #123
|
Name | Field # of Occurrence |
---|---|
$$BLDHL7^DGHTHL7 | EN+32 |
$$SNDHL7^DGHTHL7 | EN+39 |
$$LOCREC^DGHTINAC | SGNUPCHK+11 |
^DIC | GETPAT+6 |
FILE^DICN | HTADD+4, FILE1+11 |
DQ^DICQ | CONHELP+8 |
^DIE | FILE1+4, FILE1+15, MIDUPD+5 |
$$GET1^DIQ | DSPREC+10, DSPREC+11, DSPREC+12, DSPREC+22, GETPROV+8 |
^DIR | SGNUPCHK+17, GETVEN+8, GCONSULT+20, GETPROV+9, SNDMSG+9 |
GUI^GMRCASV1 | GCONSULT+10 |
OER^GMRCSLM1 | GCONSULT+14 |
$$FMTE^XLFDT | DSPREC+14, DSPREC+15, DSPREC+17, DSPREC+23, CONHELP+6 |
$$NOW^XLFDT | EN+27 |
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 |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | Classic Fileman Calls, GET1^DIQ |
^VA(200 - [#200] | GET1^DIQ |
^DIC(4 - [#4] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD(391.31 | FILE1+7 |
^DGHT(391.31 | SGNUPCHK+18, DSPREC+8, DSPREC+9, HTADD, HTADD+1, HTADD+2*, HTADD+3 |
^DGHTH(391.31 | FILE1+9 |
^DPT - [#2] | PATOK+6, PATOK+8 |
^TMP("GMRCR" | GCONSULT+9!, GCONSULT+15, GCONSULT+21!, CONHELP+2, CONHELP+4, CONHELP+5, CONHELP+6, CONHELP+7 |
Name | Line Occurrences |
---|---|
$$GCONSULT | EN+18 |
$$GETPAT | EN+9 |
$$GETPROV | EN+21 |
$$GETVEN | EN+12 |
$$PATOK | GETPAT+7 |
$$SGNUPCHK | EN+15 |
$$SNDMSG | EN+24 |
DSPREC | SGNUPCHK+14 |
FILE | EN+28 |
FILE1 | FILE+4 |
HTADD | HTADD+1 |
MIDUPD | EN+46 |
Name | Field # of Occurrence |
---|---|
^(0 | HTADD+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARR | EN~, EN+2*, EN+31, EN+32, EN+34, EN+36, EN+39, EN+43, EN+48 |
CON | GCONSULT+6~, GCONSULT+8*, GCONSULT+10, GCONSULT+11*, GCONSULT+12, GCONSULT+13*, GCONSULT+14 |
CONZER | GCONSULT+6~, GCONSULT+15*, GCONSULT+16 |
D | CONHELP+1~ |
DA | SGNUPCHK+6~, DSPREC+4~, DSPREC+6*, DSPREC+7, DSPREC+8, DSPREC+9, FILE+1~, FILE1+1*, FILE1+6!, FILE1+13* , MIDUPD+1~, MIDUPD+2* |
DA(1 | FILE1+7*, FILE1+9, FILE1+10, FILE1+13, MIDUPD+2*, MIDUPD+4 |
DA1 | SGNUPCHK+6~, DSPREC+4~, DSPREC+6*, DSPREC+9 |
DAIEN | SGNUPCHK+6~, SGNUPCHK+11*, SGNUPCHK+12, SGNUPCHK+14, SGNUPCHK+18 |
DD | FILE1+6! |
DEFAULT | GCONSULT~, GCONSULT+19, GETPROV~, GETPROV+8 |
DFN | SGNUPCHK+10, SGNUPCHK+11, PATOK~, PATOK+6, PATOK+8, GCONSULT~, GCONSULT+14 |
DGARY | SGNUPCHK~ |
DGARY( | SGNUPCHK+7, SGNUPCHK+8!, SGNUPCHK+9 |
DGARY("CONSULT" | SGNUPCHK+19* |
DGARY("COORD" | SGNUPCHK+19* |
DGARY("DA" | SGNUPCHK+18* |
DGCHK | EN~, EN+15*, EN+16 |
DGCON | EN~, EN+18*, EN+19, FILE1+2 |
DGDAT | SGNUPCHK+6~, SGNUPCHK+18*, SGNUPCHK+19, DSPREC+4~, DSPREC+8*, DSPREC+10, DSPREC+11, DSPREC+12, DSPREC+13, DSPREC+14 , DSPREC+15 |
DGDAT1 | DSPREC+4~, DSPREC+9*, DSPREC+16, DSPREC+17, DSPREC+19, DSPREC+20, DSPREC+21, DSPREC+22, DSPREC+23, DSPREC+25 , DSPREC+26 |
DGDEF | EN~, EN+18*, EN+21* |
DGDFN | EN~, EN+9*, EN+10, EN+18, FILE1+2 |
DGEVNDT | EN+1~, EN+27*, FILE1+3, FILE1+9, FILE1+14 |
DGHTH | EN~, EN+5!, EN+15, EN+32 |
DGHTH("CONSULT" | EN+18, EN+19* |
DGHTH("COORD" | EN+21, EN+22* |
DGHTH("DA" | FILE+3, HTADD+5*, FILE1+1, FILE1+7, FILE1+8, FILE1+9*, FILE1+13, MIDUPD+2 |
DGHTH("DFN" | EN+10* |
DGHTH("DGTYPE" | EN+6*, EN+24 |
DGHTH("EVENTDT" | EN+27* |
DGHTH("VENDOR" | EN+13* |
DGIEN | DSPREC~, DSPREC+5, DSPREC+6 |
DGMID | EN~, EN+45*, MIDUPD+3 |
DGPRV | EN~, EN+21*, EN+22, FILE1+2 |
DGRN | FILE+1~, HTADD+1*, HTADD+4, FILE1+9* |
DGTMP | GCONSULT+6~ |
DGTMP( | GCONSULT+13 |
DGTMP(0 | GCONSULT+11 |
DGTREVN | FILE+1~, FILE+2*, HTADD+5*, FILE1+3, FILE1+14 |
DGTYPE | EN+1~, SGNUPCHK+10, SGNUPCHK+11, FILE1+14 |
DGVEN | EN~, EN+12*, EN+13, EN+39, FILE1+2 |
DIC | GETPAT+4~, GETPAT+5*, CONHELP+1~, CONHELP+8*, FILE+1~, HTADD+4*, FILE1+6!, FILE1+10* |
DIC("A" | GETPAT+5* |
DIC("P" | FILE1+7* |
DIC(0 | GETPAT+5*, CONHELP+8*, HTADD+4*, FILE1+7* |
DIE | FILE+1~, FILE1+1*, FILE1+13*, MIDUPD+1~, MIDUPD+4* |
DINUM | FILE+1~, HTADD+4* |
DIR | SGNUPCHK+6~, GETVEN+5~, GCONSULT+6~, GETPROV+5~, SNDMSG+5~ |
DIR("?" | SGNUPCHK+16*, GETVEN+7*, GCONSULT+15*, GETPROV+7*, SNDMSG+8* |
DIR("A" | SGNUPCHK+15*, GETVEN+6*, GCONSULT+18*, GETPROV+6*, SNDMSG+7* |
DIR("B" | SGNUPCHK+15*, GCONSULT+19*, GETPROV+8*, SNDMSG+6* |
DIR(0 | SGNUPCHK+15*, GETVEN+6*, GCONSULT+18*, GETPROV+6*, SNDMSG+6* |
DIRUT | GETVEN+5~, GCONSULT+6~, GETPROV+5~, SNDMSG+5~ |
DO | FILE1+6! |
DR | FILE+1~, FILE1+2*, FILE1+3*, FILE1+12!, FILE1+14*, MIDUPD+1~, MIDUPD+3* |
DR(2 | FILE1+14*, MIDUPD+3* |
DTOUT | SGNUPCHK+6~, GETPAT+4~, GETVEN+5~, GCONSULT+6~, GETPROV+5~, SNDMSG+5~ |
DUOUT | SGNUPCHK+6~, GETPAT+4~, GETVEN+5~, GCONSULT+6~, GETPROV+5~, SNDMSG+5~ |
DUZ | FILE1+14 |
GETOK | EN~, EN+24*, EN+25 |
>> HLA("HLS" | EN+2 |
IENVAL | GETPAT+4~, GETPAT+7* |
IOF | SGNUPCHK+13 |
NODE | PATOK+4~, PATOK+8*, PATOK+9, PATOK+11 |
RESULT | EN~, EN+32*, EN+33, EN+34, EN+35, EN+39*, EN+40, EN+42, EN+45, EN+47 |
STOP | EN~, EN+3*, EN+4, EN+9* |
TYPE | SNDMSG~, SNDMSG+7 |
VENDOR | EN+1~, SGNUPCHK+10, SGNUPCHK+11 |
X | SGNUPCHK+6~, SGNUPCHK+7*, SGNUPCHK+8, SGNUPCHK+9, GETPAT+4~, GETVEN+5~, GCONSULT+6~, GETPROV+5~, SNDMSG+5~, FILE+1~ , HTADD+4*, FILE1+9*, MIDUPD+1~ |
XX | CONHELP+1~, CONHELP+4*, CONHELP+5, CONHELP+6, CONHELP+7 |
Y | SGNUPCHK+6~, SGNUPCHK+17, SGNUPCHK+21, GETPAT+4~, GETPAT+6, GETPAT+7, GETPAT+8, GETVEN+5~, GETVEN+9, GCONSULT+6~ , GCONSULT+22, GETPROV+5~, GETPROV+10, SNDMSG+5~, SNDMSG+10, FILE+1~, HTADD+5, MIDUPD+1~ |