ENPLS ;WISC/SAB-SELECT PROJECTS ;8/17/95
Source file <ENPLS.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 3 | ^DIC $$GET1^DIQ ^DIR |
Engineering | 2 | FYFP^ENPLS1 (,PYLIST)^ENPLS2 |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(ENTY,ENLK) | ; Entry Point
; input variables ; (optional) ENTY - type of projects (F,A,R) ; (optional) ENLK - true if selected projects should be locked ; output variables ; ^TMP($J,"L")=project count^current year of FYFP if ENTY="F" ; ^TMP($J,"L",project number)=ien |
|
EXIT | ; Exit
|
|
RET | ; Select from Returned projects
|
|
RETEX | ; exit
|
|
LOCK | ; Lock List
|
|
UNLOCK | ; Unlock List
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | Classic Fileman Calls, GET1^DIQ |
^ENG("PROJ" - [#6925] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(6910 - [#6910] | EN+41 |
^ENG("PROJ" - [#6925] | EN+33, EN+34, EN+49, RET+6, RET+8, LOCK+5, UNLOCK+4 |
^TMP($J | EN+9!, EN+28!, EN+35*, EN+37*, EN+51*, EN+52*, EN+53, RET+2!, RET+9*, RET+10 , RET+12*, RET+13*, RET+14*, RET+15*, RET+20*, RET+21*, RETEX+1!, LOCK+3, LOCK+4, LOCK+6! , UNLOCK+2, UNLOCK+3 |
Name | Field # of Occurrence |
---|---|
^( | RET+12 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DIC | EN+31*, EN+36!, EN+41*, EN+42!, EXIT+1! |
DIC("A" | EN+31* |
DIC("B" | EN+41* |
DIC(0 | EN+31*, EN+41* |
DIR | EN+20!, EN+26!, EXIT+1! |
DIR("?" | EN+24* |
DIR("A" | EN+13*, EN+23* |
DIR("B" | EN+25* |
DIR(0 | EN+14*, EN+15*, EN+16*, EN+17*, EN+18*, EN+19*, EN+23* |
DIROUT | EXIT+1! |
DIRUT | EN+12, EN+22, EN+26, EN+39, EXIT+1! |
DT | EN+25 |
DTOUT | EN+28, EN+39, EN+42, EXIT+1! |
DUOUT | EN+28, EN+39, EN+42, EXIT+1! |
ENACL | RET+1~ |
ENACL( | RET+18, RET+19 |
ENC | EN+8~, EN+30*, EN+35*, EN+37, EN+49*, EN+51*, EN+52, RET+1~, RET+18*, RET+20* , RET+21 |
ENDA | EN+8~, EN+32*, EN+33, EN+34, EN+49*, EN+50, EN+51, RET+1~, RET+5*, RET+6* , RET+7, RET+8, RET+9, LOCK+1~, LOCK+4*, LOCK+5, UNLOCK+1~, UNLOCK+3*, UNLOCK+4 |
ENDEL | LOCK+1~, LOCK+2*, LOCK+5*, LOCK+6 |
ENFLD | RET+1~, RET+3*, RET+7 |
ENFY | EN+8~, EN+27*, EN+37, EN+44, RET+21 |
ENI | RET+1~, RET+11*, RET+12*, RET+13, RET+14, RET+19*, RET+20 |
ENJ | RET+1~, RET+18*, RET+19 |
ENK | RET+1~, RET+19* |
ENLK | EN~, EN+11*, EN+28, EN+34, EN+38, EN+39, EN+45, EN+46, EN+47 |
ENPN | EN+8~, EN+33*, EN+35, EN+50*, EN+51, RET+1~, RET+12*, LOCK+1~, LOCK+3*, LOCK+4 , LOCK+5, UNLOCK+1~, UNLOCK+2*, UNLOCK+3 |
ENPR | RET+1~, RET+11*, RET+12* |
ENSEL | EN+8~, EN+10*, EN+12*, EN+28, EN+38, EN+39, EN+45, EN+46, EN+47 |
ENSN | EN+8~, EN+43*, EN+44 |
ENTY | EN~, EN+10*, EN+12, EN+15, EN+16, EN+17, EN+18, EN+19, EN+22, EN+37 , EN+38, EN+39, EN+45, EN+46, EN+47, RET+3, RET+13, RET+14, RET+21 |
ENY | RET+1~, RET+20* |
ENY0 | RET+1~, RET+8*, RET+9 |
U | EN+10, EN+33, EN+37, EN+41, RET+8, RET+9, RET+13, RET+14, RET+20, RET+21 , LOCK+4, UNLOCK+3 |
X | EXIT+1! |
Y | EN+12, EN+27, EN+32, EN+35, EN+42, EN+43, EXIT+1! |