PSOPKIV1 ;BHAM ISC/MHA - validate PKI cert. ; 05/09/2002 8:15 am
Source file <PSOPKIV1.m>
Package | Total | Call Graph |
---|---|---|
Outpatient Pharmacy | 7 | REVERSE^PSOBPSU1 EN^PSOHLSN EN^PSOHLSN1 ^PSOPKIV2 CAN^PSOTPCAN $$RXDEA^PSOUTIL KV^PSOVER1 |
VA FileMan | 4 | NOW^%DTC ^DIK ($$GET1,GETS)^DIQ ^DIR |
Kernel | 2 | $$FMTE^XLFDT $$VERIFY^XUSSPKI |
Order Entry Results Reporting | 2 | EN^ORB3 ($$HASHRTN,ARCHIVE)^ORDEA |
Registration | 1 | (ADD,DEM,KVA)^VADPT |
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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
CER | ;
|
|
L1 | ;
|
|
ERR(ER) | ;
|
|
REA | ;
|
|
ACT(DA) | ;
|
|
AR | ;
|
|
DCP | ;
|
|
DCV | ;
|
|
DCV0 | ||
DCV1 | ||
ADR | ;
|
|
RV | ;
|
|
VERIFY(RET,PSIEN) | ||
VQT | ;
|
|
INSTAD | ;
|
|
HSHCHK(ARET,PNP) | ;Compares digitally signed archived data in file #101.52 against data in OP pending file #52.41
|
|
ALERT | ;
; ORN=76 - Notification ID (ifn from OE/RR Notifications file #100.9) ; ORBDFN=Patient DFN from Patient file #2 ; ORNUM=Order ifn from Order file #100 ; ORBADUZ=Provider DUZ - Array of notification recipients requested by the calling package. ; ORBPMSG=Message text ; ORBPDATA=This is an identifier of the package entry which the notification is based on. ; For radiology: Rad/Nuc Med exam/case ifn's(format: exam_ifn;case_ifn) ; For consults: the IEN of the consult in file 123 |
|
00 | ;;Order Text is blank;;
|
|
01 | ;;DEA # missing;;
|
|
02 | ;;Drug Schedule missing;;
|
|
03 | ;;DEA # not valid;;
|
|
04 | ;;Valid Certificate not found;;
|
|
05 | ;;Couldn't load CSP;;
|
|
06 | ;;Smart card Reader not found;;
|
|
07 | ;;Certificate with DEA # not found;;
|
|
08 | ;;Certificate not valid for schedule;;
|
|
10 | ;;Crypto Error (contact IRM);;
|
|
15 | ;;Corrupted (Decode failure);;
|
|
16 | ;;Corrupted (Hash mismatch);;
|
|
17 | ;;Rx NOT processed: PIV Card Certificate Revoked;;
|
|
18 | ;;Verification failure;;
|
|
19 | ;;Before Cert effective date;;
|
|
20 | ;;Rx processed: PIV Card Cert Expired - NO ACTION REQ;;
|
|
21 | ;;No Cert with a valid date found;;
|
|
22 | ;;Signature Check failed (Invalid Signature);;
|
|
23 | ;;CERT_IS_NOT_TIME_NESTED;;
|
|
24 | ;;CERT_IS_NOT_VALID_FOR_USAGE;;
|
|
25 | ;;CERT_IS_UNTRUSTED_ROOT;;
|
|
26 | ;;CERT_REVOCATION_STATUS_UNKNOWN;;
|
|
27 | ;;CERT_IS_CYCLIC;;
|
|
28 | ;;CERT_IS_PARTIAL_CHAIN;;
|
|
29 | ;;CERT_CTL_IS_NOT_SIGNATURE_VALID;;
|
|
30 | ;;CERT_CTL_IS_NOT_VALID_FOR_USAGE;;
|
Name | Field # of Occurrence |
---|---|
NOW^%DTC | AR+2 |
^DIK | DCV0+6 |
$$GET1^DIQ | VERIFY+24, VERIFY+26, HSHCHK+18, HSHCHK+26 |
GETS^DIQ | INSTAD+2 |
^DIR | REA+3, DCV+2, DCV+7 |
EN^ORB3 | ALERT+11 |
$$HASHRTN^ORDEA | VERIFY+33 |
ARCHIVE^ORDEA | VERIFY+17, HSHCHK+14 |
REVERSE^PSOBPSU1 | DCV0+2 |
EN^PSOHLSN | DCP+7 |
EN^PSOHLSN1 | DCV0+5 |
^PSOPKIV2 | DCP+8 |
CAN^PSOTPCAN | DCV0+2 |
$$RXDEA^PSOUTIL | HSHCHK+24 |
KV^PSOVER1 | REA+1, REA+5, DCV+1, DCV+2, DCV+7, DCV+8 |
ADD^VADPT | VERIFY+12, HSHCHK+28 |
DEM^VADPT | VERIFY+12, HSHCHK+28 |
KVA^VADPT | VERIFY+30, HSHCHK+42 |
$$FMTE^XLFDT | VERIFY+10, VERIFY+35, VERIFY+37 |
$$VERIFY^XUSSPKI | VERIFY+38 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
^DIC(4 - [#4] | GETS^DIQ |
^PSDRUG - [#50] | GET1^DIQ |
^PS(52.4 - [#52.4] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^OR(100 - [#100] | VERIFY+37 |
^PS(52.4 - [#52.4] | DCV0 |
^PS(52.41 - [#52.41] | DCP+1, DCP+2!, DCP+3*, DCP+4*, DCP+7, RV+3, RV+5, RV+6, VERIFY+9, VERIFY+20 , VERIFY+21, INSTAD+1, HSHCHK+10, HSHCHK+22, HSHCHK+38, HSHCHK+39 |
^PSRX - [#52] | ACT+3*, ACT+4*, AR+1, DCV0+1*, DCV0+3*, ADR+1*, ADR+2*, ADR+3* |
^TMP( | L1+1* |
^TMP("PSOPKIDATA" | VERIFY+8!, VERIFY+10*, VERIFY+13*, VERIFY+14*, VERIFY+15*, VERIFY+23*, VERIFY+24*, VERIFY+26*, VERIFY+27*, VERIFY+31* , VERIFY+32*, VERIFY+37*, VERIFY+38, VQT+1!, INSTAD+5* |
^TMP($J | VERIFY+16!, VERIFY+25, VERIFY+27, VERIFY+29!, HSHCHK+13!, HSHCHK+15, HSHCHK+16, HSHCHK+37, HSHCHK+43! |
Name | Field # of Occurrence |
---|---|
^(3 | VERIFY+27 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | ACT+3, DCV0+3, ADR+2 |
ARET | HSHCHK~, HSHCHK+9*, HSHCHK+10*, HSHCHK+11*, HSHCHK+15*, HSHCHK+17*, HSHCHK+19*, HSHCHK+20*, HSHCHK+25*, HSHCHK+26* , HSHCHK+29*, HSHCHK+30*, HSHCHK+31*, HSHCHK+32*, HSHCHK+33*, HSHCHK+34*, HSHCHK+35*, HSHCHK+41*, HSHCHK+44 |
ARET( | HSHCHK+41* |
ARET("DEA #" | HSHCHK+25* |
ARET("DRUG NA | ME" , HSHCHK+19* |
ARET("ISSUANC | E DATE" , HSHCHK+17* |
ARET("PATIENT | ADDRESS #1" , HSHCHK+30*, ADDRESS #2" , HSHCHK+31*, ADDRESS #3" , HSHCHK+32*, CITY" , HSHCHK+33*, NAME" , HSHCHK+29* , STATE" , HSHCHK+34*, ZIP+4" , HSHCHK+35* |
ARET("PROVIDE | R NAME" , HSHCHK+26* |
ARET("QTY PRE | SCRIBED" , HSHCHK+20* |
ASIG | HSHCHK+8~, HSHCHK+37* |
ASIG( | HSHCHK+41 |
DA | ACT~, ACT+1, ACT+3, ACT+4, AR+1, DCV0, DCV0+1, DCV0+2, DCV0+3, DCV0+5 , DCV0+6*, DCV1~*, ADR+1, ADR+2, ADR+3 |
DATE | VERIFY+6~, VERIFY+35*, VERIFY+36 |
DEA | VERIFY+6~, VERIFY+25*, VERIFY+31, HSHCHK+8~, HSHCHK+24*, HSHCHK+25 |
DETOX | HSHCHK+8~ |
DFN | VERIFY+6~, VERIFY+12*, HSHCHK+8~, HSHCHK+28* |
DFRM | HSHCHK+8~ |
DIK | DCV0+6*! |
>> DIR("?" | REA+2*, DCV+6* |
>> DIR("A" | REA+2*, DCV+1*, DCV+2*, DCV+6* |
>> DIR("B" | REA+3*, DCV+1*, DCV+4* |
>> DIR(0 | REA+2*, DCV+1*, DCV+6* |
>> DIRUT | REA+3, REA+4, DCV+7 |
DOSE | HSHCHK+8~ |
DOSEP | HSHCHK+8~ |
DOSEX | HSHCHK+8~ |
DRGNM | HSHCHK+8~, HSHCHK+18*, HSHCHK+19 |
DT | DCV0+1 |
DUZ | ACT+3, DCV0+3, ADR+2 |
ECD | VERIFY+40~*, VERIFY+41, VERIFY+42, VERIFY+43, VERIFY+44, VERIFY+45, VERIFY+46, VERIFY+47, VERIFY+48, VERIFY+49 , VERIFY+50, VERIFY+51, VERIFY+52 |
ER | ERR~, ERR+1 |
ERM | ERR+2~* |
HASH | VERIFY+6~, VERIFY+33*, VERIFY+34, VERIFY+38 |
I | ACT+2~, AR+1*, DCV0+2~, VERIFY+6~, HSHCHK+8~, HSHCHK+16*, HSHCHK+38*, HSHCHK+39, HSHCHK+40, HSHCHK+41* |
>> IEN | L1+1* |
>> INCOM | DCV+4* |
INF0 | VERIFY+19~, VERIFY+21*, VERIFY+22, HSHCHK+8~, HSHCHK+39*, HSHCHK+40 |
INF1 | VERIFY+6~, VERIFY+19~, VERIFY+21*, VERIFY+22, HSHCHK+8~, HSHCHK+39*, HSHCHK+40 |
INFO | VERIFY+6~ |
INST | VERIFY+6~, INSTAD+1*, INSTAD+2, INSTAD+3, INSTAD+4, HSHCHK+8~, HSHCHK+22* |
J | ACT+2~, ACT+3, ACT+4, AR+1*, AR+2*, DCV0+2~, DCV0+3, DCV0+4*, ADR+1, ADR+2 , ADR+3, VERIFY+19~, VERIFY+20*, VERIFY+21, VERIFY+23, HSHCHK+8~ |
MIG | RV+1~, RV+6*, RV+7 |
MSG | CER+2~, CER+6* |
NAM | HSHCHK+8~, HSHCHK+26* |
ND | HSHCHK+8~, HSHCHK+41* |
>> OR0 | REA+4, ALERT+10, ALERT+11 |
>> ORD | CER+3, DCP+1, DCP+2, DCP+3, DCP+4, DCP+7, RV+3, RV+5, RV+6 |
ORP | HSHCHK+8~, HSHCHK+11*, HSHCHK+14, HSHCHK+16, HSHCHK+24, HSHCHK+37 |
>> PKI | CER+4*, CER+7, CER+8, CER+9, ACT+3, DCP+4, DCP+5, DCV1 |
>> PKI1 | CER+6*, CER+9*, CER+11 |
>> PKID | L1+1* |
>> PKIE | CER+6*, CER+7*, CER+10*, CER+13*, CER+14*, L1+1, DCP+4*, DCP+6, DCV1 |
PKIOR | DCP+1~, DCP+5*, DCP+6 |
PKIORM | DCP+1~, DCP+6*, DCP+7 |
PKIR | REA+3*, REA+4!, ACT+4, ACT+5!, DCV+1!, DCV+8*, DCV0+5, DCV1~*, ADR+3 |
PKIRT | CER+2~, CER+3, CER+4, CER+8 |
PKIX | DCV0+5~*, DCV0+6 |
PND0 | HSHCHK+8~, HSHCHK+10*, HSHCHK+11, HSHCHK+17, HSHCHK+18, HSHCHK+20, HSHCHK+26, HSHCHK+28 |
PNP | HSHCHK~, HSHCHK+9, HSHCHK+10, HSHCHK+22, HSHCHK+38, HSHCHK+39 |
PSIEN | VERIFY~, VERIFY+7, VERIFY+9, VERIFY+20, VERIFY+21, INSTAD+1 |
PSIG | VERIFY+6~, VERIFY+19~, VERIFY+22*, VERIFY+23, HSHCHK+8~ |
PSIG( | HSHCHK+40*, HSHCHK+41 |
PSO0 | VERIFY+6~, VERIFY+9*, VERIFY+10, VERIFY+12, VERIFY+15, VERIFY+17, VERIFY+24, VERIFY+25, VERIFY+26, VERIFY+27 , VERIFY+32, VERIFY+33, VERIFY+35, VERIFY+37 |
>> PSODFN | ALERT+11 |
>> PSONEW("QFLG" | REA+4* |
PSONOOR | DCV0+5, DCV1~* |
>> PSONV | DCV1 |
>> PSORX("DFLG" | REA+4* |
PSOX | ALERT+9~*, ALERT+11 |
PSOX( | ALERT+10* |
RET | VERIFY~, VERIFY+7*, VERIFY+34*, VERIFY+36*, VERIFY+38*, VERIFY+39*, VERIFY+41*, VERIFY+42*, VERIFY+43*, VERIFY+44* , VERIFY+45*, VERIFY+46*, VERIFY+47*, VERIFY+48*, VERIFY+49*, VERIFY+50*, VERIFY+51*, VERIFY+52* |
SG | RV+1~, RV+7* |
SIGFL | HSHCHK+8~ |
>> ST | L1+1 |
T | RV+1~, RV+2*, RV+3*, RV+5, RV+6 |
T1 | RV+1~, RV+4*, RV+5*, RV+6 |
T2 | RV+1~, RV+2*, RV+4, RV+7*, RV+8* |
TMP | HSHCHK+8~ |
TMP( | HSHCHK+16* |
TMP(1 | HSHCHK+17, HSHCHK+19, HSHCHK+20 |
TMP(2 | HSHCHK+25, HSHCHK+26 |
TMP(4 | HSHCHK+29 |
TMP(5 | HSHCHK+30, HSHCHK+31, HSHCHK+32, HSHCHK+33, HSHCHK+34, HSHCHK+35 |
TY | RV+1~ |
TY( | RV+4*, RV+7* |
VADD | HSHCHK+8~ |
VADD(1 | INSTAD+3*, INSTAD+5 |
VADD(2 | INSTAD+3*, INSTAD+5 |
VADD(3 | INSTAD+3*, INSTAD+5 |
VADD(4 | INSTAD+4*, INSTAD+5 |
VADD(5 | INSTAD+4*, INSTAD+5 |
VADD(6 | INSTAD+4*, INSTAD+5 |
>> VADM(1 | VERIFY+13, HSHCHK+29 |
VADR | HSHCHK+8~ |
VADR(4 | INSTAD+3, INSTAD+4 |
>> VALMBCK | DCV+3*, DCV+7* |
>> VALMSG | CER+8*, CER+12*, DCV+3*, DCV+7* |
>> VAPA(1 | VERIFY+14, HSHCHK+30 |
>> VAPA(2 | VERIFY+14, HSHCHK+31 |
>> VAPA(3 | VERIFY+14, HSHCHK+32 |
>> VAPA(4 | VERIFY+14, HSHCHK+33 |
>> VAPA(5 | VERIFY+14, HSHCHK+34 |
>> VAPA(6 | VERIFY+14, HSHCHK+35 |
>> VAPA(7 | VERIFY+14 |
Y | REA+3, REA+5!, DCV+3, DCV+8 |