Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSXLBLT

Package: CMOP

Routine: PSXLBLT


Information

PSXLBLT ;BIR/HTW-CMOP Label Print..Trailer Docs ;[ 03/06/98 7:00 AM ]

Source Information

Source file <PSXLBLT.m>

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
CMOP 1 PSXLBL1  

Entry Points

Name Comments DBIA/ICR reference
DOC1 ; Print Multi-Rx documents
DOCNEW
FINAL ;Set up Suspense Notification
TOF
PRINT
SUSP
EXIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?54,PNAME," ",SSN
  • Line Location: DOCNEW+0
Function Call: WRITE
  • Prompt: !?54,PADD1
  • Line Location: DOCNEW+1
Function Call: WRITE
  • Prompt: !?54,PADD2
  • Line Location: DOCNEW+2
Function Call: WRITE
  • Prompt: !?54,$G(PADD3)
  • Line Location: DOCNEW+3
Function Call: WRITE
  • Prompt: !?54,$G(PADD4)
  • Line Location: DOCNEW+4
Function Call: WRITE
  • Prompt: !,?54,"Please check prescriptions to be refilled"
  • Line Location: DOCNEW+5
Function Call: WRITE
  • Prompt: !,?55
  • Line Location: DOCNEW+12
Function Call: WRITE
  • Prompt: @IOBARON,X2,@IOBAROFF
  • Line Location: DOCNEW+12
Function Call: WRITE
  • Prompt: !?54,"(______________________________________)"
  • Line Location: DOCNEW+13
Function Call: WRITE
  • Prompt: !?55,"PATIENT'S SIGNATURE ",$E(DT,4,5),"/",$E(DT,6,7),"/",($E(DT,1,3)+1700)
  • Line Location: DOCNEW+14
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DOCNEW+15
Function Call: WRITE
  • Prompt: ?54,PNAME," ",SSN," ",$P(RNOW,"@"),!
  • Line Location: TOF+0
Function Call: WRITE
  • Prompt: ?54,@IOBARON,X2,@IOBAROFF,*13
  • Line Location: TOF+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SUSP+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EXIT+6

Label References

