PRCB1A ;WISC/PLT - CONTROL POINT ENTER/EDIT;12/10/97 1600
Source file <PRCB1A.m>
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 |
Package | Total | Caller Graph |
---|---|---|
IFCAP | 5 | CONTROL POINT NAME PRC5B2 PRCB FCP ADD/EDIT PRCB1A1 PRCB1A2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
V | ;;5.1;IFCAP;**209**;Oct 20, 2000;Build 3
|
|
EN | ||
FCP | ||
EXIT | ||
LKUP | ;lookup prcdd=420.01
|
|
EDIT | ;edit prcdd=420.01
|
|
KEY | ;initial key values/func code/bbfy
|
|
KEY1 | ||
UNQCHK(PRCK1,PRCK25D5,PRCK26,PRCK27,PRCK28,PRCK29) | ;check uniqueness - modified in PRC*5.1*209 to check for multiple uniqueness
|
|
UNQCRS | ;set unique cross reference
|
|
UNQCRK | ;kill unique cross reference
|
|
DINU | ;call from ^dd(420.01,.01)
|
Name | Field # of Occurrence |
---|---|
EN^DDIOL | EN+9, FCP, FCP+6 |
FT^PRC0A | EDIT+7 |
$$NODE^PRC0B | FCP+7 |
DCLOCK^PRC0B | EN+12, FCP+13 |
EDIT^PRC0B | EN+11, EDIT+2, EDIT+6, EDIT+9 |
ICLOCK^PRC0B | EN+8, FCP+5 |
LOOKUP^PRC0B | LKUP+2 |
PIECE^PRC0B | EDIT+3 |
$$DICGL^PRC0B1 | EN+8 |
ADD^PRC0B1 | EN+6 |
DELQ^PRCB1A1 | EDIT+8 |
ED0^PRCB1A1 | EDIT+11 |
REQ1^PRCB1A1 | FCP+10 |
UNQMES^PRCB1A1 | UNQCHK+3 |
^PRCFSITE | EN+5 |
TUSER^PRCSEB1 | FCP+12 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PRC(420 - [#420] | EN+6, KEY1+3, KEY1+4, UNQCHK+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | EN+2~, EDIT+3!, EDIT+4!, KEY1+3*, KEY1+4*, KEY1+5, KEY1+6 |
A( | EDIT+4 |
B | EN+2~ |
>> C | EDIT+10* |
DA | EN+2~, KEY+1 |
DA(1 | KEY+1 |
>> DINUM | DINU+1* |
>> I | KEY1*, KEY1+7* |
PRC | EN~ |
PRC("SITE" | EN+5, EN+6, EN+7 |
PRCAED | EN~, FCP+1~, LKUP+4*, EDIT+8 |
PRCBBFY | EN+4~ |
PRCDD | EN~, EN+7*, EN+8, EN+11, FCP+1~, FCP+2*, FCP+5, FCP+12, LKUP+4, EDIT+4 |
PRCDI | EN~, FCP+1~, LKUP+1*, LKUP+2, LKUP+5*, EDIT+2, EDIT+3, EDIT+6, EDIT+9 |
PRCDR | EN~, EN+10*, EN+11 |
PRCF | EN+4~ |
PRCF("X" | EN+5* |
PRCFA | EN+4~ |
PRCFA("ALL" | EN+7* |
PRCFUND | EN+4~ |
PRCK | EN+1~, UNQCRS+1*, UNQCRS+2, UNQCRK+1*, UNQCRK+2 |
PRCK1 | EN+3~, KEY1+3*, UNQCHK~, UNQCHK+2, UNQCRS+1, UNQCRK+1 |
PRCK25 | EN+3~ |
PRCK25D5 | EN+3~, KEY1+1*, KEY1+5*, KEY1+8*, UNQCHK~, UNQCHK+2, UNQCRS+1, UNQCRK+1 |
PRCK26 | EN+3~, KEY1+5*, UNQCHK~, UNQCHK+2, UNQCRS+1, UNQCRK+1 |
PRCK27 | EN+3~, KEY1+5*, UNQCHK~, UNQCHK+2, UNQCRS+1, UNQCRK+1 |
PRCK28 | EN+3~, KEY1+6*, UNQCHK~, UNQCHK+2, UNQCRS+1, UNQCRK+1 |
PRCK29 | EN+3~, KEY1+6*, UNQCHK~, UNQCHK+2, UNQCRS+1, UNQCRK+1 |
PRCLOCK | EN+1~, EN+8*, EN+12, FCP+5 |
PRCLOCK1 | FCP+1~, FCP+5*, FCP+13 |
>> PRCNM | FCP+8*, EDIT+7, EDIT+9* |
PRCNO | EN+1~, FCP+8*, EDIT+9 |
PRCPR | EN~ |
PRCQT | EN~, FCP, FCP+2*, FCP+4, LKUP+3*, EDIT+1, EDIT+2*, EDIT+8* |
PRCRI | EN~ |
PRCRI( | EN+8, EN+11, FCP+5, FCP+12, LKUP+4*, LKUP+5, EDIT+4, KEY+1*, KEY1+2, KEY1+3 , KEY1+4, UNQCHK+2, UNQCHK+3 |
PRCRI(420 | EN+7*, LKUP+1, LKUP+5, KEY+1*, KEY1+2, KEY1+3, KEY1+4, UNQCHK+2 |
PRCRQ | EN+4~ |
PRCST | EN+1~, FCP+8*, EDIT+1 |
PRCU | EN~*, FCP+8 |
PRCUNQ | EN+1~, UNQCHK+1* |
PRCUQ | EN+3~, UNQCHK+1*, UNQCHK+2*, UNQCHK+3* |
X | EN+2~, EN+6!*, EN+11, LKUP+2, LKUP+3!, LKUP+4!, EDIT+2, EDIT+4*, EDIT+5*, EDIT+6 , EDIT+7, EDIT+8, EDIT+9*, DINU+1 |
X("S" | FCP+3* |
Y | EN+2~, EN+6*, EN+8*, EN+9, FCP+5*, FCP+6, FCP+7*, FCP+8, LKUP+2, LKUP+3 , LKUP+4, EDIT+7 |