PSOEPED ;JLI/FO-OAKLAND-RPC to handle epcs data changes ;7/29/21 09:53
Source file <PSOEPED.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Outpatient Pharmacy | 2 | PSO EPCS CRED PSO EPCS EDIT |
Name | Comments | DBIA/ICR reference |
---|---|---|
ENTRY(RESULT,INPUT) | ;.remoteprocedure
|
|
RECORD(LINE,NOW) | ;
|
|
; print audit logs as indicated
|
||
SORTTYPE | ; specifies sort types for selection
|
|
LASTCRED(RETURN,INDUZ) | ; Get last CREDENTIAL TYPE field (#102) from SIGN-ON LOG file (#3.081)
; INPUT : INDUZ - User Internal Entry Number ; OUTPUT : Credential Code from Set of Codes ; 1 - AVCODES ; 2 - SSOI ; 3 - SSOE ; 4 - BSETOKEN ; 5 - CCOWTOKEN ; 6 - ASHTOKEN ; 7 - NHIN ; 8 - NONE ; 9 - UNKNOWN |
RPC Name | Call Tags |
---|---|
PSO EPCS EDIT | ENTRY |
PSO EPCS CRED | LASTCRED |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^VA(200 - [#200] | LASTCRED+16 |
Name | Line Occurrences |
---|---|
RECORD | ENTRY+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
BY | PRINT+1~, PRINT+5* |
CREDTM | LASTCRED+13~, LASTCRED+18*, LASTCRED+19 |
DIC | PRINT+1~, PRINT+5* |
DIR | PRINT+1~ |
DIR("A" | PRINT+4* |
DIR(0 | PRINT+2*, PRINT+3* |
DUZ | LASTCRED+17 |
DUZ("AUTHENTICATION" | LASTCRED+18 |
FDA | RECORD+1~ |
FDA( | RECORD+2*, RECORD+3*, RECORD+4*, RECORD+5* |
FLDS | PRINT+1~, PRINT+5* |
I | ENTRY+1~, ENTRY+3*, RECORD+1~, RECORD+2*, PRINT+1~, PRINT+3* |
IEN | RECORD+1~ |
INDUZ | LASTCRED~, LASTCRED+15, LASTCRED+16, LASTCRED+17 |
INPUT | ENTRY~ |
INPUT( | ENTRY+3 |
L | PRINT+1~, PRINT+5* |
LINE | RECORD~, RECORD+2, RECORD+4, RECORD+5 |
MSG | RECORD+1~ |
NOW | ENTRY+1~, ENTRY+2*, ENTRY+3, RECORD~, RECORD+3 |
RESULT | ENTRY~, ENTRY+4* |
RETURN | LASTCRED~, LASTCRED+14!*, LASTCRED+15*, LASTCRED+16*, LASTCRED+19* |
U | RECORD+2, RECORD+4, RECORD+5 |
VAL | PRINT+1~ |
VAL( | PRINT+3*, PRINT+5 |
VALUE | RECORD+1~, RECORD+2* |
X | PRINT+1~, PRINT+3* |
Y | PRINT+1~, PRINT+4, PRINT+5 |
Name | Field # of Occurrence |
---|---|
$T(SORTTYPE+I | PRINT+3 |