Routine: PSS50

Package	Total	Call Graph
Pharmacy Data Management	15	(LABEL,SORT)^PSS50A1 ATC^PSS50ATC (DOSE,INV,NDF)^PSS50B (AIU,AQ1,AVSN,IU)^PSS50B1 (CLOZ,FRMALT)^PSS50B2 ($$NOCMOP,AB,IEN,MRTN,MSG,WS,ZERO)^PSS50C (CSYN,DSPUNT)^PSS50C1 CMOP^PSS50CMP (AND,AP,ASP,B,NDC,VAC)^PSS50D (DATA,DRG)^PSS50DAT ($$SKAIU,$$SKAQ,$$SKAQ1,$$SKB,$$SKIU,A526,A527,AOC,C)^PSS50E ($$ADDOLDNM,$$EDTIFCAP,OLDNM)^PSS50F (LIST,LOOKUP)^PSS50F1 LAB^PSS50LAB ARWS^PSS50WS

Package	Total	Caller Graph
Order Entry Results Reporting	15	ORALWORD ORBCMA32 ORDEA ORDSGCHK ORKPS ORMFN ORPEAPI ORPRPM ORUTL3 ORWDPS33 ORWDXA ORWGAPIC ORY350A ORY389 ORY423A
Clinical Case Registries	8	RORHL031 RORHL21 RORRP017 RORRP032 RORUTL15 RORUTL16 RORUTL22 RORXU007
Integrated Billing	7	IBNCPDP IBNCPDR IBNCPDR4 IBNCPDRA IBNCPEV1 IBRXUTL IBRXUTL1
Surgery	6	SRHLUO3 SROADOC1 SROANP SROCODE SROINQ SROMED
Virtual Patient Record	4	VPRDJ05 VPRDJ05V VPRDPS VPRSDAP
Adverse Reaction Tracking	3	GMRAOR GMRAPENC GMRARAD1
DSS Extracts	3	ECXDRUG ECXFEKEY ECXUTL5
Health Summary	3	GMTSPST1 GMTSPST2 GMTSPSTN
Outpatient Pharmacy	3	PSODOSUN PSOPFSU1 PSORLST
Enterprise Health Management Platform	2	HMPDJ05 HMPDJ05V
Mental Health	2	YSCLDIS YSCLHLPR
My HealtheVet	2	MHVXRXM MHVXRXM2
Registration	2	DGOTHFS3 DGPPDRP1
Text Integration Utility	2	TIULMED2 TIUMOBJ
Womens Health	2	WVUTL11 WVUTL12
Automated Medical Information Exchange	1	DVBCREPT
Barcode Medication Administration	1	PSBOMT
Clinical Reminders	1	PXRMORCH
Dietetics	1	FHASM4
National Drug File	1	PSNAPIS
National Health Information Network	1	NHINVPS
Radiology Nuclear Medicine	1	RAPSAPI
VA Point of Service	1	VPSPDO2M

Entry Points

Name	Comments	DBIA/ICR reference
DATA(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)	;	ICR #4483 Status: Retired Usage: Supported ICR #4533 Status: Active Usage: Supported
CMOP(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)	;	ICR #4483 Status: Retired Usage: Supported
DRG(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)	;	ICR #4483 Status: Retired Usage: Supported
ATC(PSSIEN,PSSFT,PSSFL,PSSPK,LIST)	;	ICR #4483 Status: Retired Usage: Supported
INV(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)	;	ICR #4483 Status: Retired Usage: Supported
NDF(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)	;	ICR #4483 Status: Retired Usage: Supported ICR #4533 Status: Active Usage: Supported
LAB(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)	;	ICR #4483 Status: Retired Usage: Supported ICR #4533 Status: Active Usage: Supported
CLOZ(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)	;	ICR #4483 Status: Retired Usage: Supported ICR #4533 Status: Active Usage: Supported
ARWS(PSSIEN,PSSFT,LIST)	;	ICR #4483 Status: Retired Usage: Supported ICR #4533 Status: Active Usage: Supported
DOSE(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)	;	ICR #4483 Status: Retired Usage: Supported
WS(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)	;	ICR #4483 Status: Retired Usage: Supported
MRTN(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)	;	ICR #4483 Status: Retired Usage: Supported
ZERO(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)	;	ICR #4483 Status: Retired Usage: Supported ICR #4533 Status: Active Usage: Supported
NOCMOP(PSSIEN,PSSFL)	;	ICR #4483 Status: Retired Usage: Supported ICR #4483 Status: Retired Usage: Supported
MSG(LIST)	;	ICR #4483 Status: Retired Usage: Supported
IEN(LIST)	;	ICR #4483 Status: Retired Usage: Supported
B(PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)	;	ICR #4483 Status: Retired Usage: Supported
VAC(PSSVAL,PSSFL,PSSPK,LIST)	;	ICR #4483 Status: Retired Usage: Supported ICR #4533 Status: Active Usage: Supported
NDC(PSSVAL,PSSFL,PSSPK,LIST)	;	ICR #4483 Status: Retired Usage: Supported ICR #4533 Status: Active Usage: Supported
ASP(PSSVAL,PSSFL,PSSPK,LIST)	;	ICR #4483 Status: Retired Usage: Supported ICR #4533 Status: Active Usage: Supported
AND(PSSVAL,PSSFL,PSSPK,LIST)	;	ICR #4483 Status: Retired Usage: Supported ICR #4533 Status: Active Usage: Supported
AP(PSSVAL,PSSFL,PSSPK,LIST)	;	ICR #4483 Status: Retired Usage: Supported
DSPUNT(PSSIEN,PSSIEN2,LIST)	;	ICR #4483 Status: Retired Usage: Supported
SKB(PSSIEN,PSSFL)	;	ICR #4483 Status: Retired Usage: Supported
AOC(PSSVAL,PSSFL,PSSPK,LIST)	;	ICR #4483 Status: Retired Usage: Supported
C(PSSVAL,PSSFL,PSSPK,LIST)	;	ICR #4483 Status: Retired Usage: Supported
AQ(PSSIEN)	;	ICR #4483 Status: Retired Usage: Supported
SKAQ(PSSIEN,PSSFL)	;	ICR #4483 Status: Retired Usage: Supported
SKAQ1(PSSIEN)	;	ICR #4483 Status: Retired Usage: Supported
AQ1(PSSVAL,PSSFL,PSSPK,LIST)	;	ICR #4483 Status: Retired Usage: Supported
A526(PSSIEN,LIST)	;	ICR #4483 Status: Retired Usage: Supported
A527(PSSIEN,LIST)	;	ICR #4483 Status: Retired Usage: Supported
AIU(PSSFT,PSSPK,PSSFL,LIST)	;	ICR #4483 Status: Retired Usage: Supported
IU(PSSFL,LIST)	;	ICR #4483 Status: Retired Usage: Supported
SKAIU(PSSIEN,PSSFL)	;	ICR #4483 Status: Retired Usage: Supported
SKIU(PSSIEN)	;	ICR #4483 Status: Retired Usage: Supported
AB(PSSVAL,PSSFL,PSSPK,LIST)	;	ICR #4483 Status: Retired Usage: Supported
AVSN(PSSVAL,PSSFL,PSSPK,LIST)	;	ICR #4483 Status: Retired Usage: Supported
FRMALT(PSSIEN,PSSFT,PSSFL,PSSPK,LIST)	;	ICR #4483 Status: Retired Usage: Supported
LABEL(PSSIEN,LIST)	;	ICR #4483 Status: Retired Usage: Supported
SORT(PSSIEN,LIST)	;
OLDNM(PSSIEN,PSSFT,PSSFL,PSSPK,LIST)	;	ICR #4483 Status: Retired Usage: Supported
ADDOLDNM(PSSIEN,PSSONM,PSSDT)	;	ICR #4483 Status: Retired Usage: Supported
LIST(PSSFT,PSSFL,PSSD,PSSPK,LIST)	;	ICR #4483 Status: Retired Usage: Supported
EDTIFCAP(PSSIEN,PSSVAL)	;	ICR #4483 Status: Retired Usage: Supported
LOOKUP(PSSFT,PSSFL,PSSPK,PSSRTOI,PSSIFCAP,PSSCMOP,PSSD,LIST)	;
CSYN(PSSIEN,PSSVAL,LIST)	;	ICR #4483 Status: Retired Usage: Supported
PSSBILSD(PSSIEN,EPHBILSD)	; ; returns eBillable & Sensitive Diagnosis Drug fields from the Drug File(#50) ; Input:PSSIEN - File #50 Drug IEN ; Output:Drug File billable and sensitive diagnosis drug fields ; EPHBILL - EPHARMACY BILLABLE field #84 ; EPHTRI - EPHARMACY BILLABLE (TRICARE) field #85 ; EPHCHAMP - EPHARMACY BILLABLE (CHAMPVA) field #86 ; EPHSENS - EPHARMACY SENSITIVE DIAGNOSIS DRUG field #87	ICR #6245 Status: Active Usage: Controlled Subscription

Name	Field # of Occurrence
LABEL^PSS50A1	LABEL+2
SORT^PSS50A1	SORT+2
ATC^PSS50ATC	ATC+3
DOSE^PSS50B	DOSE+2
INV^PSS50B	INV+2
NDF^PSS50B	NDF+2
AIU^PSS50B1	AIU+2
AQ1^PSS50B1	AQ1+2
AVSN^PSS50B1	AVSN+2
IU^PSS50B1	IU+2
CLOZ^PSS50B2	CLOZ+2
FRMALT^PSS50B2	FRMALT+3
$$NOCMOP^PSS50C	NOCMOP+2
AB^PSS50C	AB+2
IEN^PSS50C	IEN+2
MRTN^PSS50C	MRTN+2
MSG^PSS50C	MSG+2
WS^PSS50C	WS+2
ZERO^PSS50C	ZERO+2
CSYN^PSS50C1	CSYN+2
DSPUNT^PSS50C1	DSPUNT+2
CMOP^PSS50CMP	CMOP+2
AND^PSS50D	AND+3
AP^PSS50D	AP+3
ASP^PSS50D	ASP+3
B^PSS50D	B+2
NDC^PSS50D	NDC+2
VAC^PSS50D	VAC+3
DATA^PSS50DAT	DATA+2
DRG^PSS50DAT	DRG+2
$$SKAIU^PSS50E	SKAIU+5
$$SKAQ^PSS50E	SKAQ+5
$$SKAQ1^PSS50E	SKAQ1+3
$$SKB^PSS50E	SKB+5
$$SKIU^PSS50E	SKIU+3
A526^PSS50E	A526+2
A527^PSS50E	A527+2
AOC^PSS50E	AOC+2
C^PSS50E	C+2
$$ADDOLDNM^PSS50F	ADDOLDNM+2
$$EDTIFCAP^PSS50F	EDTIFCAP+2
OLDNM^PSS50F	OLDNM+3
LIST^PSS50F1	LIST+3
LOOKUP^PSS50F1	LOOKUP+1
LAB^PSS50LAB	LAB+2
ARWS^PSS50WS	ARWS+3

Name	Line Occurrences (* Changed, ! Killed)
^PSDRUG - [#50]	AQ+3, PSSBILSD+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
EPHBILL	PSSBILSD+11~, PSSBILSD+14*, PSSBILSD+18
EPHBILSD	PSSBILSD~, PSSBILSD+11~, PSSBILSD+18*, PSSBILSD+19
EPHCHAMP	PSSBILSD+11~, PSSBILSD+16*, PSSBILSD+18
EPHNODE	PSSBILSD+11~, PSSBILSD+13*, PSSBILSD+14, PSSBILSD+15, PSSBILSD+16, PSSBILSD+17
EPHSENS	PSSBILSD+11~, PSSBILSD+17*, PSSBILSD+18
EPHTRI	PSSBILSD+11~, PSSBILSD+15*, PSSBILSD+18
LIST	DATA~, CMOP~, DRG~, ATC~, INV~, NDF~, LAB~, CLOZ~, ARWS~, DOSE~ , WS~, MRTN~, ZERO~, MSG~, IEN~, B~, VAC~, NDC~, ASP~, AND~ , AP~, DSPUNT~, AOC~, C~, AQ1~, A526~, A527~, AIU~, IU~, AB~ , AVSN~, FRMALT~, LABEL~, SORT~, OLDNM~, LIST~, LOOKUP~, CSYN~
PSSCMOP	LOOKUP~
PSSD	LIST~, LOOKUP~
PSSDT	ADDOLDNM~, ADDOLDNM+2
PSSFL	DATA~, CMOP~, DRG~, ATC~, INV~, NDF~, LAB~, CLOZ~, ARWS+2~, DOSE~ , WS~, MRTN~, ZERO~, NOCMOP~, NOCMOP+2, B~, VAC~, NDC~, ASP~, AND~ , AP~, SKB~, SKB+3, SKB+4, SKB+5, AOC~, C~, SKAQ~, SKAQ+3, SKAQ+4 , SKAQ+5, AQ1~, AIU~, IU~, SKAIU~, SKAIU+3, SKAIU+4, SKAIU+5, AB~, AVSN~ , FRMALT~, OLDNM~, LIST~, LOOKUP~
PSSFT	DATA~, CMOP~, DRG~, ATC~, INV~, NDF~, LAB~, CLOZ~, ARWS~, DOSE~ , WS~, MRTN~, ZERO~, B~, AIU~, FRMALT~, OLDNM~, LIST~, LOOKUP~
PSSIEN	DATA~, CMOP~, DRG~, ATC~, INV~, NDF~, LAB~, CLOZ~, ARWS~, DOSE~ , WS~, MRTN~, ZERO~, NOCMOP~, NOCMOP+2, DSPUNT~, SKB~, SKB+2, SKB+5, AQ~ , AQ+2, AQ+3, SKAQ~, SKAQ+2, SKAQ+5, SKAQ1~, SKAQ1+2, SKAQ1+3, A526~, A527~ , SKAIU~, SKAIU+2, SKAIU+5, SKIU~, SKIU+2, SKIU+3, FRMALT~, LABEL~, SORT~, OLDNM~ , ADDOLDNM~, ADDOLDNM+2, EDTIFCAP~, EDTIFCAP+2, CSYN~, PSSBILSD~, PSSBILSD+12, PSSBILSD+13
PSSIEN2	DSPUNT~
PSSIFCAP	LOOKUP~
PSSONM	ADDOLDNM~, ADDOLDNM+2
PSSPK	DATA~, CMOP~, DRG~, ATC~, INV~, NDF~, LAB~, CLOZ~, ARWS+2~, DOSE~ , WS~, MRTN~, ZERO~, B~, VAC~, NDC~, ASP~, AND~, AP~, AOC~ , C~, AQ1~, AIU~, AB~, AVSN~, FRMALT~, OLDNM~, LIST~, LOOKUP~
PSSRTOI	DATA~, CMOP~, DRG~, ATC+2~, INV~, NDF~, LAB~, CLOZ~, ARWS+2~, DOSE~ , WS~, MRTN~, ZERO~, B~, VAC+2~, ASP+2~, AND+2~, AP+2~, FRMALT+2~, OLDNM+2~ , LIST+2~, LOOKUP~
PSSVAL	VAC~, NDC~, ASP~, AND~, AP~, AOC~, C~, AQ1~, AB~, AVSN~ , EDTIFCAP~, EDTIFCAP+2, CSYN~
U	PSSBILSD+14, PSSBILSD+15, PSSBILSD+16, PSSBILSD+17, PSSBILSD+18

Customize PDF page

Package: Pharmacy Data Management

Routine: PSS50

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 72

Entry Points

External References

Global Variables Directly Accessed

Local Variables

Legend: