English	French	Notes	Complete/Exclude
'YES' will invoke the ScreenMan editor.			
The same questions are asked in both screen & scrolling mode.			
EARLIEST DATE (OPTIONAL)^D^^1			
LATEST DATE^RD^^3			
CAN DATE BE IMPRECISE (Y/N)^S^Y:YES;N:NO;^4^Q			
E.G., WOULD 'FEB, 1980' BE ALLOWED?			
CAN TIME OF DAY BE ENTERED (Y/N)^S^Y:YES;N:NO;^5^S:X=			
CAN SECONDS BE ENTERED (Y/N)^S^Y:YES;N:NO;^6^S DG(6)=X			
CAN USER ENTER TIME ALONG WITH DATE, AS IN 'JULY 20@4:30'?			
IS TIME REQUIRED (Y/N)^S^Y:YES;N:NO;^7^Q			
MUST USER ENTER TIME ALONG WITH DATE			
TYPE A DATE BETWEEN 			
INCLUSIVE LOWER BOUND^R^^1^K:+X'=X			
INCLUSIVE UPPER BOUND^R^^2^K:X<DG(1)!(+X'=X)			
IS THIS A DOLLAR AMOUNT (Y/N)^S^Y:YES;N:NO;^3^Q			
MAXIMUM NUMBER OF FRACTIONAL DIGITS^RN^^5^K:X'?1N X			
Type a 			
Number^Dollar Amount			
 Decimal Digit			
WILL 			
 FIELD BE MULTIPLE			
FOR A GIVEN ENTRY, WILL THERE BE MORE THAN 1 			
 ON FILE AT ONCE?			
SUBSCRIPT: 			
Control Characters are not allowed.			
CAN'T BE <			
  TYPE A NUMBER FROM 1 TO 99			
OR AN $EXTRACT RANGE (E.G., 			
CURRENTLY ASSIGNED:			
PIECE 			
FIELD #			
 ALREADY USED FOR 			
CAN'T STORE A 			
 FIELD IN AN ALREADY-USED SUBSCRIPT!			
This is Standard MUMPS code.			
 TOO MUCH TO STORE AT THAT SUBSCRIPT!			
SHALL THIS TEXT NORMALLY APPEAR IN WORD-WRAP MODE			
ANSWER 'YES' IF THE INTERNALLY-STORED '			
SHOULD NORMALLY BE PRINTED OUT IN FULL LINES, BREAKING AT WORD BOUNDARIES.			
ANSWER 'NO' IF THE INTERNAL TEXT SHOULD NORMALLY BE PRINTED OUT			
LINE-FOR-LINE AS IT STANDS.			
   (FIELD DEFINITION IS NOT EDITABLE)			
  <DATA DEFINITION UNCHANGED>			
DATA TYPE OF 			
, JUST HIT THE SPACE KEY			
ADDING A NEW ;?			
Field Definition is TOO LONG by 			
NUMBER MUST BE BETWEEN 			
 AND NOT ALREADY IN USE			
SUB-DICTIONARY NUMBER: 			
Required Index for Variable Pointer			
TRANSLATES TO THE FOLLOWING CODE:			
FIELD IS 'MULTIPLE-VALUED'!			
TYPE OF RESULT: 			
NUMBER OF FRACTIONAL DIGITS TO OUTPUT: 			
Enter the number of decimal digits that should normally appear in the result.			
SHOULD VALUE ALWAYS BE INTERNALLY ROUNDED TO 			
 DECIMAL PLACE			
WHEN TOTALLING THIS FIELD, SHOULD THE SUM BE COMPUTED FROM			
THE SUMS OF THE COMPONENT FIELDS			
LENGTH OF FIELD: 			
Maximum number of character expected to be output.			
POINT TO WHAT FILE			
OK TO DELETE '			
' FIELDS IN THE EXISTING ENTRIES			
KiRW			
Enter a MUMPS statement that sets DIC(			
) to code that sets $T.			
Those entries for which $T=1 will be selectable.			
The naked reference will be at the zeroeth node of the pointed to			
file, e.g., ^DIZ(9999,Entry Number,0).  The internal entry number			
of the entry that is being processed in the pointed to file will be			
in the variable Y.			
The variable Y will be equal to the internally-stored code of the item			
in the set which is being processed.			
POINT TO WHICH FILE: 			
WILL NOT 			
SHOULD 			
SHOULD '			
' ENTRIES BE SCREENED			
Answer YES if there is a condition which should prohibit			
selection of some entries.			
ENTER A TRUTH-VALUED EXPRESSION WHICH MUST BE TRUE OF ANY ENTRY POINTED TO:			
TOO COMPLICATED!			
WARNING-- THIS DOESN'T LOOK LIKE A TRUTH-VALUED EXPRESSION			
MUMPS CODE THAT WILL SET 'DIC(			
WARNING - Screen Does Not Contain DIC(			
EXPLANATION OF SCREEN: 			
An explanation must be entered.			
 FILE ENTRY' (			
BE ALLOWED WHEN ANSWERING THE 			
INTERNALLY-STORED CODE: 			
  WILL STAND FOR: 			
For Example: Internal Code 'M' could stand for 'MALE'			
SORRY, ';' ':' '^' '			
' AND '=' AREN'T ALLOWED IN SETS!			
Cannot use CONTROL CHARACTERS!			
TOO MUCH!! -- SHOULD BE 'POINTER', NOT 'SET'			
MINIMUM LENGTH^NR^^1^K:X\1'=X!(X<1) X			
MAXIMUM LENGTH^RN^^2^K:X\1'=X!(X>250)!(DG(1)>X) X			
(OPTIONAL) PATTERN MATCH (IN 'X')^^^3^S X=			
EXAMPLE: 			
Answer must be 			
 in length.			
 DD AUDIT^.6I			
CROSS REFERENCE^1			
SOMEONE ELSE IS EDITING THIS FILE			
NOTE THAT THIS FIELD'S DEFINITION IS NOT EDITABLE			
Multiple 			
Editing '			
'EARLIEST DATE' & 'LATEST DATE' ARE IN WRONG ORDER			
CURRENT DATE			
TYPE A DATE NOT EARLIER THAN 			
(No range limit on date)			
'MINIMUM' & 'MAXIMUM' ARE IN WRONG ORDER			
number^Dollar amount			
SORRY -- '			
' NOT ALLOWED IN SET VALUES!			
THERE MUST BE A CODE FOR '			
CAN'T HAVE TWO IDENTICAL CODES!			
' MUST MEAN SOMETHING!			
TOO MUCH!!  TO STORE THAT MUCH, BUILD A NEW FILE AND USE A POINTER!			
DICATT SCREEN			
 in length			
DUPLICATE FILE NUMBER			
MESSAGE REQUIRED			
ORDER NUMBER REQUIRED			
DUPLICATE ORDER NUMBER			
PREFIX REQUIRED			
BAD PREFIX			
DUPLICATE PREFIX			
SCREEN MUST HAVE EXPLANATION			
ERROR IN VARIABLE-POINTER SPECIFICATIONS, FILE 			
Enter Standard MUMPS code			
Required for Variable Pointer			
DICATT MUL			
NAME AND TITLE MUST BE DIFFERENT			
YOUR REDEFINITION OF THE FIELD WOULD CAUSE TOO MUCH DATA STORAGE!			
DATA-STORAGE INFO INCOMPLETE			
FIELD DEFINITION IS TOO LONG!			
FIELD DELETED!			
Enter name of MUMPS Global subscript where this Field's data will be stored.			
Already assigned:			
Another Field is already stored at '			
A multiple field is already stored at '			
Too much to store at the '			
Can't be less than 			
Already used for '			
Can't store by $EXTRACT in the same subscript with $PIECES			
Type a number from 1 to 99			
 or an $EXTRACT range such as 			
Currently assigned: 			
This cross-reference cannot be deleted.			
Are you sure that you want to delete the CROSS-REFERENCE 			
Answer YES if you want to delete the Cross-Reference.			
DO YOU WANT THE INDIVIDUAL CROSS-REFERENCE VALUES DELETED			
CURRENT CROSS-REFERENCE			
NO 			
WANT TO 			
 ONE OF THEM			
WHICH NUMBER: 			
CURRENT CROSS-REFERENCES:			
' INDEX OF 			
NO EFFECT			
DO YOU WANT TO EXECUTE THE OLD KILL LOGIC NOW			
Enter 'YES' to execute the original kill logic now.			
Otherwise, enter 'NO'.			
Executing old kill logic...			
Choose E (Edit)/D (Delete)/C (Create): 			
Enter 'E' to edit an existing X-reference			
      'D' to delete it			
      'C' to create a new X-reference.			
CROSS-REFERENCE			
WANT TO CREATE A NEW 			
 FOR THIS FIELD			
CROSS-REFERENCE NUMBER: 			
 WHOLE FILE BY THIS FIELD			
 BY THIS FIELD			
WANT 			
 TO BE USED FOR LOOKUP AS WELL AS FOR SORTING			
PARSE ON THE FOLLOWING CHARACTERS: 			
Please enter the punctuation marks (except quotes) which will be used to 			
separate the words in this field.			
INDEX: 			
DO YOU WANT TO CROSS-REFERENCE EXISTING DATA NOW			
Enter 'YES' to execute the new set logic now.			
You may use the number shown if you are the custodian of the file this			
cross-reference is in.  If you are not the custodian of the file, you			
should select a number that corresponds with a numberspace for which you			
have custody.  Questions regarding numberspace custody may be referred			
WANT TO PROTECT THE '			
' FIELD, SO THAT			
IT CAN'T BE CHANGED BY THE 'ENTER & EDIT' ROUTINE			
HEY, WHILE WE WERE TALKING, SOMEONE ELSE CREATED CROSS-REFERENCE #			
...CROSS-REFERENCE IS SET			
DO YOU WANT TO RUN THE CROSS-REFERENCE FOR EXISTING ENTRIES NOW			
WHEN THE 			
IS CHANGED,			
WHAT FIELD SHOULD BE 'TRIGGERED': 			
SW?			
INTERNAL(			
YOU MUST IDENTIFY SOME FIELD, EITHER WITHIN THE			
' FILE OR IN SOME OTHER			
SORRY, I AM CONFUSED			
CAN'T UPDATE A 'NUMBER' FIELD!			
CAN'T HAVE A FIELD TRIGGERING ITSELF!!!			
YOU DON'T HAVE 'DATA DEFINITION' ACCESS TO			
CAN'T TRIGGER A RESTRICTED			
DIV(			
CAN'T TRIGGER A COMPUTED FIELD!			
TRIGGERED 			
IN ANSWERING THE FOLLOWING QUESTION, '			
CAN BE USED TO REFER TO THE EXISTING TRIGGERED FIELD VALUE.			
PLEASE ENTER AN EXPRESSION WHICH WILL BECOME THE VALUE OF THE			
BUT THE TRIGGERING FIELD DEPENDS ON THE TRIGGERED FIELD!			
WARNING -- THIS SHOULD PRODUCE A DATE VALUE, AND IT MAY NOT!			
WARNING -- THIS MUST BE '			
WARNING--THIS TRUTH-VALUED EXPRESSION WILL PRODUCE ONLY VALUES OF '0' OR '1'			
WARNING -- THIS MAY PRODUCE A 'DATE', AND IT SHOULDN'T!			
OLD 			
NOTE: '			
' CAN BE USED TO REFER TO THE VALUE OF THE			
 FIELD BEFORE ITS CHANGE OR DELETION.			
DIK=			
DA=			
DIK(			
 WHENEVER THE '			
' FIELD IS 			
ENTERED OR CHANGED^CHANGED OR DELETED			
ARE YOU SURE YOU WANT TO 'ADD A NEW ENTRY' WHEN THIS 			
 LOGIC OCCURS			
..OK, LET ME THINK A SECOND...			
TING OF '			
SORRY, CAN'T DO THIS WHEN 'LAYGO' ALLOWED			
DO YOU WANT TO MAKE THE 			
ENTER AN EXPRESSION FOR THE CONDITION: 			
CREATE CONDITION			
ENTER A TRUTH-VALUED 'COMPUTED-FIELD' EXPRESSION 			
(PERHAPS INVOLVING '			
WARNING--THIS DOESN'T LOOK LIKE A CONDITION EXPRESSION!			
TE CONDITION			
SENDING OF '			
ENTER THE NAME OF A 'BULLETIN' MESSAGE, IF YOU WANT THAT MESSAGE SENT			
PARAMETER #			
NOW, IF THE BULLETIN IS TO HAVE 			
 OR MORE PARAMETERS INSERTED,			
ENTER A FIELD NAME (FOR EXAMPLE, '			
OR A 'COMPUTED-FIELD' EXPRESSION,			
THE VALUE OF WHICH WILL BE PASSED INTO THE '			
AS 			
(NOTE THAT NO SUCH PARAMETER IS DEFINED FOR THE '			
TE 			
DIIND))[0  X ^(DIIND)			
Lookup values			
ABCKMOPQSUXfglpqtv4			
Indexes			
JUST LOOKING			
MORE?			
DINDEX(			
DISCREEN(			
Mp			
Ne			
FROM values			
target array			
BIKMPQSUfhu			
Index			
NO B			
FID(			
DIXV(			
Whole File Screen			
Screen Parameter			
TRY NEXT			
DIEN):1			
NEW PERSON			
By '			
', do you mean 			
Cross-reference			
', do you mean the 			
pointing via its '			
INTERNAL(#			
WILL TERMINAL USER BE ALLOWED TO SELECT PROPER ENTRY IN '			
DO YOU WANT TO PERMIT ADDING A NEW '			
WELL THEN, DO YOU WANT TO **FORCE** ADDING A NEW ENTRY EVERY TIME			
DO YOU WANT AN 'ADDING A NEW 			
SORRY, CAN'T EDIT A RESTRICTED			
', do you mean the '			
 code that we got back from RCR becomes what we eXecute for every multiple!			
MPh			
MPQh			
DICRVAL(			
DIH=+$P(			
DA,			
OUTPUT FROM			
AUDIT FROM			
   NO AUDIT ENTRIES			
  No DD AUDIT entries!			
DD AUDIT			
INPUT TO			
 WHAT FILE: 			
DUZ,			
  There are no selectable files.			
####################	####################	####################	
####################	####################	####################	
####################	####################	####################	
####################	####################	####################	
####################	####################	####################