DGMTU4 ;ALB/CJM,SCG,LBD,EG,PHH MEANS TEST UTILITES ; 06/07/2005
Source file <DGMTU4.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SET | ||
RXPRIME(RXIEN) | ;
|
|
GETSITE(DUZ) | ;
|
|
GETINCOM(DFN,TDATE) | ;
|
|
SAVESTAT(MTIEN,DGERR) | ;
|
|
MTPRIME(MTIEN) | ;
|
|
OLD(TESTDATE) | ;
|
|
CHKPT(DFN) | ;
; Cross check the CURRENT MEANS TEST STATUS in the PATIENT File (#2) with the ; primary means test in the ANNUAL MEANS TEST File (#408.31). Update the ; CURRENT MEANS TEST STATUS if the fields are out of synch. |
|
QRXPRIME | ;
|
|
DATETIME(MTIEN) | ;
|
|
TRANSFER(DFN,FROM,TO) | ;
|
Name | Field # of Occurrence |
---|---|
$$UPD^DGENDBS | DATETIME+5, SET, MTPRIME+29, MTPRIME+35, MTPRIME+38, MTPRIME+47, MTPRIME+51, MTPRIME+69, RXPRIME+31, RXPRIME+38 , RXPRIME+45, TRANSFER+11, CHKPT+14 |
PRIOR^DGMTEVT | MTPRIME+16, MTPRIME+27, RXPRIME+29, RXPRIME+61 |
$$GETCODE^DGMTH | SAVESTAT+20 |
$$GETSTAT^DGMTH | SAVESTAT+28, MTPRIME+68 |
EN^DGMTR | MTPRIME+74, RXPRIME+55 |
QUE^DGMTR | MTPRIME+58, RXPRIME+63 |
COPYRX^DGMTR1 | MTPRIME+76 |
$$LST^DGMTU | MTPRIME+24, MTPRIME+32, MTPRIME+41, RXPRIME+26, RXPRIME+34, GETINCOM+14, GETINCOM+15, CHKPT+10 |
TRANSFER^DGMTU4 | GETINCOM+24 |
$$GET1^DIQ | CHKPT+9 |
$$SITE^VASITE | GETSITE+11, GETSITE+13 |
$$FMDIFF^XLFDT | OLD+4 |
$$NOW^XLFDT | DATETIME+4 |
$$STA^XUAF4 | GETSITE+12, GETSITE+17, GETSITE+20 |
CHILDREN^XUAF4 | GETSITE+16, GETSITE+19 |
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGMT(408.22 - [#408.22] | TRANSFER+8 |
^DGMT(408.31 - [#408.31] | DATETIME+5, SAVESTAT+18, MTPRIME+6, MTPRIME+8, MTPRIME+10, MTPRIME+46, MTPRIME+50, RXPRIME+8, RXPRIME+10, RXPRIME+12 , CHKPT+11 |
^DPT - [#2] | CHKPT+8 |
Name | Line Occurrences |
---|---|
$$OLD | MTPRIME+20, MTPRIME+50, MTPRIME+63, RXPRIME+22, RXPRIME+36, RXPRIME+50 |
QRXPRIME | RXPRIME+40 |
SET | SAVESTAT+17 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACTVIEN | GETINCOM+8~, GETINCOM+13*, GETINCOM+20*, GETINCOM+21*, GETINCOM+22*, GETINCOM+23*, GETINCOM+24 |
CHILD | GETSITE+8~ |
CHILD("C" | GETSITE+17, GETSITE+20 |
CIEN | GETSITE+8~, GETSITE+17*, GETSITE+20* |
CODE | SAVESTAT+16~, SAVESTAT+20*, SAVESTAT+21, SAVESTAT+23, SAVESTAT+24, SAVESTAT+25, SAVESTAT+28, SAVESTAT+29, GETINCOM+8~, GETINCOM+13* , GETINCOM+20*, GETINCOM+21* |
CURSTN | GETSITE+8~, GETSITE+13*, GETSITE+17, GETSITE+20 |
DATA | DATETIME+2~, DATETIME+5, SAVESTAT+16~, SET, MTPRIME+3~, MTPRIME+25~, MTPRIME+29, MTPRIME+33~, MTPRIME+35, MTPRIME+38! , MTPRIME+47~, MTPRIME+51~, MTPRIME+67!, MTPRIME+69, RXPRIME+3~, RXPRIME+27~, RXPRIME+31, RXPRIME+35~, RXPRIME+38, RXPRIME+44! , RXPRIME+45, TRANSFER+3~, TRANSFER+9!, TRANSFER+11, CHKPT+5~, CHKPT+14 |
DATA( | DATETIME+4*, SAVESTAT+17*, SAVESTAT+21*, SAVESTAT+22*, SAVESTAT+26*, SAVESTAT+28*, SAVESTAT+29*, MTPRIME+68*, CHKPT+11*, CHKPT+12 |
DATA(2 | MTPRIME+29*, MTPRIME+35*, MTPRIME+38*, MTPRIME+47*, MTPRIME+51*, RXPRIME+31*, RXPRIME+38*, RXPRIME+45* |
DATA(31 | TRANSFER+10* |
DFN | MTPRIME+3~, MTPRIME+8*, MTPRIME+9, MTPRIME+24, MTPRIME+32, MTPRIME+41, MTPRIME+76, RXPRIME+3~, RXPRIME+10*, RXPRIME+11 , RXPRIME+26, RXPRIME+34, TRANSFER~, TRANSFER+4, TRANSFER+8, GETINCOM~, GETINCOM+10, GETINCOM+14, GETINCOM+15, GETINCOM+24 , CHKPT~, CHKPT+7, CHKPT+8, CHKPT+9, CHKPT+10, CHKPT+14 |
DGADDF | MTPRIME+3~, MTPRIME+70*, RXPRIME+3~, RXPRIME+51* |
DGDOM1 | MTPRIME+3~, MTPRIME+76, RXPRIME+3~ |
DGERR | SAVESTAT~, SAVESTAT+17 |
DGINI | TRANSFER+3~, TRANSFER+8* |
DGINR | TRANSFER+3~, TRANSFER+8*, TRANSFER+11 |
DGMSGF | MTPRIME+3~, MTPRIME+70*, RXPRIME+3~, RXPRIME+51* |
DGMT | RXPRIME+3~ |
DGMTA | MTPRIME+3~, RXPRIME+3~ |
DGMTACT | MTPRIME+3~, MTPRIME+15*, MTPRIME+27*, RXPRIME+3~, RXPRIME+29*, RXPRIME+60* |
DGMTCOR | RXPRIME+3~, RXPRIME+59 |
DGMTDC | MTPRIME+3~ |
DGMTE | RXPRIME+3~ |
DGMTI | MTPRIME+3~, MTPRIME+27*, MTPRIME+56*, MTPRIME+71*, RXPRIME+3~, RXPRIME+29*, RXPRIME+62*, CHKPT+5~, CHKPT+10*, CHKPT+11 |
DGMTINF | MTPRIME+3~, MTPRIME+57*, MTPRIME+72*, RXPRIME+3~, RXPRIME+17* |
DGMTP | MTPRIME+3~, RXPRIME+3~ |
DGRAUTO | RXPRIME+3~ |
DGREQF | MTPRIME+3~, MTPRIME+76, RXPRIME+3~ |
DT | MTPRIME+21, RXPRIME+23, OLD+4 |
DUZ | GETSITE~, GETSITE+10 |
DUZ(2 | GETSITE+10 |
ERROR | TRANSFER+3~, TRANSFER+11 |
FACILITY | GETSITE+8~, GETSITE+9*, GETSITE+10*, GETSITE+11*, GETSITE+12, GETSITE+16, GETSITE+19 |
FROM | TRANSFER~, TRANSFER+5, TRANSFER+7, TRANSFER+8 |
IBPRIOR | MTPRIME+3~ |
IVMMTDT | GETINCOM+8~, GETINCOM+12*, GETINCOM+14, GETINCOM+15 |
>> IVMZ10 | DATETIME+3, MTPRIME+55 |
LSTNODE | MTPRIME+3~, MTPRIME+41*, MTPRIME+46, MTPRIME+47, MTPRIME+50, MTPRIME+51 |
MTDATE | MTPRIME+3~, MTPRIME+11*, MTPRIME+12, MTPRIME+20, MTPRIME+23, MTPRIME+24, MTPRIME+32, MTPRIME+50, MTPRIME+63, RXPRIME+13* , RXPRIME+14, RXPRIME+22, RXPRIME+25, RXPRIME+26, RXPRIME+34, RXPRIME+50 |
MTIEN | DATETIME~, DATETIME+5, SAVESTAT~, SAVESTAT+14, SAVESTAT+18, SET, MTPRIME~, MTPRIME+4, MTPRIME+6, MTPRIME+8 , MTPRIME+10, MTPRIME+38, MTPRIME+46, MTPRIME+50, MTPRIME+56, MTPRIME+69, MTPRIME+71, MTPRIME+76, RXPRIME+3~ |
MTNODE | GETINCOM+8~, GETINCOM+14*, GETINCOM+20, GETINCOM+22, GETINCOM+24 |
MTPRIME | MTPRIME+3~, MTPRIME+5* |
NODE | MTPRIME+3~, MTPRIME+6*, MTPRIME+7, MTPRIME+11, MTPRIME+13, MTPRIME+24*, MTPRIME+27, MTPRIME+29, MTPRIME+32*, MTPRIME+35 , RXPRIME+3~, RXPRIME+8*, RXPRIME+9, RXPRIME+13, RXPRIME+15, RXPRIME+26*, RXPRIME+29, RXPRIME+31, RXPRIME+34*, RXPRIME+36 , RXPRIME+38 |
NODE0 | SAVESTAT+16~, SAVESTAT+18*, SAVESTAT+19, SAVESTAT+20, SAVESTAT+26, SAVESTAT+27, SAVESTAT+28, SAVESTAT+29 |
PATMT | CHKPT+5~, CHKPT+9*, CHKPT+12 |
QUIT | RXPRIME+3~, RXPRIME+7*, RXPRIME+36*, RXPRIME+40 |
RXIEN | RXPRIME~, RXPRIME+5, RXPRIME+8, RXPRIME+10, RXPRIME+12, RXPRIME+45, RXPRIME+62 |
RXNODE | GETINCOM+8~, GETINCOM+15*, GETINCOM+21, GETINCOM+23, GETINCOM+24 |
RXPRIME | RXPRIME+3~, RXPRIME+6* |
STATION | GETSITE+8~, GETSITE+12*, GETSITE+14, GETSITE+15, GETSITE+17*, GETSITE+18, GETSITE+20*, GETSITE+21 |
TDATE | GETINCOM~, GETINCOM+9, GETINCOM+12 |
TESTDATE | OLD~, OLD+4 |
TO | TRANSFER~, TRANSFER+6, TRANSFER+7, TRANSFER+10 |
TRIES | MTPRIME+3~, MTPRIME+24*, MTPRIME+27, MTPRIME+32*, RXPRIME+3~, RXPRIME+26*, RXPRIME+29, RXPRIME+34* |
TYPE | SAVESTAT+16~, SAVESTAT+19*, SAVESTAT+23, SAVESTAT+24, SAVESTAT+25, SAVESTAT+29 |
U | SAVESTAT+28, MTPRIME+46, MTPRIME+50, CHKPT+11 |
YREND | MTPRIME+3~, MTPRIME+21*, MTPRIME+23*, MTPRIME+24, MTPRIME+32, RXPRIME+3~, RXPRIME+23*, RXPRIME+25*, RXPRIME+26, RXPRIME+34 |