Routine: APSP6MSG

Package	Total	Call Graph
IHS Changes To Pharmacy	1	^APSP6M1
MailMan	1	^XMD
VA Fileman	1	YX^%DTC

Entry Points

Name	Comments	DBIA/ICR reference
XMSET	;SET MAIL VARIABLES
MSG1
TEXT
ZAAP	;KILL ALL VARIABLES ON EXIT
MSG	;SETUP AND SEND EMAIL MSG
RPH	;GET HOLDERS OF 'PSORPH' (PHARMACIST)

External References

Name	Field # of Occurrence
YX^%DTC	TEXT+134
^APSP6M1	TEXT+133
^XMD	MSG1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Now I will send a mail message to all holders of the pharmacy 'PSORPH' KEY.",! Line Location: MSG+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^VA(200 - [#200]	RPH+3
^XUSEC("PSORPH"	RPH+3

Label References

Name	Line Occurrences
MSG1	MSG+4
RPH	XMSET+2
TEXT	MSG+3
XMSET	MSG+2
ZAAP	MSG+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %H	TEXT+134*
APSLNAME	ZAAP+1!
APSP	ZAAP+1!
APSPDG	ZAAP+1!
APSPMSG	MSG1!
APSPMSG(	TEXT+3, TEXT+4, TEXT+9, TEXT+19, TEXT+20, TEXT+38, TEXT+41, TEXT+42, TEXT+45, TEXT+52 , TEXT+56, TEXT+57, TEXT+60, TEXT+61, TEXT+65, TEXT+66, TEXT+67, TEXT+71, TEXT+72, TEXT+74 , TEXT+75, TEXT+76, TEXT+77, TEXT+78, TEXT+83, TEXT+84, TEXT+85, TEXT+90, TEXT+91, TEXT+92 , TEXT+97, TEXT+98, TEXT+102, TEXT+106, TEXT+107, TEXT+111, TEXT+112, TEXT+113, TEXT+114, TEXT+115 , TEXT+116, TEXT+117, TEXT+118, TEXT+132
APSPMSG(1	TEXT*
APSPMSG(10	TEXT+12*
APSPMSG(11	TEXT+13*
APSPMSG(12	TEXT+14*
APSPMSG(13	TEXT+15*
APSPMSG(14	TEXT+16*
APSPMSG(15	TEXT+17*
APSPMSG(16	TEXT+18*
APSPMSG(17	TEXT+21*
APSPMSG(18	TEXT+22*
APSPMSG(19	TEXT+23*
APSPMSG(2	TEXT+1*
APSPMSG(20	TEXT+24*
APSPMSG(21	TEXT+25*
APSPMSG(22	TEXT+26*
APSPMSG(23	TEXT+27*
APSPMSG(24	TEXT+28*
APSPMSG(25	TEXT+29*
APSPMSG(26	TEXT+30*
APSPMSG(27	TEXT+31*
APSPMSG(28	TEXT+32*
APSPMSG(29	TEXT+33*
APSPMSG(3	TEXT+2*
APSPMSG(30	TEXT+34*
APSPMSG(31	TEXT+35*
APSPMSG(32	TEXT+36*
APSPMSG(33	TEXT+37*
APSPMSG(34	TEXT+39*
APSPMSG(35	TEXT+40*
APSPMSG(36	TEXT+43*
APSPMSG(37	TEXT+44*
APSPMSG(38	TEXT+46*
APSPMSG(39	TEXT+47*
APSPMSG(4	TEXT+5*
APSPMSG(40	TEXT+48*
APSPMSG(41	TEXT+49*
APSPMSG(42	TEXT+50*
APSPMSG(43	TEXT+51*
APSPMSG(44	TEXT+53*
APSPMSG(45	TEXT+54*
APSPMSG(46	TEXT+55*
APSPMSG(47	TEXT+58*
APSPMSG(48	TEXT+59*
APSPMSG(49	TEXT+62*
APSPMSG(5	TEXT+6*
APSPMSG(50	TEXT+63*
APSPMSG(51	TEXT+64*
APSPMSG(52	TEXT+68*
APSPMSG(53	TEXT+69*
APSPMSG(54	TEXT+70*
APSPMSG(55	TEXT+73*
APSPMSG(56	TEXT+79*
APSPMSG(57	TEXT+80*
APSPMSG(58	TEXT+81*
APSPMSG(59	TEXT+82*
APSPMSG(6	TEXT+7*
APSPMSG(60	TEXT+86*
APSPMSG(61	TEXT+87*
APSPMSG(62	TEXT+88*
APSPMSG(63	TEXT+89*
APSPMSG(64	TEXT+93*
APSPMSG(65	TEXT+94*
APSPMSG(66	TEXT+95*
APSPMSG(67	TEXT+96*
APSPMSG(68	TEXT+99*
APSPMSG(69	TEXT+100*
APSPMSG(7	TEXT+8*
APSPMSG(70	TEXT+101*
APSPMSG(71	TEXT+103*
APSPMSG(72	TEXT+104*
APSPMSG(73	TEXT+105*
APSPMSG(74	TEXT+108*
APSPMSG(75	TEXT+109*
APSPMSG(76	TEXT+110*
APSPMSG(77	TEXT+119*
APSPMSG(78	TEXT+120*
APSPMSG(79	TEXT+121*
APSPMSG(8	TEXT+10*
APSPMSG(80	TEXT+122*
APSPMSG(81	TEXT+123*
APSPMSG(82	TEXT+124*
APSPMSG(83	TEXT+125*
APSPMSG(84	TEXT+126*
APSPMSG(85	TEXT+127*
APSPMSG(86	TEXT+128*
APSPMSG(87	TEXT+129*
APSPMSG(88	TEXT+130*
APSPMSG(89	TEXT+131*
APSPMSG(9	TEXT+11*
>> APSPNAME	RPH+3*
APSPZ	ZAAP+1!
J	RPH+2, RPH+3, ZAAP+1!
X	ZAAP+1!
XMDUZ	XMSET+1*, ZAAP+1!
XMSUB	XMSET+1*, ZAAP+1!
XMTEXT	TEXT+134*, ZAAP+1!
XMY	XMSET+1!
XMY(	RPH+3*

Customize PDF page

Package: IHS Changes To Pharmacy

Routine: APSP6MSG

Information

Source Information

Call Graph

Call Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: