VAFCMGU0 ;ALB/JRP-MERGE SCREEN UTILITIES ;10/18/96
Source file <VAFCMGU0.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
REPEAT(CHAR,TIMES) | ||
INSERT(INSTR,OUTSTR,COLUMN,LENGTH) | ||
CENTER(CNTRSTR,MARGIN) | ;Center a string
|
|
IN2EXDT(DATE,STYLE) | ;Converts dates from internal to external format
|
|
EX2INDT(DATE) | ;Converts dates from external to internal format
|
|
NOW(FMFORM,NOTIME) | ;Returns current date/time
|
|
GETDATA(DFN,GROUP,TARGET,MESSAGE) | ;Get local data required to build
; merge screens for a given patient |
|
COUNTY(DFN) | ;Return county name that patient lives in
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GETS^DIQ |
5.01 | GETS^DIQ |
Name | Line Occurrences |
---|---|
$$INSERT | CENTER+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | NOW+15~, NOW+19, NOW+21*, NOW+22, NOW+23 |
%DT | IN2EXDT+19~, EX2INDT+11~, EX2INDT+17* |
%H | NOW+15~ |
%I | NOW+15~ |
CHAR | REPEAT~, REPEAT+8, REPEAT+11 |
CNTRSTR | CENTER~, CENTER+10, CENTER+13 |
COLUMN | INSERT~, INSERT+16*, INSERT+21, INSERT+23 |
DATE | IN2EXDT~, IN2EXDT+12*, IN2EXDT+13, IN2EXDT+14, IN2EXDT+17, IN2EXDT+21, EX2INDT~, EX2INDT+8*, EX2INDT+9, EX2INDT+13* , EX2INDT+14*, EX2INDT+15*, EX2INDT+16 |
DFN | GETDATA~, GETDATA+22*, GETDATA+31, COUNTY~, COUNTY+7*, COUNTY+11 |
END | INSERT+19~, INSERT+23*, INSERT+25 |
FIELDS | GETDATA+30~, GETDATA+34*, GETDATA+37*, GETDATA+42*, GETDATA+45*, GETDATA+47 |
FMFORM | NOW~, NOW+12*, NOW+19 |
FRONT | INSERT+19~, INSERT+21*, INSERT+25 |
GROUP | GETDATA~, GETDATA+23*, GETDATA+24*, GETDATA+36, GETDATA+41, GETDATA+44 |
IENS | GETDATA+30~, GETDATA+31*, GETDATA+47, COUNTY+9~, COUNTY+11*, COUNTY+12, COUNTY+13, COUNTY+14, COUNTY+17*, COUNTY+18 , COUNTY+20 |
INSTR | INSERT~, INSERT+14, INSERT+17, INSERT+25 |
LENGTH | INSERT~, INSERT+17*, INSERT+23, INSERT+25 |
MARGIN | CENTER~, CENTER+11*, CENTER+13 |
MESSAGE | GETDATA~, GETDATA+27*, GETDATA+28*, GETDATA+47 |
NOTIME | NOW~, NOW+13*, NOW+19, NOW+23 |
OUT | NOW+15~, NOW+22*, NOW+23*, NOW+24 |
OUTSTR | INSERT~, INSERT+15, INSERT+16, INSERT+21, INSERT+23 |
PTRCNTY | COUNTY+9~, COUNTY+14*, COUNTY+15, COUNTY+17 |
PTRSTATE | COUNTY+9~, COUNTY+13*, COUNTY+15, COUNTY+17 |
STYLE | IN2EXDT~, IN2EXDT+15*, IN2EXDT+17 |
TARGET | GETDATA~, GETDATA+25*, GETDATA+26*, GETDATA+47 |
TIMES | REPEAT~, REPEAT+9, REPEAT+11 |
TMP | COUNTY+9~ |
TMP( | COUNTY+20 |
TMP(2 | COUNTY+13, COUNTY+14 |
X | EX2INDT+11~, EX2INDT+16*, NOW+15~, NOW+19 |
Y | IN2EXDT+19~, IN2EXDT+21*, IN2EXDT+23, EX2INDT+11~, EX2INDT+19, EX2INDT+20 |