PRCB1A ;WISC/PLT - CONTROL POINT ENTER/EDIT;12/10/97 1600
Source file <PRCB1A.m>
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)
|