Routine: LRLABELF

Information

LRLABELF ;SLC/CJS/DALISC/DRH - PRINT COLLECTION LIST (CONT.) ; 3/28/89 19:39

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: INIT+3
Function Call: WRITE	Prompt: !! Line Location: EN+12
Function Call: WRITE	Prompt: @IOF Line Location: EN+13
Function Call: WRITE	Prompt: @IOF Line Location: HEAD+4
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR(LRHEAD,IOM) Line Location: HEAD+6
Function Call: WRITE	Prompt: !,"Print Date@Time : ",$$FMTE^XLFDT(LRPRTDT),?60,LRPAGE Line Location: HEAD+8
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR(LRCLOC,IOM,"-") Line Location: HEAD+9
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("WARD LOC/REQ LOC ",IOM," ") Line Location: HEAD+10
Function Call: WRITE	Prompt: !,PNM Line Location: PHDR+2
Function Call: WRITE	Prompt: ?32,LRRB Line Location: PHDR+2
Function Call: WRITE	Prompt: ?42,SSN,?57,"Order #: ",LRCE Line Location: PHDR+3
Function Call: WRITE	Prompt: !?5,LRPCT,?25,"[ "_LRTYPE_" ]" Line Location: PHDR+6
Function Call: WRITE	Prompt: !?28,$S(S2="":" ",LRTVOL>S2:"Large ",1:"Small "),LRTOP," ",$S($G(LRTVOL):LRTVOL,1:1)," mL ",! Line Location: PHDR+10
Function Call: WRITE	Prompt: !?10,"<CONTINUE NEXT PAGE # "_PAGE+1_" >" Line Location: CHDR+1
Function Call: WRITE	Prompt: ! Line Location: PRINT+21
Function Call: WRITE	Prompt: ?TAB,$S(LRURGN<3:"** ",1:"")," (",$P(LRURGA,"^"),") ",LRTEST Line Location: PRINT+22