Routine: LRMISTF

Information

LRMISTF ;SLC/CJS/BA - MASS DATA ENTRY INTO FILE 63.05 ;4/24/89 14:40 ; [ 04/14/2003 10:04 AM ]

Package	Total	Call Graph
Lab Service	6	(,STD)^LRCAPV ^LRGVK ANN^LRMIEDZ ^LRMISTF1 LRAA^LRMIUT ^LRPARAM
VA Fileman	2	^%DT ^DIC

Package	Total	Caller Graph
Lab Service	1	LRMISTUF

Name	Comments	DBIA/ICR reference
ACCESS
ASK
BEGIN	;D ^LRPARAM Q:$G(LREND) S LREND=0,LRVT="RE",LRSBS="13^11.6^11.57^11.58^17^15.51^21^19.6^27^24^37",(Z(13),Z(11.6),Z(11.57),Z(11.58))=1,(Z(17),Z(15.51))=5,(Z(21),Z(19.6))=8,(Z(27),Z(24))=11,Z(37)=16
END
INFO

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"You're not cleared for this option. You must have the LRVERIFY Key." Line Location: ACCESS+0
Function Call: WRITE	Prompt: !?5,"Accession Area LR SUBSCRIPT is misssing.",! Line Location: ASK+1
Function Call: WRITE	Prompt: "Test does not have an appropriate entry in the EDIT CODE" Line Location: ASK+7
Function Call: READ	Prompt: "Preliminary or Final: " Formatting: ! Timeout: DTIME Variable: X Line Location: ASK+8
Function Call: WRITE	Prompt: !,"Enter ""P"" or ""F""." Line Location: ASK+8
Function Call: WRITE	Prompt: !,LRMF Line Location: ASK+10
Function Call: READ	Timeout: DTIME Line Location: ASK+12
Function Call: WRITE	Prompt: !,"Enter a number between 1 and 3.",!,"1. Automatically enters the result you specify. You cannot change the entries." Line Location: INFO+0
Function Call: WRITE	Prompt: !,"2. Automatically enters the result you specify, you can see and change entries",!,"3. Prompts with the field name. Does not automatically enter data.",!! Line Location: INFO+1
Routine Call	DIC Line Location: ASK+4 ASK+11

FileNo	Call Tags
^LAB(60 - [#60]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD(63.05	ASK+10, ASK+11
^LAB(60 - [#60]	ASK+5
^LAB(62.07 - [#62.07]	ASK+5
^LRO(68 - [#68]	ASK
^XTMP("LRCAP"	BEGIN+7
^XUSEC("LRVERIFY"	ACCESS

Name	Line Occurrences
ASK	BEGIN+6
INFO	ASK+12

Name	Field # of Occurrence
^(	ASK+5

Name	Field # of Occurrence
%	END+3!
>> %DT	ASK+3*
>> %DT("A"	ASK+3*!
AGE	END+3!
D1	END+3!
DA	END+3!
DFN	END+3!
DIC	END+3!, ASK+4!, ASK+10!, ASK+11!
DIC("A"	ASK+4, ASK+11
DIC("S"	ASK+4, ASK+11
DIC(0	ASK+4, ASK+11
DIE	END+3!
DLAYGO	END+3!
DOB	END+3!
DQ	END+3!
DR	END+3!
DT	ASK+3
DTIME	ASK+8, ASK+12
DUZ	ACCESS, BEGIN+7
H9	END+3!, ASK+10, ASK+11, ASK+14
HRCN	END+3!
I	END+3!, ASK+8, ASK+12
J	END+3!
K	END+3!
LRAA	END+3!, ASK
LRAD	END+3!, ASK+3*
LRAN	END+3!
LRCDT	END+3!
LRCO	END+3!
>> LRCSQ	BEGIN+7
LRDFN	END+3!
LRDPF	END+3!
LRECODE	END+3!, ASK+5*, ASK+6
LREND	BEGIN+2*, END+3!, ASK+2
LRIDT	END+3!
LRLLOC	END+3!
LRMF	END+3!, ASK+10, ASK+11
LRMIMASS	BEGIN+5*, END+6!
LRMODE	END+3!, ASK+13*, ASK+14
LRNOP	END+3!
LROK	END+3!
>> LRPARAM	ASK+2
LRPF	END+3!, ASK+9*
LRSB	END+3!, ASK+6!, ASK+10, ASK+11*
LRSB(	ASK+6*
LRSB(0	ASK+10
LRSBCNT	END+3!, ASK+6*, ASK+7, ASK+10, ASK+11
LRSBS	BEGIN+2*, END+3!, ASK+6
LRSCREEN	END+3!, ASK+14*
>> LRSS	ASK*, ASK+1
LRTEST	END+3!, ASK+4*, ASK+5
LRVT	BEGIN+2*, END+3!
LRWRD	END+3!
PNM	END+3!
POP	END+3!
R	END+3!
SEX	END+3!
SSN	END+3!
U	ASK, ASK+2, ASK+3, ASK+5, ASK+6, ASK+8, ASK+9, ASK+10, ASK+11, ASK+12 , ASK+13
X	END+3!, ASK+3, ASK+6, ASK+8, ASK+9, ASK+12*, ASK+13
X1	END+3!, ASK+6*
X2	END+3!, ASK+6*
Y	END+3!, ASK+3*, ASK+4, ASK+11
Z	END+3!
Z(	BEGIN+2*, ASK+10, ASK+11
Z(13	BEGIN+2*
Z(17	BEGIN+2*
Z(21	BEGIN+2*
Z(24	BEGIN+2*
Z(27	BEGIN+2*
Z(37	BEGIN+2*