Routine: PSOSPML1

Information

PSOSPML1 ;BIRM/MFR - Export Batch Processing Listman Driver ;10/10/12

Package	Total	Call Graph
VA FileMan	5	^%DT ^DIC ^DIE $$GET1^DIQ ^DIR
Kernel	3	^%ZIS ^%ZISC ($$FMTE,$$NOW)^XLFDT
Outpatient Pharmacy	3	(EN,EXMSG)^PSOSPML2 ($$BLDBAT,$$GATHER,PAUSE,SETLN)^PSOSPMU1 ($$SPOK,EXPORT)^PSOSPMUT
List Manager	2	EN^VALM (FULL,INSTR)^VALM1

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 8

Package	Total	Caller Graph
Outpatient Pharmacy	6	PSO SPMP BATCH PROCESSING PSO SPMP1 MENU PSO SPMP1 SELECT PSOSPMDL PSOSPML7 PSOSPML8
Kernel	2	^DIC(19 ^ORD(101

Entry Points

Name	Comments	DBIA/ICR reference
STA	; STATE prompt
EN(STATEIEN,PSOFROM,PSOTO)	; Entry point
HDR	; - Builds the Header section
SETHDR()	; - Displays the Header Line
INIT	; Builds the Body section
SEL	;Process selection of one entry
MAN	; Manual Batch Export
EXPORT(STATE,FROMDATE,TODATE,FILLTYPE,RECTYPE,LIST)	; Export Release CS Rx's to the sate for date range
EXIT	;
HELP	; Listman HELP entry-point

External References

Name	Field # of Occurrence
^%DT	STA+9, STA+14, MAN+13, MAN+18
^%ZIS	EXPORT+38
^%ZISC	EXPORT+50
^DIC	STA+3, MAN+7
^DIE	EXPORT+52
$$GET1^DIQ	HDR+2, INIT+15, INIT+16, MAN+22, EXPORT+18, EXPORT+31, EXPORT+32, EXPORT+38, EXPORT+46, EXPORT+49
^DIR	MAN+29, MAN+40, EXPORT+34
EN^PSOSPML2	SEL+8
EXMSG^PSOSPML2	EXPORT+39
$$BLDBAT^PSOSPMU1	EXPORT+42
$$GATHER^PSOSPMU1	EXPORT+22
PAUSE^PSOSPMU1	EXPORT+12, EXPORT+26, EXPORT+44, EXPORT+54
SETLN^PSOSPMU1	INIT+17, INIT+20
$$SPOK^PSOSPMUT	STA+4, EXPORT+10
EXPORT^PSOSPMUT	EXPORT+47
EN^VALM	EN+1
FULL^VALM1	EN+2, MAN+1
INSTR^VALM1	SETHDR+5
$$FMTE^XLFDT	HDR+3, INIT+11, INIT+12
$$NOW^XLFDT	EXPORT+51

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: STA+1
Function Call: WRITE	Prompt: !!,$P($$SPOK^PSOSPMUT(+Y),"^",2),$C(7) Line Location: STA+4
Function Call: WRITE	Prompt: ! Line Location: STA+9
Function Call: WRITE	Prompt: ! Line Location: STA+14
Function Call: WRITE	Prompt: ?50,"Please wait..." Line Location: SEL+6
Function Call: WRITE	Prompt: ! Line Location: MAN+5
Function Call: WRITE	Prompt: ! Line Location: MAN+13
Function Call: WRITE	Prompt: ! Line Location: MAN+18
Function Call: WRITE	Prompt: !!,$P(SPOK,"^",2),$C(7) Line Location: EXPORT+12
Function Call: WRITE	Prompt: !!,"Gathering CS prescription fills...(this may take a few minutes)" Line Location: EXPORT+21
Function Call: WRITE	Prompt: !!,"There are no eligible prescriptions for the date range.",$C(7) Line Location: EXPORT+25
Function Call: WRITE	Prompt: !!,RXCNT," prescription fill(s) found for the date range." Line Location: EXPORT+27
Function Call: WRITE	Prompt: ! Line Location: EXPORT+32
Function Call: WRITE	Prompt: ?40,"Please wait..." Line Location: EXPORT+35
Function Call: WRITE	Prompt: ! Line Location: EXPORT+39
Function Call: WRITE	Prompt: !!,$P(BATCHIEN,"^",2),$C(7) Line Location: EXPORT+44
Routine Call	DIC Line Location: STA+3 MAN+7
Routine Call	DIE Line Location: EXPORT+52
Routine Call	DIR Line Location: MAN+29 MAN+40 EXPORT+34
Routine Call	%ZIS Line Location: EXPORT+38
Routine Call	VALM Line Location: EN+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(5 - [#5]	Classic Fileman Calls, GET1^DIQ
^PS(58.41 - [#58.41]	GET1^DIQ
^PS(58.42 - [#58.42]	Classic Fileman Calls, GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(58.41 - [#58.41]	STA+2
^PS(58.42 - [#58.42]	INIT+5, INIT+6, INIT+7, INIT+9
^TMP("PSOSPML1"	INIT+3!, INIT+18*, INIT+19, SEL+3, EXIT+1!
^TMP("PSOSPMRX"	EXPORT+22!, EXPORT+28

Label References

Name	Line Occurrences
EN	STA+17
EXIT	STA+3, STA+9, STA+14, STA+19, MAN+7
EXPORT	MAN+43
HDR	EXPORT+56
INIT	SEL+10, EXPORT+56
SETHDR	HDR+4
STA	STA+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	PSOSPML1+3~, STA+8, STA+13!, MAN+2~, MAN+12, MAN+17!
%DT("A"	STA+8, STA+13, MAN+12, MAN+17
%DT("B"	STA+13, MAN+17
%DT(0	STA+8, STA+13, MAN+12, MAN+17
%ZIS	EXPORT+38!, EXPORT+39!*
BAT	SEL+1~, SEL+3*, SEL+4, SEL+8
BATCHIEN	EXPORT+7~, EXPORT+42*, EXPORT+43, EXPORT+44, EXPORT+47, EXPORT+50
BATDT	INIT+1~, INIT+4, INIT+5, INIT+6, INIT+11
BATIEN	PSOSPML1+3~, INIT+4, INIT+6, INIT+7, INIT+9, INIT+11, INIT+15, INIT+16, INIT+18
BEGINDT	MAN+2~, MAN+14*, MAN+17, MAN+43
COUNT	INIT+1~, INIT+3, INIT+9, INIT+11
DA	EXPORT+50~*
DIC	PSOSPML1+3~, STA+1!, MAN+2~, MAN+5!
DIC("A"	STA+1, MAN+5
DIC("B"	STA+2, MAN+6
DIC("S"	MAN+5*
DIC(0	STA+3, MAN+7
DIE	EXPORT+50~*
DIR	PSOSPML1+3~, MAN+2~, MAN+23!, MAN+29!, MAN+34!, MAN+40!, EXPORT+7~, EXPORT+32!
DIR("A"	MAN+23, MAN+34, EXPORT+32, EXPORT+33
DIR("B"	MAN+29, MAN+40, EXPORT+33*
DIR("L"	MAN+24, MAN+25, MAN+27, MAN+28, MAN+35, MAN+36, MAN+38, MAN+39
DIR(0	MAN+26, MAN+37, EXPORT+33*
DIRUT	PSOSPML1+3~, MAN+2~, MAN+29!, MAN+40!, EXPORT+34
DR	EXPORT+50~, EXPORT+51*
DRUGDEA	INIT+1~
DRUGIEN	INIT+1~
DRUGNAM	INIT+1~
DSPLINE	INIT+1~, INIT+11, INIT+12, INIT+13, INIT+14, INIT+15, INIT+16, INIT+17
DT	STA+8
DTOUT	PSOSPML1+3~, STA+9, STA+14, MAN+2~, MAN+13, MAN+18, EXPORT+7~
DUOUT	PSOSPML1+3~, MAN+2~, MAN+29!, MAN+40!, EXPORT+7~, EXPORT+34
DUZ	EXPORT+51
ENDDT	MAN+2~, MAN+19*, MAN+43
ENDRLDT	EXPORT+7~
ENDRTSDT	EXPORT+8~
FILL	INIT+1~, EXPORT+7~
FILLTYPE	MAN+3~, MAN+21, MAN+30, MAN+33, MAN+43, EXPORT~, EXPORT+18
FROMDATE	EXPORT~, EXPORT+15*, EXPORT+22, EXPORT+42
HDR	SETHDR+1~, SETHDR+3, SETHDR+4, SETHDR+5*
I	INIT+1~
IO	EXPORT+38
>> IOINORM	SETHDR+5
IOP	EXPORT+39!
>> IORVON	SETHDR+5
LINE	INIT+1~, INIT+3*, INIT+18, INIT+21, SEL+8~
LIST	EXPORT~, EXPORT+22
NODE0	INIT+1~, INIT+7*, INIT+8, INIT+12, INIT+13, INIT+14
ORD	SETHDR+1~, SEL+1~
POP	EXPORT+38, EXPORT+39!
POS	SETHDR+1~
PSOBGDT	MAN+2~
PSOENDDT	MAN+2~
PSOERROR	MAN+2~
PSOFROM	PSOSPML1+3~, STA+10*, STA+13, STA+17, EN~, HDR+3, INIT+4, SEL+8~
PSOLIS	SEL+1~
PSOLSTLN	PSOSPML1+3~, INIT+3*
PSOMODE	EXPORT+8~, EXPORT+46*, EXPORT+47
PSOQUIT	MAN+3~, MAN+21, MAN+22, MAN+29, MAN+32, MAN+33, MAN+40, EXPORT+30, EXPORT+31, EXPORT+34
PSOSEL	SEL+1~, SEL+2*, SEL+3
PSOTITLE	SEL+1~, SEL+5*, SEL+8~, SEL+9
PSOTO	PSOSPML1+3~, STA+15*, STA+17, EN~, HDR+3, INIT+5, SEL+8~
RECTYPE	MAN+3~, MAN+32, MAN+41, MAN+43, EXPORT~, EXPORT+22
RTSDT	EXPORT+8~
RTSONLY	EXPORT+8~, EXPORT+18*, EXPORT+22, EXPORT+31, EXPORT+38, EXPORT+42, EXPORT+46, EXPORT+49
RX	INIT+1~
RXCNT	INIT+1~, INIT+3, INIT+9, INIT+10, INIT+16, EXPORT+7~, EXPORT+22, EXPORT+24, EXPORT+27
RXFILL	EXPORT+7~
RXIEN	EXPORT+7~
RXRLDT	EXPORT+7~
SPOK	MAN+2~, EXPORT+7~, EXPORT+10*, EXPORT+11, EXPORT+12
STATE	MAN+3~, MAN+8*, MAN+22, MAN+43, EXPORT~, EXPORT+10, EXPORT+18, EXPORT+22, EXPORT+31, EXPORT+32 , EXPORT+38, EXPORT+46, EXPORT+49
STATEIEN	PSOSPML1+3~, STA+2, STA+5, STA+17, EN~, HDR+2, INIT+8, MAN+6
TODATE	EXPORT~, EXPORT+22, EXPORT+42
TYPE	INIT+1~
VALM	PSOSPML1+3~
VALM("TITLE"	SEL+5, SEL+9*
VALMBCK	PSOSPML1+3~, SEL+2, SEL+4, SEL+9, MAN+1
>> VALMCC	EXPORT+55
VALMCNT	PSOSPML1+3~, INIT+3, INIT+21
VALMHDR	PSOSPML1+3~, HDR+1!
VALMHDR(1	HDR+2, HDR+3
VALMSG	PSOSPML1+3~, SEL+2, SEL+4
X	PSOSPML1+3~, STA+3, MAN+2~, MAN+7, EXPORT+7~
XQORM	SEL+1~
>> XQORNOD(0	SEL+2
XREF	EXPORT+7~
XX	SEL+1~
Y	STA+3, STA+4, STA+5, STA+9, STA+10, STA+14, STA+15, MAN+7, MAN+8, MAN+13 , MAN+14, MAN+18, MAN+19, MAN+30, MAN+41, EXPORT+7~, EXPORT+34
ZTSK	EXPORT+39!

Customize PDF page

Package: Outpatient Pharmacy