XPAREDT1 ; SLC/KCM - Supporting Calls - Entities; [3/31/03 7:19am] ;9/12/07 16:19
Source file <XPAREDT1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
HLPCLS | ; procedure used only by GETCLS
; display help for entity class selection |
|
SHWCLS | ; procedure used only by GETCLS
; show entity classes appropriate for this parameter |
|
BLDLST | ; ...continued from BLDLST^XPAREDIT(LST,PAR)
; Build list of entities allowed for this parameter ; # is precedence, 'fixed' is VP to implied instance (i.e., SYS, PKG) ; .LST(#)=file number^message^order^prefix^fixed^lookup info ; ("M", message) = # ; ("P", prefix) = # ; PAR=ien^name |
|
GETCLS | ; ...continued from GETCLS^XPAREDIT(X,PAR,LST)
; Choose the class of entity ; optionally, lookup entity using variable pointer syntax (PRE.NAME) ; .X=returns seq # or entity in VP format ; PAR=ien^name for parameter ; .LST=list from which the entity is selected |
|
UPPER(X) | ; function - convert lower to upper case
|
Name | Line Occurrences |
---|---|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DIC(4.2 - [#4.2] | FIND1^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC - [#1] | BLDLST+34 |
^DIC(4 - [#4] | BLDLST+30, BLDLST+32 |
^DIC(9.4 - [#9.4] | BLDLST+19, BLDLST+21, BLDLST+23 |
^DISV( | GETCLS+12, GETCLS+28* |
^XTV(8989.51 - [#8989.51] | BLDLST+9, BLDLST+10, BLDLST+18 |
^XTV(8989.518 - [#8989.518] | BLDLST+11 |
Name | Line Occurrences |
---|---|
$$UPPER | BLDLST+13, GETCLS+9 |
HLPCLS | GETCLS+11, GETCLS+22 |
SHWCLS | GETCLS+7, GETCLS+11 |
Name | Field # of Occurrence |
---|---|
^( | BLDLST+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DONE | GETCLS+6~, GETCLS+8*, GETCLS+10*, GETCLS+13*, GETCLS+14*, GETCLS+15*, GETCLS+17*, GETCLS+18, GETCLS+21* |
DTIME | GETCLS+9 |
DUZ | GETCLS+12, GETCLS+28 |
DUZ(0 | BLDLST+10 |
>> ENT | GETCLS+10* |
FN | BLDLST+7~, BLDLST+10*, BLDLST+11, BLDLST+16, BLDLST+24, BLDLST+28, BLDLST+34 |
I | SHWCLS+2~, SHWCLS+4*, SHWCLS+5 |
IEN | BLDLST+7~, BLDLST+9*, BLDLST+10 |
LST | BLDLST+7!, BLDLST+8*, BLDLST+12* |
LST( | BLDLST+12*, BLDLST+22*, BLDLST+23*, BLDLST+26*, BLDLST+27*, BLDLST+31*, BLDLST+32*, BLDLST+33, BLDLST+34*, GETCLS+13 , GETCLS+20, GETCLS+24, GETCLS+25, GETCLS+27, SHWCLS+4 |
LST("M" | BLDLST+13*, GETCLS+15, GETCLS+16, GETCLS+17 |
LST("P" | BLDLST+14*, GETCLS+14, GETCLS+18, GETCLS+20 |
>> PAR | BLDLST+9, BLDLST+10, BLDLST+18, GETCLS+12, GETCLS+28, SHWCLS+3 |
PRE | BLDLST+17~, BLDLST+19*, BLDLST+20, BLDLST+21 |
PRN | BLDLST+17~, BLDLST+18*, BLDLST+19 |
SEQ | BLDLST+7~, BLDLST+8*, BLDLST+9*, BLDLST+12, BLDLST+13, BLDLST+14, BLDLST+22, BLDLST+23, BLDLST+26, BLDLST+27 , BLDLST+31, BLDLST+32, BLDLST+33, BLDLST+34 |
TMP | GETCLS+6~, GETCLS+16*, GETCLS+17, GETCLS+19*, GETCLS+20, GETCLS+21 |
U | BLDLST+11, BLDLST+13, BLDLST+14, BLDLST+22, BLDLST+23, BLDLST+26, BLDLST+27, BLDLST+30, BLDLST+31, BLDLST+32 , BLDLST+33, BLDLST+34, GETCLS+24, GETCLS+27, SHWCLS+5, SHWCLS+6, SHWCLS+7 |
X | BLDLST+7~, BLDLST+11*, BLDLST+12, BLDLST+13, BLDLST+14, BLDLST+21*, BLDLST+22, BLDLST+23, BLDLST+25*, BLDLST+26 , BLDLST+27, BLDLST+29*, BLDLST+30, BLDLST+31, BLDLST+32, GETCLS+9*, GETCLS+10, GETCLS+11, GETCLS+12*, GETCLS+13 , GETCLS+14*, GETCLS+15*, GETCLS+16, GETCLS+17*, GETCLS+18, GETCLS+19, GETCLS+20, GETCLS+21*, GETCLS+23, GETCLS+24 , GETCLS+25, GETCLS+27, GETCLS+28, SHWCLS+2~, SHWCLS+4*, SHWCLS+5, SHWCLS+6, SHWCLS+7, UPPER~, UPPER+1 |