Routine: PSOCPC

Package	Total	Call Graph
Outpatient Pharmacy	4	(SCNEW,SETCOMM,XTYPE)^PSOCP ACTLOG^PSOCPA EN^PSOHLSN1 (RESET,SCP)^PSORN52D
VA Fileman	3	EN^DDIOL $$GET1^DIQ ^DIR
Integrated Billing	1	$$STATUS^IBARX

Package

Total

Call Graph

Outpatient Pharmacy

(SCNEW,SETCOMM,XTYPE)^PSOCP ACTLOG^PSOCPA EN^PSOHLSN1 (RESET,SCP)^PSORN52D

VA Fileman

EN^DDIOL $$GET1^DIQ ^DIR

Integrated Billing

$$STATUS^IBARX

Package	Total	Caller Graph
Outpatient Pharmacy	3	PSOCPB PSOCPD REFILL

Package

Total

Caller Graph

Outpatient Pharmacy

PSOCPB PSOCPD REFILL

Entry Points

Name	Comments	DBIA/ICR reference
EXEMCHK	; Allow reset of exemption answers
HELPCV	;
LAST	;find last entry
ENDW	;
SETSUMM	; SET MESSAGE INTO SUMMARY
HELPHNC	;
HELPIR	;
HELPSHAD	;
HELPAO	;
WARN	; Message when attempt is made to delete a refill date on COPAY
ASKEXEM	; ASK THE EXEMPTION QUESTIONS
HELPEXEM	; help text for exemption edit question
HELPSC	;
HELPEC	;
CANCEL	;Check if charge is cancelled for this Refill date
ASKEXEM1
HELPMST	;

External References

Name	Field # of Occurrence
EN^DDIOL	WARN+8, WARN+9
$$GET1^DIQ	EXEMCHK+32
^DIR	EXEMCHK+29, ASKEXEM1
$$STATUS^IBARX	WARN+6
SCNEW^PSOCP	EXEMCHK+16
SETCOMM^PSOCP	ASKEXEM1+6
XTYPE^PSOCP	EXEMCHK+18
ACTLOG^PSOCPA	EXEMCHK+55
EN^PSOHLSN1	EXEMCHK+51
RESET^PSORN52D	EXEMCHK+49
SCP^PSORN52D	EXEMCHK+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"The following exemption flags have been set:" Line Location: EXEMCHK+22
Function Call: WRITE	Prompt: !,$S(EXMT="EC":"SWAC",1:EXMT),": ",?6,$S(PSOTG(EXMT)=1:"Yes",PSOTG(EXMT)=0:"No",1:"") Line Location: EXEMCHK+23
Function Call: WRITE	Prompt: ! Line Location: EXEMCHK+24
Function Call: WRITE	Prompt: ! Line Location: EXEMCHK+25
Function Call: WRITE	Prompt: !,"Editing of exemption flag(s) has resulted in a copay status change.",!,"The status for this Rx will be reset to NO COPAY." Line Location: EXEMCHK+53
Function Call: READ	Prompt: " Are you sure you want to delete this answer? " Formatting: ! Timeout: DTIME Variable: X Line Location: ASKEXEM1+0
Function Call: WRITE	Prompt: !,"Enter 'Y' for Yes if you want to edit any applicable exemption flags such as" Line Location: HELPEXEM+1
Function Call: WRITE	Prompt: !,"Service Connected (SC), Combat Veteran(CV), Agent Orange (AO), Ionizing" Line Location: HELPEXEM+2
Function Call: WRITE	Prompt: !,"Radiation (IR), Southwest Asia Conditions (SWAC), PROJ 112/SHAD," Line Location: HELPEXEM+3
Function Call: WRITE	Prompt: !,"Military Sexual Trauma (MST), or Head and/or Neck Cancer (HNC)." Line Location: HELPEXEM+4
Routine Call	DIR Line Location: EXEMCHK+29 ASKEXEM1

