PSOERX1F ;ALB/MR - Accept/Un-Accept eRx function ; 8/18/2020 5:14pm
Source file <PSOERX1F.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SETUP | ;
|
|
ADD(QUIET) | ;Add CHCS message to Outpatient Pending Orders file
|
|
UNACC | ; Un-Accept eRx from Pending Queue back into the Holding Queue
|
|
JUMP2ERX | ; Jump to the eRx Holding Queue for the specific order after Un-Accepting eRx
|
|
ORDNUM() | ; Returns the correct IEN for the ORDER file (#100) for the Rx
|
|
UNACCBEF(ERXIEN) | ; Determines if the eRx has been Un-Accepted Before
; Input: (r)ERXIEN - Pointer to ERX HOLDING QUEUE (#52.49) |
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 |
|
FileNo | Call Tags |
---|---|
^ORPA(101.52 - [#101.52] | FIND1^DIC |
^SC - [#44] | GET1^DIQ |
^PSDRUG - [#50] | GET1^DIQ |
^PSRX - [#52] | GET1^DIQ |
^PS(52.41 - [#52.41] | Classic Fileman Calls, GET1^DIQ, WP^DIE |
^PS(52.45 - [#52.45] | Classic Fileman Calls, GET1^DIQ |
^PS(52.49 - [#52.49] | Classic Fileman Calls, GET1^DIQ |
52.4919 | GET1^DIQ |
^PS(59 - [#59] | GET1^DIQ |
^PS(59.7 - [#59.7] | GET1^DIQ |