PSJOCDI ;BIR/MV - DISPLAY DRUG INTERACTION ORDER CHECKS ;6 Jun 07 / 3:37 PM
Source file <PSJOCDI.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
DI | ;
|
|
DSPLOC | ;Display drug drug interaction - sorted by severity, prospective drug (50,.01), profile drug (VAgen name), package, seq#
|
|
DSPCRTCL(PSJPSPEC,PSJPROFL) | ;Display Critical orders
|
|
DISPON | ; Display orders & clin effects if applied.
|
|
DISPON2 | ;
|
|
SORTORD | ;Sort drug drug output to display in order of: Inpatient, Active Rx, Remote Rx, Pending Rx, Non_VA
|
|
OCLST(PSJ1,PSJCLINF) | ;Sort orders into array to display later
|
|
CLIN(PSJSEV,PSJDNM,PSJPON,PSJDN,PSJLINE) | ;
|
|
INTERV | ;Log intervention. Required for Critical.
|
|
HDR(PSJDNM) | ;Display the intro text on drug interaction
|
|
PSTAT(PSJPONCK) | ;**Display order status - CCR 5980
|
|
DSPDRG(PSJPON,PSJDNM,PSJCLINF) | ;Display order info or drug name from prospective. CCR 6454
|
|
RDIVUID | ;Loop thru the "IN" global to store the VUID for remote Rx
|
|
DSPLCLIN(PSJ2) | ;If the next drug on the list is diff the flag to display the clin effects.
|
|
CRITICAL | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|