PSJMUTL ;BIR/MV - UTLILITY USE FOR QUEUING... ;25 Nov 98 9:13 AM
Source file <PSJMUTL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SELDEV() | ;*** Ask for device type for report to output to ***
|
|
SETSORTQ(XDESC,XSAVE,ZTRTN) | ||
SETPRTQ(XDESC,XSAVE,ZTRTN) | ||
EXITDEV | ;
|
|
PRTCHK(PGCT) | ;
|
|
EXIT | ;
|
|
ATS(REG,EXP,LN) | ;
|
|
GETGMRA | ;
|
|
SORT | ;*** Set up the allergies and adv. reactions arrays.
|
|
CALLEN | ;*** Calculate the total length for allergy and adv.reaction arrays.
|
|
SETARRAY | ;*** Concatenate allergies and adv. reaction together into display len.
|
|
NAMENEED(DRGX,LEN,NEED) | ||
RAD | ;
|
|
REMOTE2 | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|