RGRSUTIL ;ALB/RJS-MPI/PD UTILITIES ;03/12/96
Source file <RGRSUTIL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EXCEPT | ;Members of the RG CIRN DEMOGRAPHIC ISSUES Mail Group are
|
|
END | ||
SEG(SEGMENT,PIECE,CODE) | ;Return segment from RGDC array and kill node
|
|
SEG1(SEGMENT,PIECE,CODE) | ;Return segment from RGDC array
|
|
ERROR(CODE) | ;**THIS ENTRY POINT IS NO LONGER USED**
|
|
INITIZE | ;Initialize RGDC array with incoming message
|
|
SSNDFN(SSN) | ;Input ssn output DFN
|
|
LINE() | ; Return a dashed line.
|
|
PAUSE() | ; Pause for CRT output.
; Input: IOST, IOSL ; Output: 0 -- Continue to display output ; 1 -- Quit |
|
DIAG(X) | ; Return a string for diagnoses.
; Input: X - Code for type of diagnosis (Primary, etc.) ; Output: Descriptive string, i.e., "Primary", etc. |
|
ORD(X) | ; Return a string for orders.
; Input: X - Code for type of order (Lab, etc.) ; Output: Descriptive string, i.e., "Lab", etc. |
|
UPDTFLD(FILE,FLD,ANS1,ANS2) | ; Returns the correct field answer
|
|
SSNINT(SSN) | ;
|
|
ACTION | ;Entry action for Primary View Reject exceptions
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^XMB(3.8 - [#3.8] | FIND1^DIC |