Routine: PSOLLU1

Package	Total	Caller Graph
Outpatient Pharmacy	7	PSOLLL1 PSOLLL2 PSOLLL3 PSOLLL4 PSOLLL5 PSOLLL6 PSOLLLW

Entry Points

Name	Comments	DBIA/ICR reference
ADD	; Calculate the length and pad "_" to the end of TEXT for change of address ; then return FONT and TEXT to calling program.
FONT(RLN,TEXT)	;
STRT(RLN,TEXT,LNTH,FONT)	; ; The LETTER array contains all the number of character per inch ; for the different font sizes that can be used.

Label References

Name	Line Occurrences
STRT	FONT+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	STRT+3~, STRT+76*, STRT+77, STRT+78, STRT+79, STRT+80, STRT+81
CNT	ADD+2~, ADD+4*, ADD+6
DASH	ADD+2~, ADD+5*, ADD+6
FNTIDX	STRT+3~
FONT	FONT+12, STRT~, STRT+85, STRT+86, STRT+87, STRT+88, STRT+89, STRT+90, STRT+91, STRT+92 , STRT+93, STRT+94, ADD+7*
LETTER	STRT+3~
LETTER(	STRT+14*, STRT+76
LETTER(" "	STRT+25*
LETTER("!"	STRT+4*
LETTER("#"	STRT+6*
LETTER("$"	STRT+7*
LETTER("%"	STRT+8*
LETTER("&"	STRT+10*
LETTER("'"	STRT+14*
LETTER("("	STRT+12*
LETTER(")"	STRT+13*
LETTER("*"	STRT+11*
LETTER("+"	STRT+24*
LETTER(","	STRT+16*
LETTER("-"	STRT+23*
LETTER("."	STRT+17*
LETTER("/"	STRT+19*
LETTER(":"	STRT+18*
LETTER(";"	STRT+18*
LETTER("<"	STRT+16*
LETTER("="	STRT+24*
LETTER(">"	STRT+17*
LETTER("?"	STRT+19*
LETTER("@"	STRT+5*
LETTER("A"	STRT+26*
LETTER("B"	STRT+27*
LETTER("C"	STRT+28*
LETTER("D"	STRT+29*
LETTER("E"	STRT+30*
LETTER("F"	STRT+31*
LETTER("G"	STRT+32*
LETTER("H"	STRT+33*
LETTER("I"	STRT+34*
LETTER("J"	STRT+35*
LETTER("K"	STRT+36*
LETTER("L"	STRT+37*
LETTER("M"	STRT+38*
LETTER("N"	STRT+39*
LETTER("O"	STRT+40*
LETTER("P"	STRT+41*
LETTER("Q"	STRT+42*
LETTER("R"	STRT+43*
LETTER("S"	STRT+44*
LETTER("T"	STRT+45*
LETTER("U"	STRT+46*
LETTER("V"	STRT+47*
LETTER("W"	STRT+48*
LETTER("X"	STRT+49*
LETTER("Y"	STRT+50*
LETTER("Z"	STRT+51*
LETTER("["	STRT+20*
LETTER("\"	STRT+21*
LETTER("]"	STRT+22*
LETTER("_"	STRT+23*
LETTER("`"	STRT+15*
LETTER("a"	STRT+26*
LETTER("b"	STRT+27*
LETTER("c"	STRT+28*
LETTER("d"	STRT+29*
LETTER("e"	STRT+30*
LETTER("f"	STRT+31*
LETTER("g"	STRT+32*
LETTER("h"	STRT+33*
LETTER("i"	STRT+34*
LETTER("j"	STRT+35*
LETTER("k"	STRT+36*
LETTER("l"	STRT+37*
LETTER("m"	STRT+38*
LETTER("n"	STRT+39*
LETTER("o"	STRT+40*
LETTER("p"	STRT+41*
LETTER("q"	STRT+42*
LETTER("r"	STRT+43*
LETTER("s"	STRT+44*
LETTER("t"	STRT+45*
LETTER("u"	STRT+46*
LETTER("v"	STRT+47*
LETTER("w"	STRT+48*
LETTER("x"	STRT+49*
LETTER("y"	STRT+50*
LETTER("z"	STRT+51*
LETTER("{"	STRT+20*
LETTER("\|"	STRT+21*
LETTER("}"	STRT+22*
LETTER("~"	STRT+15*
LETTER(0	STRT+13*
LETTER(1	STRT+4*
LETTER(2	STRT+5*
LETTER(3	STRT+6*
LETTER(4	STRT+7*
LETTER(5	STRT+8*
LETTER(6	STRT+9*
LETTER(7	STRT+10*
LETTER(8	STRT+11*
LETTER(9	STRT+12*
LN	STRT+3~
LN(	STRT+85, STRT+86, STRT+87, STRT+88, STRT+91, STRT+92, STRT+93, STRT+94
LN("DRG"	STRT+57*
LN("FULL"	STRT+66*
LN("ML"	STRT+60*
LN("ML2"	STRT+61*
LN("RX#"	STRT+55*
LN("RXVAMC"	STRT+56*
LN("SEC2"	STRT+62*, STRT+63, STRT+64
LN("SEC2B"	STRT+65*
LN("SEC2X"	STRT+63*, ADD+3
LN("SIG"	STRT+58*
LN("SIG2"	STRT+64*
LN("WRN"	STRT+59*, STRT+65
LNTH	STRT~
LNTH(10	STRT+70, STRT+80, STRT+86, STRT+93, ADD+3
LNTH(12	STRT+70, STRT+81, STRT+85, STRT+94
LNTH(6	STRT+70, STRT+77
LNTH(8	STRT+70, STRT+78, STRT+88, STRT+91
LNTH(9	STRT+70, STRT+79, STRT+87, STRT+92
LTTR	STRT+3~, STRT+76*
NEEDED	ADD+2~, ADD+3*, ADD+4
RLN	FONT~, FONT+12, STRT~, STRT+84, STRT+85, STRT+86, STRT+87, STRT+88, STRT+91, STRT+92 , STRT+93, STRT+94
SIZ	STRT+3~
TEXT	FONT~, FONT+12, STRT~, STRT+75, STRT+76, ADD+6
>> TEXT2	ADD+6*
TXTIDX	STRT+3~, STRT+75*, STRT+76
U	STRT+77, STRT+78, STRT+79, STRT+80, STRT+81

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOLLU1

Information

Source Information

Caller Graph

Caller Graph Total: 7

Entry Points

Label References

Local Variables

Legend: