PSOORCPY ;BIR/SAB-copy orders from backdoor ;Oct 20, 2022@15:12
Source file <PSOORCPY.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
COPY | ; Rx Copy Functionality
|
|
OUT | ;
|
|
EX | ||
LOCK | ;
|
|
BLDDOSE(PSORXED,MAINTRXF) | ; Copies the Dose from Original Rx into Copied/Maintenance Dose Rx
|
|
SETDOSE(PSORXED,DOSEIEN,DOSESEQ) | ; Sets the Dose in the PSORXED array
|
|
LASTTHEN | ; Determine the IEN of the last THEN conjunction on this prescription and set DOSEIEN to its value.
|
|
ORCOPY(PLACER) | ; Checks if an Outpatient Pharmacy order can be copied by CPRS or not
; Input: (r) PLACER - PRESCRIPTION (#52) IEN or PENDING OUTPATIENT ORDERS (#52.31) IEN_"S" |
|
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 |
|
FileNo | Call Tags |
---|---|
^PSDRUG - [#50] | GET1^DIQ |
^PSRX - [#52] | GET1^DIQ |
^PS(52.41 - [#52.41] | GET1^DIQ |
^PS(59.7 - [#59.7] | GET1^DIQ |