Routine: RMPFDB1

Information

RMPFDB1 ;DDC/KAW-DISPLAY TRANSMISSION BATCH; [ 09/03/97 3:42 PM ]

Source file <RMPFDB1.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$J(CT,2),". ",$E(RMPFTD,1,18),?24,$E(RMPFTYP,1,6),?32,$E(RMPFADP,1,17),?51,$E(RMPFNAM,1,19),?74,RMPFDL Line Location: A1+12
Function Call: WRITE	Prompt: !!,"Total Orders in Batch: ",CT Line Location: B1+0
Function Call: WRITE	Prompt: @IOF,!?17,"REMOTE ORDER/ENTRY TRANSMISSION BATCH ENTRIES" Line Location: HEAD+0
Function Call: WRITE	Prompt: !,"Station: ",RMPFSTAP,?68,RMPFDAT Line Location: HEAD+1
Function Call: WRITE	Prompt: !?2,"Batch: ",RMPFBDT,?37,"Status: ",$E(RMPFSTP,1,14),?62,"Number Active: ",$J(RMPFBNA,3) Line Location: HEAD+2
Function Call: WRITE	Prompt: ! Line Location: HEAD+3
Function Call: WRITE	Prompt: "-" Line Location: HEAD+3
Function Call: WRITE	Prompt: !," #",?5,"Order Date/Time",?25,"Type",?35,"Ordered By",?57,"Patient",?72,"Deleted" Line Location: HEAD+4
Function Call: WRITE	Prompt: !,"---",?4,"------------------",?24,"------",?32,"-----------------",?51,"-------------------",?72,"--------" Line Location: HEAD+5
Function Call: WRITE	Prompt: ! Line Location: HEAD+5
Function Call: WRITE	Prompt: ! Line Location: CONT+0
Function Call: WRITE	Prompt: !,"Enter <RETURN> to continue, <P>rint or <^> to exit: " Line Location: CONT+1
Function Call: READ	Variable: Y Timeout: DTIME Line Location: READ+1
Function Call: READ	Variable: Y Timeout: 5 Line Location: READ+1