Routine: %ZISS1

Information

%ZISS1 ;AC/SFISC - Collect screen parameters 5/29/88 2:02 PM ;1/24/08 16:10

Source file <ZISS1.m>

Package	Total	Caller Graph
Kernel	4	^%ZIS(2 %ZISP %ZISS %ZISS2

Name	Comments	DBIA/ICR reference
STAR	;S ZISNUM="" F %ZISI=0:0 S ZISXL=ZISXL+1 S ZISCH=$E(%ZISXX,ZISXL) S:ZISCH?1N ZISNUM=ZISNUM_ZISCH I ZISCH=""!(ZISCH=",") S %ZISYY=%ZISYY_"$C("_+ZISNUM_")",ZISXL=ZISXL-1 Q
FORM	;Entry point called from input transforms of fields in DEV/TT files.
SCAN
QUOTE
S1
L
CHECK	;Entry point called from input transforms of fields in DEV/TT files.	ICR #933 Status: Active Usage: Private
PAREN
VALID	;
L2	;Find $C(x)_$C(y) and merge
L3	;
SET2	;
L1
INDCK	;
DOLR	;Looking for $C.
S2	;MERGE $C
SRAY	;
CHECK1	;Entry point called from input transforms of fields in DEV/TT files.

Name	Line Occurrences
Function Call: WRITE	Prompt: !,%ZISSI_"==>"_X Line Location: FORM+3

Name	Field # of Occurrence
>> %	SRAY+1*, SRAY+2
>> %1	SRAY+2*
>> %ZIS	INDCK+7
>> %ZISFN	SET2+1*, INDCK+2, INDCK+5, INDCK+6, INDCK+7, SRAY+3
%ZISI	VALID+1~, CHECK+1~, CHECK1+1~, L+1, STAR+1, QUOTE, SCAN
%ZISNP	VALID+1~, CHECK+1~, CHECK1+1~, L, PAREN, SCAN
%ZISSI	FORM+2~, FORM+5*
%ZISSY	FORM+2~, FORM+4, FORM+5, FORM+6
%ZISX1	CHECK+1~, CHECK1+1~, L2+2, S2+1, S2+2
%ZISX2	CHECK+1~, CHECK1+1~, L2+2, S2+1, S2+2
%ZISXX	SET2+1, INDCK+2, INDCK+3, CHECK+1~, CHECK+2, CHECK1+1~, CHECK1+2, L, L+1, L+3 , L2+2, L3+2, STAR+1, QUOTE, DOLR+1, DOLR+2, SCAN, S2+2
>> %ZISY	INDCK+1, INDCK+5, INDCK+6, SRAY+1, SRAY+2*, SRAY+3
%ZISYY	CHECK+1~, CHECK+2, CHECK1+1~, CHECK1+3, L, L+1, L+3, L1, L1+5, STAR+1 , QUOTE, DOLR+1, DOLR+2, DOLR+3, PAREN, S1+3
>> %ZISZ	SET2+1*
>> %ZISZ(	SET2+1, INDCK+7
I	L2+1~, L2+2, L3+1~, L3+2, S2+2, S2+3~
>> IOIS(	SRAY+3*
>> X	CHECK+2, CHECK1+2, CHECK1+3, FORM+1, FORM+5, FORM+6*
ZISCH	VALID+1~, CHECK+1~, CHECK1+1~, L+1, L1, L1+1, L1+2, L1+3, L1+4, L1+5 , STAR+1, QUOTE, SCAN, S1, S1+1, S1+2, S1+3
ZISEND	VALID+1~, PAREN*, SCAN
ZISNUM	VALID+1~, CHECK+1~, CHECK1+1~, STAR+1*
ZISQ	VALID+1~, CHECK+1~, CHECK1+1~, L*, L1+1, QUOTE, S1
ZISXL	VALID+1~, CHECK+1~, CHECK1+1~, L+1, STAR+1, QUOTE, DOLR+1, DOLR+2, SCAN
ZISXLN	VALID+1~, CHECK+1~, CHECK1+1~, L*, L+1, QUOTE, SCAN