Routine: PSXREL

Package	Total	Call Graph
VA Fileman	3	NOW^%DTC ^DIC ^DIR

Package

Total

Call Graph

NOW^%DTC ^DIC ^DIR

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"You are not authorized to use this option!" Line Location: AC+1
Function Call: WRITE	Prompt: !!,"This option will only release/complete Rx's which have labels printed manually." Line Location: AC+2
Function Call: WRITE	Prompt: !! Line Location: AC+2
Function Call: WRITE	Prompt: !! Line Location: CAN+0
Function Call: WRITE	Prompt: !! Line Location: BC+0
Function Call: WRITE	Prompt: !,"INVALID PRESCRIPTION NUMBER" Line Location: BC+3
Function Call: WRITE	Prompt: !,"INVALID PRESCRIPTION NUMBER" Line Location: BC+4
Function Call: WRITE	Prompt: !,"INVALID PRESCRIPTION NUMBER" Line Location: BC+5
Function Call: WRITE	Prompt: !,"INVALID PRESCRIPTION NUMBER" Line Location: BC+6
Function Call: WRITE	Prompt: !,"PREVIOUSLY RELEASED ON " Line Location: BC+7
Function Call: WRITE	Prompt: Y Line Location: BC+7
Function Call: WRITE	Prompt: !!,"RX# ",$P(PSX,"\|",4)_$S($G(ACT)="R":" released.",$G(ACT)="C":" not dispensed.",1:"") Line Location: BC+10
Function Call: WRITE	Prompt: !!,"Wand the barcode number of the prescription or manually key in" Line Location: HELP+0
Function Call: WRITE	Prompt: !,"the number printed below the barcode." Line Location: HELP+1
Function Call: WRITE	Prompt: !,"The barcode number should be of the format - 'NNN-NNNNNNN'" Line Location: HELP+2
Function Call: WRITE	Prompt: !,?5,$G(ZZ) Line Location: LIST+0
Routine Call	DIC Line Location: RPH
Routine Call	DIR Line Location: AC1+1 CAN BC

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	BC+7
^PSX(552.3	BC+4, BC+5, BC+6, BC+7!, BC+8, BC+9!, LIST
^XUSEC("PSXCMOPMGR"	AC+1

Name	Field # of Occurrence
%	BC+8, BC+9!, EXIT!
ACT	AC1+1*, AC1+3, CAN, BC+10, EXIT!
DA	EXIT!
DIC	RPH*!, EXIT!
DIC("A"	RPH*
DIC("S"	RPH*
DIC(0	RPH*
DIR	AC1+1!, AC1+2!, CAN!, CAN+2!, BC!, BC+2!, EXIT!
DIR("?"	AC1+1, BC
DIR("??"	BC*
DIR("A"	CAN, BC
DIR(0	AC1+1, CAN, BC*
DIROUT	AC1+2!, CAN+1, CAN+2!, BC+2!, EXIT!
DIRUT	AC1+2!, CAN+1, CAN+2!, BC+1, BC+2!, EXIT!
DTOUT	AC1+2!, CAN+1, CAN+2!, RPH!, BC+2!, EXIT!
DUOUT	AC1+2!, CAN+1, CAN+2!, RPH!, BC+2!, EXIT!
DUZ	AC+1
PSRH	RPH*, BC+8, EXIT!
PSX	BC+5!, BC+6!, BC+7!, BC+10, EXIT!
PSXN	BC+7*!, BC+8, BC+9, EXIT!
REASON	CAN*, BC+8, EXIT!
RXN	BC!*, BC+4, BC+5!, BC+6!, BC+7, BC+9, EXIT!
X	AC1+2!, CAN+2!, RPH!, BC!, BC+2!, BC+5!, BC+6!, EXIT!
Y	AC1+1, AC1+2!, CAN, CAN+1, CAN+2!, RPH!, BC!, BC+2!, BC+7*!, EXIT!
ZZ	LIST*, LIST+1!

Information