Routine: RAO7OKR

Information

RAO7OKR ;HISC/GJC-Receive OE/RR accept/reject msg (backdoor) ;1/5/95 08:54

Source file <RAO7OKR.m>

Name	Comments	DBIA/ICR reference
EN1(RAMSG)	; Pass in the message from OE/RR. Decipher information.
FILE(RAX,RAY)	; File data into 75.1 using FM21 DBS ; 'RAX' is placer order # (OE/RR), 'RAY' is filler order # (Rad) ; returns '0' for proper filing, '1' when an error is encountered
PID	; breakdown the 'PID' segment
ORC	; breakdown the 'ORC' segment ; RAORC1 will either be 'NA' number assigned, or 'DE' data errors