FileNo	Call Tags
^PSRX - [#52]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^IB - [#350]	CANCEL+3, LAST+2
^IB("APDT"	LAST+3
^IBE(350.1 - [#350.1]	CANCEL+3
^PS(53 - [#53]	EXEMCHK+48
^PSRX - [#52]	WARN+3, WARN+4, CANCEL+2, EXEMCHK+3, EXEMCHK+14, EXEMCHK+34, EXEMCHK+35, EXEMCHK+47!, EXEMCHK+48, EXEMCHK+54

Name	Line Occurrences
@(	ASKEXEM+1
ASKEXEM	EXEMCHK+44
ASKEXEM1	ASKEXEM1
CANCEL	WARN+7
ENDW	WARN+3, WARN+5, WARN+6, WARN+7
LAST	CANCEL+3
SETSUMM	EXEMCHK+57, EXEMCHK+59, EXEMCHK+60, SETSUMM+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	WARN+3, WARN+4, CANCEL+2
>> DA(1	WARN+3, WARN+4, CANCEL+2
DIR	EXEMCHK+25!, EXEMCHK+29!, ASKEXEM+1!
DIR("?"	EXEMCHK+27, HELPSC+1, HELPSC+2, HELPSC+3, HELPAO+1, HELPAO+2, HELPIR+1, HELPIR+2, HELPEC+1, HELPEC+2 , HELPMST+1, HELPMST+2, HELPHNC+1, HELPHNC+2, HELPCV+1, HELPCV+2, HELPCV+3, HELPCV+4, HELPSHAD+1, HELPSHAD+2 , HELPSHAD+3, HELPSHAD+4
DIR("??"	EXEMCHK+28*
DIR("A"	EXEMCHK+25, ASKEXEM+1
DIR("B"	EXEMCHK+25, EXEMCHK+26, ASKEXEM+1*, ASKEXEM1+1
DIR(0	EXEMCHK+25, ASKEXEM+1
DTIME	ASKEXEM1
EXMT	EXEMCHK+17~, EXEMCHK+20, EXEMCHK+23, EXEMCHK+26, EXEMCHK+38, EXEMCHK+39, EXEMCHK+40, ASKEXEM+1, ASKEXEM1+3
>> HELPTAG	EXEMCHK+40*, ASKEXEM+1
II	EXEMCHK+31~, EXEMCHK+37, EXEMCHK+58, EXEMCHK+60, ASKEXEM1+3*
OLDIBQ	EXEMCHK+1~, EXEMCHK+3, EXEMCHK+4, EXEMCHK+6, EXEMCHK+7, EXEMCHK+8, EXEMCHK+9, EXEMCHK+10, EXEMCHK+11, EXEMCHK+12 , EXEMCHK+13, EXEMCHK+31~, EXEMCHK+34, EXEMCHK+35*, ASKEXEM1+3
>> PCOPAY	EXEMCHK+52
>> PREA	EXEMCHK+55*
>> PSI	EXEMCHK+57, EXEMCHK+59, EXEMCHK+60, SETSUMM+1, SETSUMM+2*
PSOANS	EXEMCHK+1~, EXEMCHK+2, EXEMCHK+5, EXEMCHK+20*, EXEMCHK+22
PSOCHG	EXEMCHK+31~, EXEMCHK+45
PSOCHG(	EXEMCHK+60, ASKEXEM1+3*
PSOCOMM	EXEMCHK+36, EXEMCHK+56, EXEMCHK+59, EXEMCHK+60, ASKEXEM1+5, SETSUMM+2, SETSUMM+3!
PSOCPN	EXEMCHK+1~, EXEMCHK+14*, EXEMCHK+16
>> PSODA	EXEMCHK+3, EXEMCHK+14, EXEMCHK+15, EXEMCHK+16, EXEMCHK+32, EXEMCHK+34, EXEMCHK+35, EXEMCHK+47, EXEMCHK+48, EXEMCHK+51 , EXEMCHK+54
PSOEXMT	EXEMCHK+1~, EXEMCHK+29*
PSOFLG	WARN+2, WARN+7, WARN+10, ENDW+1, ENDW+2!, CANCEL+1, CANCEL+3
PSOIB	WARN+1~, WARN+4*, WARN+5, WARN+6, WARN+7
PSOIBQ	EXEMCHK+31~, EXEMCHK+33, EXEMCHK+48, EXEMCHK+52, ASKEXEM1+2, ASKEXEM1+3
PSOIBST	WARN+1~, WARN+6*
PSOL	CANCEL+4!, LAST+3*
PSOLAST	CANCEL+3, CANCEL+4!, LAST+1, LAST+3, LAST+4*
PSOLDT	CANCEL+4!, LAST+3*
PSOLTAG	EXEMCHK+31~, EXEMCHK+39*
>> PSONW	EXEMCHK+36, EXEMCHK+55
>> PSOOLD	EXEMCHK+36, EXEMCHK+55
PSOPARNT	CANCEL+3, CANCEL+4!, LAST+2*, LAST+3, LAST+4
PSOPATST	EXEMCHK+31~, EXEMCHK+32*, EXEMCHK+48
>> PSOPFSA	EXEMCHK+50*
PSOQUES	EXEMCHK+31~, EXEMCHK+41, EXEMCHK+42, ASKEXEM+1
>> PSOREF	EXEMCHK+55*
PSOSCA	EXEMCHK+1~
PSOSCP	EXEMCHK+1~, EXEMCHK+48
PSOSUBS	EXEMCHK+31~, EXEMCHK+43*, ASKEXEM1+2, ASKEXEM1+3
>> PSOSUMM(	SETSUMM+1, SETSUMM+2*
PSOTG	EXEMCHK+1~, EXEMCHK+16
PSOTG(	EXEMCHK+20, EXEMCHK+23, EXEMCHK+26, EXEMCHK+38, ASKEXEM+1
PSOTG(""	EXEMCHK+21
PSOTG("AO"	EXEMCHK+8*
PSOTG("CV"	EXEMCHK+12*
PSOTG("EC"	EXEMCHK+10*
PSOTG("HNC"	EXEMCHK+11*
PSOTG("IR"	EXEMCHK+9*
PSOTG("MST"	EXEMCHK+7*
PSOTG("SC"	EXEMCHK+6*
PSOTG("SHAD"	EXEMCHK+13*
PSOX	CANCEL+2*, CANCEL+4!, LAST+2
>> PSOXXDEL	WARN+8, WARN+9
>> RXP	EXEMCHK+15*
>> X	ASKEXEM1, ASKEXEM1+1
>> Y	EXEMCHK+29, ASKEXEM1+1*, ASKEXEM1+2, ASKEXEM1+4

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOCPC

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items