Routine: PSSPOIMN

Package	Total	Call Graph
VA Fileman	6	DD^%DT (,IX)^DIC FILE^DICN ^DIE $$GET1^DIQ ^DIR
Pharmacy Data Management	4	DRG^PSSDGUPD DRG^PSSHUIDG (,EN,END,MESS,OTHER)^PSSPOIM1 EN2^PSSUTIL
National Drug File	1	($$PSJDF,$$VAGN)^PSNAPIS

Package	Total	Caller Graph
Pharmacy Data Management	2	PSS MAINTAIN ORDERABLE ITEMS PSSDEE1

Entry Points

External References

Name	Field # of Occurrence
DD^%DT	MAS+7, MODT+1
^DIC	MCHA+1, LOOK+1
IX^DIC	BEG+7
FILE^DICN	MCHAN+12
^DIE	REM+2, MCH+1, MCHAN+6, MCHAN+12, LOOK+1
$$GET1^DIQ	END+3, END+4
^DIR	PSSPOIMN+9, MAS+8, DISP+1, DISPO, MCHA, MCHA+2, MCHAN+3, LOOK+2, MORE+9, MOREZ+1 , MOREH+1
$$PSJDF^PSNAPIS	MAS+1, TMP+1
$$VAGN^PSNAPIS	MAS+1
DRG^PSSDGUPD	END+4
DRG^PSSHUIDG	END
^PSSPOIM1	REM+2, MCH+1, MCHAN+6, MCHAN+11, LOOK+1
EN^PSSPOIM1	COM
END^PSSPOIM1	END+5
MESS^PSSPOIM1	PSSPOIMN+10
OTHER^PSSPOIM1	REM+1, MCH
EN2^PSSUTIL	SETX+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?3,"Orderable Item Auto-Create has not been completed yet!",! Line Location: PSSPOIMN+9
Function Call: WRITE	Prompt: !! Line Location: BEG+3
Function Call: WRITE	Prompt: !! Line Location: BEG+4
Function Call: WRITE	Prompt: !,$C(7),"Another person is editing this one." Line Location: BEG+6
Function Call: WRITE	Prompt: !,$C(7),"Another person is editing this one." Line Location: BEG+7
Function Call: WRITE	Prompt: !!,PSNAME," is already matched to",!!,?5,$P($G(^PS(50.7,POINT,0)),"^")_" "_$P($G(^PS(50.606,+$P($G(^(0)),"^",2),0)),"^"),! Line Location: MAS+4
Function Call: WRITE	Prompt: !,"This Orderable Item has an Inactive Date. *** "_Y,!,"To modify the Orderable Item, use the 'Edit Orderable Item' option." Line Location: MAS+7
Function Call: WRITE	Prompt: ! Line Location: MAS+8
Function Call: WRITE	Prompt: !,TT," ",$P($G(^PS(50.7,SPT,0)),"^")_" "_$P($G(^PS(50.606,+$P($G(^(0)),"^",2),0)),"^") Line Location: DISP+0
Function Call: WRITE	Prompt: @IOF Line Location: DISP+1
Function Call: WRITE	Prompt: !,?3,"Dispense Drug -> ",PSNAME,! Line Location: DISP+1
Function Call: WRITE	Prompt: ! Line Location: DISPO+0
Function Call: WRITE	Prompt: !!,?5,"INVALID NUMBER" Line Location: DISPO+1
Function Call: WRITE	Prompt: !?3,"Dosage Form -> ",DOSEFORM,!! Line Location: MCHA+0
Function Call: WRITE	Prompt: !!?3,"Dose Form -> ",$G(Y(0,0)) Line Location: MCHA+1
Function Call: WRITE	Prompt: ! Line Location: MCHA+2
Function Call: WRITE	Prompt: !! Line Location: MCHAN+0
Function Call: WRITE	Prompt: !,"VA Generic Name -> ",VAGEN,! Line Location: MCHAN+0
Function Call: WRITE	Prompt: !,?3,"Dosage Form -> ",DOSEFORM,!,?3,"Dispense Drug -> ",PSNAME,!! Line Location: MCHAN+1
Function Call: WRITE	Prompt: $C(7),!!?5,"??" Line Location: MCHAN+4
Function Call: WRITE	Prompt: !!!?3,"Enter ?? for Pharmacy Orderable Item List!",! Line Location: LOOK+0
Function Call: WRITE	Prompt: ! Line Location: LOOK+2
Function Call: WRITE	Prompt: !,"Match Complete!",! Line Location: COM+0
Function Call: WRITE	Prompt: !!!,"There are "_$S('$G(PSSMORS):"IV Additives",'$G(PSSMORA):"IV Solutions",1:"IV Additives and IV Solutions")_" tied to this Dispense Drug." Line Location: MORE+7
Function Call: WRITE	Prompt: !,"By rematching the Dispense Drug to a new Pharmacy Orderable Item, all of these",!,$S('$G(PSSMORS):"IV Additives",'$G(PSSMORA):"IV Solutions",1:"IV Additives and IV Solutions")_" will also be rematched to the new Orderable Item.",! Line Location: MORE+8
Function Call: WRITE	Prompt: ! Line Location: MORE+9
Function Call: WRITE	Prompt: @IOF Line Location: MORE+10
Function Call: WRITE	Prompt: !,$S('$G(PSSMORA):"IV Solutions",'$G(PSSMORS):"IV Additives",1:"IV Additives/Solutions"),!,"------------" Line Location: MORE+11
Function Call: WRITE	Prompt: "----------" Line Location: MORE+11
Function Call: WRITE	Prompt: ! Line Location: MORE+17
Function Call: WRITE	Prompt: ! Line Location: MOREZ+1
Function Call: WRITE	Prompt: @IOF Line Location: MOREH+2
Function Call: WRITE	Prompt: ?50,$G(Y) Line Location: MODT+1
Routine Call	DIE Line Location: REM+2 MCH+1 MCHAN+6 MCHAN+12 LOOK+1
Routine Call	DIC Line Location: MCHA+1 LOOK+1
Routine Call	DIR Line Location: PSSPOIMN+9 MAS+8 DISP+1 DISPO MCHA MCHA+2 MCHAN+3 LOOK+2 MORE+9 MOREZ+1 MOREH+1
Routine Call	DIC Line Location: BEG+7

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(50.606 - [#50.606]	MAS+4, DISP, MCHA+3
^PS(50.7 - [#50.7]	MAS+4, MAS+7, TMP, DISP, MCHAN+5, SET+1, SETX+1
^PS(52.6 - [#52.6]	MORE+4, MORE+13, MORE+15, MORE+16
^PS(52.7 - [#52.7]	MORE+5, MORE+19, MORE+21, MORE+22
^PS(59 - [#59]	END+2
^PS(59.7 - [#59.7]	PSSPOIMN+9
^PSDRUG - [#50]	BEG, BEG+7, MAS+1, MAS+4, END, TMP, TMP+2, TMP+3, SETX+1!
^PSDRUG("AND"	TMP
^TMP($J	REM+1, REM+2, TMP!, TMP+2, TMP+3*, DISP, DISPO+1, DISPO+2, MCH, MCH+1

Label References

Name	Line Occurrences
BEG	MAS+8, MAS+11
COM	REM+2, MCH+1, MCHAN+6, MCHAN+12, LOOK+1
DISP	REM+1, MCH
DISPO	DISPO+1
END	BEG+7, MAS+8
LOOK	MCHA, MCHA+3, LOOK+1
MCH	MAS+10
MCHA	REM+3
MCHAN	MCHAN+4, MCHAN+8, MCHAN+12, LOOK+2
MODT	MORE+16, MORE+22
MORE	MAS+8
MOREH	MORE+14, MORE+20
MOREZ	MORE+12
REM	MAS+8
SET	MAS+8
SETX	MAS+8
TMP	MAS+3, REM

Naked Globals

Name	Field # of Occurrence
^(0	MAS+4, DISP, MORE+21
^(2	MAS+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> COMM	MCHAN+5*, MCHAN+6
>> D	BEG+4*
>> DA	MAS+1, REM+2, TMP+1, MCH+1, MCHAN+6, MCHAN+12, LOOK+1*
DD	MCHAN+12!
DIC	BEG+4!, MCHA+1!, MCHAN+12!, LOOK+1!
DIC("A"	BEG+4, MCHA+1
DIC("DR"	MCHAN+12*
DIC("S"	BEG+1!, BEG+7!, LOOK+1*
DIC(0	BEG+4, MCHA+1, MCHAN+12, LOOK+1
DIE	REM+2!, MCH+1!, MCHAN+6!, MCHAN+12, LOOK+1*
DIR	PSSPOIMN+9!, MAS+8!, DISP+1!, DISPO!, MCHA!, MCHA+2!, MCHAN+2!, LOOK+2!, MORE+9!, MOREZ+1! , MOREH+1!
DIR("A"	PSSPOIMN+9, MAS+8, DISPO, MCHA, MCHA+2, MCHAN+2, LOOK+2, MORE+9, MOREZ+1, MOREH+1
DIR("B"	MAS+8, MCHA, MCHA+2, MCHAN+2, LOOK+2*
DIR(0	PSSPOIMN+9, MAS+8, DISP+1, DISPO, MCHA, MCHA+2, MCHAN+2, LOOK+2, MORE+9, MOREZ+1 , MOREH+1*
DMFU	END+1~, END+3*, END+4
DNSNAM	END+1~, END+4*
DNSPORT	END+1~, END+4*
DO	MCHAN+12!
>> DOSA	TMP+1*
DOSEFORM	BEG+1!, MAS~, MAS+2, MCHA, MCHA+1, MCHA+2, MCHA+3, MCHAN+1
DOSEFV	BEG+1!, MAS~, MAS+1*, TMP+1
>> DOSEPTR	MAS+1, MAS+2, MCHA+1*, MCHA+3, MCHAN+5, MCHAN+12
>> DR	REM+2, MCH+1, MCHAN+6, MCHAN+12, LOOK+1*
>> DTOUT	BEG+7, DISPO, MCHA, MCHA+1, MCHA+3, MCHAN+3
>> DUOUT	BEG+7, MCHA+1, MCHA+3, MCHAN+3
DVER	END+1~, END+3*, END+4
>> FFF	TMP+2*
IOF	DISP+1, MORE+10, MOREH+2
IOSL	DISP, MORE+14, MORE+20
>> K	MAS+1, TMP+1
>> MATCH	REM+2, DISP, DISPO+2, MCH+1
NEWSP	BEG+1!, MAS~, MCHAN+12, LOOK+1
>> NODE	MAS+1*, TMP
>> NOFLAG	TMP+2*, TMP+3
>> OTH	TMP*, TMP+1
POINT	BEG+1!, MAS~, MAS+4*, MAS+6, MAS+7, MAS+8, TMP, SET+1
>> PSCNT	TMP, TMP+3
>> PSIEN	BEG, BEG+7*, MAS+1, MAS+4, END, END+4, REM+2, MCH+1, MCHAN+6, MCHAN+12 , LOOK+1, SETX+1, MORE+1, MORE+4, MORE+5, MORE+13, MORE+19
PSITEM	BEG+1!, MAS~, MAS+4, REM+2, MCH+1, MCHAN+6, MCHAN+12, LOOK+1, COM, SETX+1
>> PSMAN	MCHAN+10*
PSMASTER	BEG+1!, MAS, MAS+8, MAS+11
>> PSNAME	BEG+7*, MAS+4, DISP+1, MCHAN+1
>> PSNO	REM+2, MCH+1, MCHAN+5*, MCHAN+6, MCHAN+8, MCHAN+12, LOOK+1
>> PSOUT	BEG+4, MAS, REM+2, DISP, DISPO, DISPO+3*, MCH+1, MCHAN+5, MCHAN+6, MCHAN+7 , MCHAN+12, LOOK+1
PSSCROSS	BEG+1!
PSSDXL	SET+1*, SETX+1, SETX+2!
PSSDXLF	MAS+9!, SET+1*, SETX+1, SETX+2!
>> PSSHUIDG	END
PSSIAD	MAS+6~, MAS+7*
PSSITE	PSSPOIMN+9*!, PSSPOIMN+10!
PSSMODT	MORE+2~, MORE+16, MORE+22, MODT+1
PSSMORA	MORE+2~, MORE+3, MORE+4, MORE+6, MORE+7, MORE+8, MORE+9, MORE+11, MORE+12
PSSMORS	MORE+2~, MORE+3, MORE+5, MORE+6, MORE+7, MORE+8, MORE+9, MORE+11, MORE+18
PSSMZ	MORE+2~, MORE+13, MORE+15, MORE+16, MORE+19, MORE+21, MORE+22
PSSMZOUT	MORE+2~, MORE+3, MORE+12, MORE+13, MORE+14, MORE+19, MORE+20, MOREZ+1, MOREH+1
>> PSSP	REM+2, MCH+1, MCHAN+6, LOOK+1
PSTOP	BEG+1!, MAS~
PSVAR1	BEG+1!, MAS~, MCHAN+12*
SPHOLD	BEG+1!, MAS~, MCHAN+5*, MCHAN+12
>> SPT	DISP*
>> STOP	MCHAN+5, MCHAN+6, MCHAN+8, MCHAN+9
>> TMPTR	TMP+2*
>> TT	DISP*
>> VAGEN	MAS+1*, MCHAN, MCHAN+2
>> X	MAS+1, MAS+2, TMP+1, MCHAN+4, MCHAN+5, MCHAN+12
XX	END+1~, END+2, END+3, END+4
Y	BEG+7, MAS+7, MAS+8, DISP, DISP+1, DISPO, DISPO+1, DISPO+2, MCHA, MCHA+1 , MCHA+3, MCHAN+3, MCHAN+5, MCHAN+12, LOOK+1, LOOK+2, MORE+9, MOREH+1, MODT+1!
Y(0	MCHA+1
>> ZZ	TMP*, TMP+2, TMP+3

Customize PDF page

Package: Pharmacy Data Management

Routine: PSSPOIMN

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

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: