Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: ORPR01

Package: Order Entry Results Reporting

Routine: ORPR01


Information

ORPR01 ; slc/dcm/rv - Some day my prints will come ;09/13/06 13:30

Source Information

Source file <ORPR01.m>

Entry Points

Name Comments DBIA/ICR reference
LBL ;Print Labels
LBL1(SNUM,ORTIMES) ;
CHT ;Print Chart copies
WRK ;Print Work copies
SRV ;Print Service copies
REQ ;Print Requisitions
REQ1(SNUM,ORSCREEN) ;
R1(PIECE,ORTIMES,ORSCREEN) ;
CPRINT(ORIFN,ORTIMES,ORSCREEN) ; Printit
HEAD(FMT) ;
FOOT(FMT) ; Print Footer
GET(ORIFN) ;Get stuff
P2(REPORT,ORTIMES) ;Sort 'n print

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Print how many labels? 1// "
  • Line Location: LBL+1
Function Call: WRITE
  • Prompt: !,"Enter a number between 1 and 10"
  • Line Location: LBL+5
Function Call: WRITE
  • Prompt: !?2,$C(7),"Cannot print",!?2,$S(PIECE=3:"Labels",PIECE=4:"Requisitions",1:"")_" not set up for orders in the "_$P(^DIC(9.4,P,0),"^")_" package."
  • Line Location: R1+11
Function Call: WRITE
  • Prompt: @ORIOF
  • Line Location: CPRINT+10
Info |  Source |  Entry Points |  Interaction Calls