Name Line Occurrences
DOCNEW DOCNEW+16
EXIT PRINT
FINAL DOC1+1
PRINT SUSP, SUSP+3
SUSP PRINT+3, PRINT+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ADDR(2 EXIT+2!
>> ADDR(3 EXIT+4!
>> ADDR3 FINAL+6
BAR DOCNEW+8*, DOCNEW+12, EXIT+4!
CAP EXIT+3!
CLINIC EXIT+2!
CLKRPH EXIT+3!
COPAY EXIT+3!
COPAYES FINAL+21, FINAL+22, FINAL+23, FINAL+24, FINAL+25, FINAL+26, FINAL+27, FINAL+28, FINAL+29, FINAL+30
, TOF+1, PRINT+2, EXIT+5!
>> CT FINAL+5*, FINAL+6*, FINAL+7*, FINAL+8*, FINAL+9*, FINAL+10*, FINAL+11*, FINAL+12*, FINAL+13*, FINAL+14*
, FINAL+18*, FINAL+32*, PRINT+1, PRINT+2, PRINT+4, PRINT+5, SUSP*, SUSP+1, SUSP+2*
DIWF EXIT!
DIWL EXIT!
DIWR EXIT!
DT DOCNEW+14
EXPDT DOCNEW+8*, DOCNEW+9*, DOCNEW+11, DOCNEW+17!, EXIT+3!
F1 PRINT, PRINT+1*, EXIT+5!
F2 PRINT, PRINT+2*, PRINT+5*, EXIT+5!
F3 PRINT, SUSP*, SUSP+1*, EXIT+5!
FDT EXIT+3!
I DOCNEW+6*, DOCNEW+17!
ID EXIT+2!
>> IOBAROFF DOCNEW+12, TOF+1
>> IOBARON DOCNEW+12, TOF+1
IOF DOCNEW+15, EXIT+6
ISD EXIT+3!
ISD1 EXIT+5!
LOT EXIT+4!
MAILID EXIT+1!
MFG EXIT+4!
MRX DOC1+1, DOCNEW+6*, DOCNEW+7, DOCNEW+8, DOCNEW+17!, EXIT+1!
MRX( DOCNEW+6, DOCNEW+16
>> NARR( PRINT+2, PRINT+4, PRINT+5
>> NARR("COPAY" PRINT+2*, PRINT+3, EXIT+5!
NURSE EXIT+4!
PADD1 DOCNEW+1, FINAL+4, EXIT+1!
PADD2 DOCNEW+2, FINAL+5, EXIT+1!
PADD3 DOCNEW+3, FINAL+6, EXIT+1!
PADD4 DOCNEW+4, FINAL+7, EXIT+5!
PCITY EXIT+1!
PHYS EXIT+3!
PNAME DOCNEW, FINAL+3, TOF, EXIT+1!
PSTAT EXIT+3!
PSTATE EXIT+1!
>> PSXBAR DOCNEW+12, TOF+1
PSXLGTH FINAL+17*, FINAL+18, FINAL+19!
PTEMP EXIT+1!
PZIP EXIT+1!
Q2 EXIT!
QTY EXIT+2!
RAD EXIT+5!
RAD( FINAL+21*, FINAL+22*, FINAL+23*, FINAL+24*, FINAL+25*, FINAL+26*, FINAL+27*, FINAL+28*, FINAL+29*, FINAL+30*
, PRINT+1
REFCT EXIT+2!
REFEM DOCNEW+17!
REFLST EXIT+2!
REFREM DOCNEW+7*, DOCNEW+11, EXIT+2!
REGMAIL EXIT+3!
RENW EXIT+3!
RESET EXIT+5!
RFTXT EXIT+3!
>> RNOW TOF
RX DOCNEW+7*, DOCNEW+11, DOCNEW+17!, EXIT+2!
RX1 EXIT+4!
RXCK DOCNEW+16*!, DOCNEW+17!
RXCT DOC1+2*, DOCNEW+6*, DOCNEW+16, DOCNEW+17!, EXIT+3!
>> SADD1 FINAL+23
>> SADD2 FINAL+24
>> SADD3 FINAL+25
SIG EXIT+2!
SIG1 EXIT+2!
SIGN EXIT+4!
SN FINAL+16*, FINAL+18, FINAL+19!
>> SNAME FINAL+22
SPARE EXIT+2!
SRX FINAL+1, EXIT+2!
SRX( FINAL+15, FINAL+16, FINAL+17
SSN DOCNEW, FINAL+2, TOF, EXIT+4!
SSN1 TOF+1, EXIT+5!
SUS SUSP, EXIT+5!
SUS( FINAL+8*, FINAL+9*, FINAL+10*, FINAL+11*, FINAL+12*, FINAL+13*, FINAL+14*, FINAL+18*, SUSP+1
SUS(1 FINAL+2*
SUS(2 FINAL+3*
SUS(3 FINAL+4*
SUS(4 FINAL+5*
SUS(5 FINAL+6*
SUS(6 FINAL+7*
TAYS EXIT+4!
TEMP EXIT+4!
TRUG DOCNEW+7*, DOCNEW+10, DOCNEW+17!, EXIT+2!
U DOCNEW+7, DOCNEW+8
VERPHARM EXIT+4!
W1 EXIT+1!
W2 EXIT+1!
W3 EXIT+1!
WARN EXIT+4!
X DOCNEW+12*, DOCNEW+17!, TOF+1*
>> X1 DOCNEW+12*, TOF+1*
X2 DOCNEW+12*, DOCNEW+17!, TOF+1*
XX FINAL+15*, FINAL+16, FINAL+17, EXIT!
Z EXIT+4!
Z1 EXIT!
Z2 EXIT!
ZX EXIT+4!
ZZT EXIT+3!
>> ZZZ FINAL+26*, FINAL+27*
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Label References |  Local Variables  | All