Routine: PSSDOSER

Package	Total	Call Graph
Pharmacy Data Management	6	DRG^PSSDGUPD ($$TEST,MS)^PSSDSPOP DRG^PSSHUIDG (EN2,LOC)^PSSUTIL $$SUPRA^PSSUTIL3 CHECK^PSSUTLPR
VA FileMan	4	^DIC ^DIE $$GET1^DIQ ^DIR
National Drug File	1	$$DFSU^PSNAPIS

Package	Total	Caller Graph
Pharmacy Data Management	2	PSS EDIT DOSAGES PSSDOS

Entry Points

Name	Comments	DBIA/ICR reference
DOS	;Edit dosages
RES	;
SKIP	;
DOSA
DOSLOC	;
LOCX	;
LOC	; Edit local dose
STR	;Edit strength
CHECK	;
END
ULK	;
BCMA	;
BCMA1	;
STUN
NATND
PR
XNWS	;
MPD	; manually enter poosible dosage

External References

Name	Field # of Occurrence
^DIC	DOS+3, DOSA+4, LOC+2
^DIE	DOSA+7, LOC+5, LOC+8, STR+9, BCMA+3, BCMA1+3
$$GET1^DIQ	ULK+5, ULK+6
^DIR	DOS+11, RES+6, DOSLOC+4, STR+4, STR+8, MPD+2
$$DFSU^PSNAPIS	CHECK+3, NATND+1
DRG^PSSDGUPD	ULK+6
$$TEST^PSSDSPOP	LOC+8
MS^PSSDSPOP	XNWS+3
DRG^PSSHUIDG	ULK+3
EN2^PSSUTIL	RES+6
LOC^PSSUTIL	LOCX+6
$$SUPRA^PSSUTIL3	CHECK+4
CHECK^PSSUTLPR	DOS+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: DOS+3
Function Call: WRITE	Prompt: ! Line Location: DOS+3
Function Call: WRITE	Prompt: !!,"This entry is marked for the following PHARMACY packages:" Line Location: DOS+6
Function Call: WRITE	Prompt: !," (none)" Line Location: DOS+10
Function Call: WRITE	Prompt: !!,$C(7),"Another person is editing this drug.",! Line Location: DOS+11
Function Call: WRITE	Prompt: !!,PSSNAME_$S($G(PSSNFID):" N/F",1:"") Line Location: DOS+12
Function Call: WRITE	Prompt: ?52,"Inactive Date: "_$S($G(PSSIND):$E(PSSIND,4,5)_"/"_$E(PSSIND,6,7)_"/"_$E(PSSIND,2,3),1:"") Line Location: DOS+12
Function Call: WRITE	Prompt: !,"This drug has been set within the National Drug File to "_$S(PSSUPRA="NN":"not ",1:"")_"auto create "_$S(PSSUPRA="NO":"only one ",PSSUPRA="NB":"two ",1:""),!,"possible dosage"_$S(PSSUPRA="NO":".",1:"s."),! Line Location: RES+11
Function Call: WRITE	Prompt: ! Line Location: DOSA+1
Function Call: WRITE	Prompt: ! Line Location: DOSA+7
Function Call: WRITE	Prompt: ! Line Location: DOSLOC+4
Function Call: WRITE	Prompt: ! Line Location: LOC+2
Function Call: WRITE	Prompt: ! Line Location: LOC+5
Function Call: WRITE	Prompt: ! Line Location: STR+4
Function Call: WRITE	Prompt: !!,"Changing the strength will not change the concentration." Line Location: STR+5
Function Call: WRITE	Prompt: ! Line Location: STR+6
Function Call: WRITE	Prompt: ! Line Location: STR+8
Function Call: WRITE	Prompt: ! Line Location: STR+9
Function Call: WRITE	Prompt: ! Line Location: STR+9
Function Call: WRITE	Prompt: !!,"Deleting Strength has deleted all Possible Dosages!",! Line Location: STR+10
Function Call: WRITE	Prompt: !!,"Strength: ",?30,"Unit: " Line Location: PR+3
Function Call: WRITE	Prompt: !!,"Strength from National Drug File match => "_$S($E($G(PSSNATST),1)=".":"0",1:"")_$G(PSSNATST)_" "_$P($G(^PS(50.607,+$G(PSSUN),0)),"^") Line Location: XNWS+2
Function Call: WRITE	Prompt: !,"This drug has been set within the National Drug File to "_$S(PSSUPRA="NN":"not ",1:"")_"auto create "_$S(PSSUPRA="NO":"only one ",PSSUPRA="NB":"two ",1:""),!,"possible dosage"_$S(PSSUPRA="NO":".",1:"s."),! Line Location: MPD+6
Routine Call	DIC Line Location: DOS+3 DOSA+4 LOC+2
Routine Call	DIE Line Location: DOSA+7 LOC+5 LOC+8 STR+9 BCMA+3 BCMA1+3
Routine Call	DIR Line Location: DOS+11 RES+6 DOSLOC+4 STR+4 STR+8 MPD+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PSDRUG - [#50]	Classic Fileman Calls
^PS(59 - [#59]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(50.606 - [#50.606]	CHECK+7, CHECK+9, CHECK+10
^PS(50.607 - [#50.607]	DOSA+1, CHECK+7, PR+2, XNWS+2, XNWS+3
^PS(59 - [#59]	ULK+4
^PS(59.7 - [#59.7]	DOSA+6, LOC+4
^PSDRUG - [#50]	DOS+4, DOS+5, DOS+11, RES+2!, RES+5, RES+6, SKIP+2, DOSA, DOSLOC+2, DOSLOC+3 , LOC+6, STR+10!, CHECK+2, ULK+7, BCMA+1, BCMA+2, BCMA1+1, BCMA1+2, STUN, NATND , XNWS+3, MPD+1*, MPD+2

Label References

Name	Line Occurrences
BCMA	DOSA+7
BCMA1	LOC+7
CHECK	RES+3
DOS	DOS+11, DOSLOC+4, LOC+2, LOC+7, LOC+8
DOSA	DOSA+8, MPD+7
DOSLOC	DOSA+4, DOSA+7
END	DOS+1, DOS+2, DOS+3
LOC	LOCX+1, LOCX+2, LOC+6, LOC+9
LOCX	SKIP+2, MPD+2
MPD	RES+4
NATND	LOC+1
PR	LOC+1
RES	RES+6
SKIP	RES+5
STR	RES+5, MPD+7
STUN	RES+1, LOC+1
ULK	DOSLOC+4, LOC+2, LOC+7, LOC+8
XNWS	RES+5, MPD+7

Naked Globals

Name	Field # of Occurrence
^("DOS"	STUN
^("I"	DOS+4
^("ND"	CHECK+2, NATND
^(0	DOS+4, DOSA+1, DOSLOC+3, XNWS+3
^(2	BCMA+1, BCMA1+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	DOSA+7, LOC+5, LOC+8!, STR+9, BCMA+3, BCMA1+3
DA(1	DOSA+4, DOSA+7, LOC+2, LOC+5, LOC+8, BCMA+3, BCMA1+3*
DIC	DOS+3!, DOSA+4!, LOC+2!*
DIC("A"	DOS+3, DOSA+4
DIC("W"	DOSA+5, LOC+3
DIC(0	DOS+3, DOSA+4, LOC+2*
DIDEL	LOC+8!
DIE	DOSA+7!, LOC+5!, LOC+8!, STR+9!, BCMA+3!, BCMA1+3!
>> DILOCKTM	DOS+11
DIR	DOS+11!, RES+6!, RES+7!, DOSLOC+4!, STR+4!, STR+6!, STR+8!, MPD+2!, MPD+3!
DIR("?"	RES+7, RES+8, RES+9, DOSLOC+5, DOSLOC+6, STR+4, STR+7, MPD+3, MPD+4*
DIR("A"	DOS+11, RES+7, DOSLOC+4, STR+4, STR+8, MPD+3
DIR("B"	RES+7, DOSLOC+4, STR+4, STR+8, MPD+3*
DIR(0	DOS+11, RES+7, DOSLOC+4, STR+4, STR+6, MPD+3
DLAYGO	DOSA+4!, LOC+2!
DMFU	ULK+2~, ULK+5*, ULK+6
DNSNAM	ULK+2~, ULK+6*
DNSPORT	ULK+2~, ULK+6*
DR	DOSA+7, LOC+5, LOC+8!, STR+9, BCMA+3, BCMA1+3
>> DTOUT	DOS+3, DOSA+4, DOSA+7, LOC+2, LOC+7, LOC+8
>> DUOUT	DOS+3, DOSA+4, LOC+2
DVER	ULK+2~, ULK+5*, ULK+6
PSS11	STR+1~
PSSDESTP	XNWS+1~*, XNWS+4!
PSSDIEN	LOCX+6*!
PSSDOSA	DOSA+6, DOSA+7, LOC+4, LOC+5, LOC+6, LOC+8, END!, BCMA+2, BCMA+3, BCMA1+2 , BCMA1+3
>> PSSHUIDG	ULK+3
PSSIEN	DOS+4*, DOS+5, DOS+11, RES+2, RES+5, RES+6, SKIP+2, DOSA, DOSA+4, DOSA+7 , DOSLOC+2, DOSLOC+3, LOCX+6, LOC+2, LOC+5, LOC+6, LOC+8, STR+9, STR+10, CHECK+2 , END!, ULK+1, ULK+3, ULK+6, ULK+7, BCMA+1, BCMA+2, BCMA+3, BCMA1+1, BCMA1+2 , BCMA1+3, STUN, NATND, XNWS+3, MPD+1, MPD+2
PSSIENS	STR+1~
PSSIND	DOS+4*, DOS+12, END!
PSSIZZ	DOS+13, LOCX+2, LOCX+4, LOCX+5, CHECK+1!, CHECK+9, END!
PSSNAME	DOS+4*, DOS+12, END!
PSSNAT	CHECK+1!, CHECK+2, CHECK+3, CHECK+4, END!, NATND, NATND+1
PSSNAT1	CHECK+2, CHECK+3, END!, NATND, NATND+1
PSSNATDF	CHECK+1!, CHECK+3, CHECK+6, CHECK+7, CHECK+9, CHECK+10, END!, NATND+1
PSSNATND	CHECK+1!, CHECK+3, END!, NATND+1
PSSNATST	CHECK+1!, CHECK+3, CHECK+6, CHECK+8, END!, NATND+1, PR, PR+1, XNWS+2, MPD+1
PSSNATUN	CHECK+1!, CHECK+3, CHECK+6, CHECK+7, CHECK+9, CHECK+10, END!, NATND+1, PR, PR+2 , MPD+1
PSSNFID	DOS+4*, DOS+12, END!
PSSNOCON	DOS+1!, END!
PSSONLYI	LOCX+3!, LOCX+5*, LOCX+6!
PSSONLYO	LOCX+3!, LOCX+4*, LOCX+6!
PSSOTH	DOSA+6, LOC+4, LOC+5!
PSSOZZ	DOS+13, LOCX+2, LOCX+4, LOCX+5, CHECK+1!, CHECK+10, END!
PSSPCI	DOSLOC+1, DOSLOC+3, DOSLOC+4!, DOSLOC+7!
PSSPCO	DOSLOC+1, DOSLOC+3, DOSLOC+4!, DOSLOC+7!
PSSPCZ	DOSLOC+2*, DOSLOC+3, DOSLOC+4!, DOSLOC+7!
PSSPKG	DOS+5*, DOS+7, DOS+8, DOS+9, DOS+10, DOS+11!
PSSSKIPP	DOS+13, RES+6, DOSA+2, LOCX+1, END!
PSSST	RES+2, RES+5, DOSA, DOSA+1, END!, STUN, PR, PR+1
PSSTALK	LOCX+6*!
PSSUN	DOSA+1, END!, STUN*, PR, PR+2, XNWS+2, XNWS+3
>> PSSUPRA	RES+4, RES+11, DOSA+2, DOSA+3, CHECK+4*, MPD+6
PSSXYZ	RES+3, RES+4, RES+6, SKIP+1!, CHECK+9, CHECK+10*, END!, MPD+2!
PSSZ	RES+4!, SKIP+1!, DOSA+2, DOSLOC+1!, MPD+2!, MPD+6
XX	ULK+2~, ULK+4, ULK+5, ULK+6
>> Y	DOS+3, DOS+4, RES+6, DOSA+4, DOSA+6, DOSA+7, DOSLOC+4, LOC+2, LOC+4, LOC+7 , LOC+8, STR+4, STR+8, MPD+2

Customize PDF page

Package: Pharmacy Data Management

Routine: PSSDOSER

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: