PSJOCDT ;BIR/MV - PROCESS DUPLICATE THERAPY ORDER CHECKS ;6 Jun 07 / 3:37 PM [9/8/14 1:10pm]
Source file <PSJOCDT.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DT | ;
 | 
|
| DTDGCK | ;This version of DT is only executed when the user selects hidden action CK (Drug Check)
 | 
|
| DSPOC | ;
 | 
|
| HDR | ;
 | 
|
| HDR2 | ;
 | 
|
| SETCLASS | ;Store all classes to display at the end.
 | 
|
| SETOC | ;Set PSJOCDT array to sort by Package(Inpt, Outpt: Active, Remote, Pending, Non-VA
 | 
|
| CONT | ;Display the continue prompt.
 | 
|
| DCPROMPT() | ;Prompt if user wants to DC order(s)
 | 
|
| SORTLST() | ;Sort orders into a numeric list
 | 
|
| LST() | ;
 | 
|
| PROCLST(PSJY) | ;DC the orders selected by user
 | 
|
| CKDC() | ; rule: don't show orders that have a status of DISCONTINUED in list
 | 
| 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 | 
  | 
| 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 | 
  |