Routine: XQORD101

Information

XQORD101 ; slc/KCM - Build menus in XUTL (file 101) ;9/24/98 16:40 [ 04/02/2003 8:29 AM ]

Source file <XQORD101.m>

Package	Total	Caller Graph
Kernel	6	XQORC1 XQORC10 XQORC2 XQORC3 XQORC8 XQORC9

Name	Comments	DBIA/ICR reference
REDOM	;From: File 101, Field 1.1 Entry: DA(1) Exit: DA(1)
SET	;From: Cross reference in file 101, field 99 Entry: DA Exit: DA
NAME	;CHECK NAMESPACING IN PACKAGE FILE.
UP(X)	;Convert X to upper case
TREE	;Look back up tree to make sure item is not ancestor (input xform)
CHKNAME	;CHECK A NAME, AND DISPLAY APPROPRIATE MESSAGE
TREE2
KILL	;From: File 101, Field 99 Entry: DA Exit: DA
REDOX	;From: Subfile 101.01, Fields .01,2,3 Entry: DA(1) Exit: DA(1)
TREE1
NAMEOK
TEST
T1
REDO	;From: File 101, Field 7 Entry: DA Exit: DA

Name	Line Occurrences
Function Call: WRITE	Prompt: " Duplicate names not allowed." Line Location: CHKNAME+1
Function Call: WRITE	Prompt: !,"Not a known package or a local namespace." Line Location: CHKNAME+2
Function Call: WRITE	Prompt: !,"Enter a name, and the computer will respond with the namespace to which",!,"that name belongs. It does this by looking at the package file.",!! Line Location: TEST+0
Function Call: READ	Prompt: "NAME: " Formatting: ! Timeout: DTIME," Variable: X Line Location: T1+0

Name	Line Occurrences (* Changed, ! Killed)
^DIC(9.4 - [#9.4]	NAME+2, NAMEOK
^ORD(	TREE1
^ORD(101 - [#101]	SET+2, SET+3, SET+6, SET+8, SET+9, SET+10, SET+15, SET+16!, SET+19, SET+24 , SET+25, REDO+1, REDO+2, REDOM+2, REDOX+1, CHKNAME+1
^TMP("XQORM"	SET+5!, SET+11*, SET+13, SET+14, SET+26!
^XUTL("XQORM"	SET+3, SET+7, SET+20, SET+22, SET+23, SET+24, SET+25, KILL+1!

Name	Field # of Occurrence
>> %	NAME+1, NAME+2, NAMEOK, CHKNAME+3
>> %1	NAME+1, NAMEOK, CHKNAME+3
>> DA	SET+2, SET+3, SET+6, SET+7, SET+8, SET+9, SET+15, SET+16, SET+20, SET+22 , SET+23, SET+24, SET+25, KILL+1, REDO+1, REDO+2
>> DA(1	REDOM+2, REDOX+1, TREE+2
DTIME	T1
I	REDO+1~, REDO+2, REDOM+1~, REDOM+2*
ORCCOL	SET+4~, SET+12, SET+17, SET+18
ORCOL	SET+4~, SET+6*, SET+7, SET+12
ORCROW	SET+4~, SET+12, SET+17, SET+18
ORDD	TREE+2!, TREE1*, TREE2~
ORDDA	TREE+2!, TREE1, TREE2~
ORDDF	TREE+2!, TREE1
>> ORNMCHK	CHKNAME+3
ORPOS	SET+4~, SET+18*, SET+20, SET+22, SET+23, SET+24
ORROW	SET+4~, SET+12*, SET+17
ORTOT	SET+4~, SET+7, SET+11, SET+12
S1	SET+4~, SET+12, SET+13, SET+14
S2	SET+4~, SET+7, SET+8, SET+9, SET+11, SET+13, SET+14, SET+15, SET+16, SET+20
U	NAMEOK
X	SET+4~, SET+9, SET+10, SET+11, SET+15, SET+16, SET+19, SET+20, SET+21, SET+23 , SET+24, SET+25, UP~, UP+1, REDO+1~, REDO+2, REDOM+1~, REDOM+2, TREE+2!, TREE1! , NAME+1, NAME+2, NAMEOK, CHKNAME+1!, CHKNAME+3, T1*
X1	SET+4~, SET+19, SET+20, SET+22, SET+24