Routine: PSOPKIV1

Information

PSOPKIV1 ;BHAM ISC/MHA - validate PKI cert. ; 05/09/2002 8:15 am

Source file <PSOPKIV1.m>

Package	Total	Call Graph
Outpatient Pharmacy	5	REVERSE^PSOBPSU1 EN^PSOHLSN EN^PSOHLSN1 CAN^PSOTPCAN KV^PSOVER1
VA Fileman	3	NOW^%DTC ^DIK ^DIR
Order Entry Results Reporting	1	VERIFY^ORWOR1
Registration	1	CNTRL^VALM10

Package	Total	Caller Graph
Outpatient Pharmacy	13	PSOCAN1 PSOCAN4 PSONFI PSOORFI1 PSOORFI4 PSOORFIN PSOORNE2 PSOORNE4 PSORN52C PSORXDL PSOVER PSOVER1 PSOVER2
IHS Changes To Pharmacy	1	APSPFNC3

Name	Comments	DBIA/ICR reference
ACT(DA)	;
ADR	;
REA	;
02	;;Drug Schedule missing;;
03	;;DEA # not valid;;
RV	;
01	;;DEA # missing;;
06	;;Smart card Reader not found;;
07	;;Certificate with DEA # not found;;
04	;;Valid Certificate not found;;
05	;;Couldn't load CSP;;
08	;;Certificate not valid for schedule;;
CER	;
DCV	;
DCP	;
DCV1
DCV0
00	;;Order Text is blank;;
AR	;
L1	;
20	;;Certificate expired;;
CT
10	;;Crypto Error (contact IRM);;
15	;;Corrupted (Decode failure);;
22	;;Signature Check failed (Invalid Signature);;
17	;;Certificate revoked;;
16	;;Corrupted (Hash mismatch);;
ERR(ER)	;
18	;;Verification failure;;
21	;;No Cert with a valid date found;;
19	;;Before Cert effective date;;

Name	Line Occurrences (* Changed, ! Killed)
^PS(52.4 - [#52.4]	DCV0
^PS(52.41 - [#52.41]	DCP+1, DCP+2!, DCP+3, DCP+4, DCP+5, RV+3, RV+5, RV+6
^PSRX - [#52]	CER+3, ACT+3, ACT+4, AR+1, DCV0+1, DCV0+3, ADR+1, ADR+2, ADR+3*
^TMP(	L1+1*

Name	Field # of Occurrence
>> %	ACT+3, DCV0+3, ADR+2
DA	CER+3, 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
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
DT	DCV0+1
DUZ	ACT+3, DCV0+3, ADR+2
ER	ERR~, ERR+1
ERM	ERR+2~*
I	ACT+2~, AR+1*, DCV0+2~
>> IEN	L1+1*
>> INCOM	DCV+4*
>> IORVOFF	RV+9
>> IORVON	RV+9
J	ACT+2~, ACT+3, ACT+4, AR+1, AR+2, DCV0+2~, DCV0+3, DCV0+4*, ADR+1, ADR+2 , ADR+3
MIG	RV+1~, RV+6*, RV+7
>> OR0	CER+2, REA+4
>> ORD	DCP+1, DCP+2, DCP+3, DCP+4, DCP+5, RV+3, RV+5, RV+6
P1	CER+1~, CER+2, CER+3, CER+4, CT
P2	CER+1~, CER+2, CER+3, CT
>> PKI	CER+4, CT+1, CT+2, CT+3, ACT+3, DCP+4, DCV1
>> PKI1	CT+3*, CT+6
>> PKID	L1+1*
>> PKIE	CT+1, CT+4, CT+6, L1+1, DCP+4, DCP+5, DCV1, RV+9
PKIR	REA+3, REA+4!, ACT+4, ACT+5!, DCV+1!, DCV+8, DCV0+5, DCV1~*, ADR+3
PKIRT	CT~, CT+1, CT+2
PKIX	DCV0+5~*, DCV0+6
>> PSONEW("QFLG"	REA+4*
PSONOOR	DCV0+5, DCV1~*
>> PSONV	DCV1
>> PSORX("DFLG"	REA+4*
>> PSOZVER	CT+5
SG	RV+1~, RV+7*
>> 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, RV+9
TY	RV+1~
TY(	RV+4, RV+7
>> VALMBCK	DCV+3, DCV+7
>> VALMSG	CER+4, CT+1, CT+2, CT+5, DCV+3, DCV+7
Y	REA+3, REA+5!, DCV+3, DCV+8