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: RMPFDT7

Package: Remote Order Entry System

Routine: RMPFDT7


Information

RMPFDT7 ;DDC/KAW-DISPLAY ADJUSTMENTS [ 03/12/98 7:46 AM ]

Source Information

Source file <RMPFDT7.m>

Entry Points

Name Comments DBIA/ICR reference
A1
A2
A3
NO
SUB
B1
BE
EXIT
END
WRITE
HEAD
READ
CONT
CONT1
SPACE
QUE
QUEE

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"(cont.)"
  • Line Location: NO+8
Function Call: WRITE
  • Prompt: !,RD,?12,RMPFTOE
  • Line Location: NO+9
Function Call: WRITE
  • Prompt: ?33,CM,?52,$J(TT,7,2),?62,RMPFLR,?66,$E(US,1,14)
  • Line Location: NO+11
Function Call: WRITE
  • Prompt: !,$P(CM(X),U,1),?12,$P(CM(X),U,2),?33,$E($P(CM(X),U,3),1,18),?52,$J(T,7,2),?66,$E($P(CM(X),U,5),1,14)
  • Line Location: NO+13
Function Call: WRITE
  • Prompt: !,"(cont.)"
  • Line Location: EXIT+0
Function Call: WRITE
  • Prompt: ?53,"======",!,"Total Price:",?52,"$",$J(RMPFTOT,6,2)
  • Line Location: EXIT+1
Function Call: WRITE
  • Prompt: !,"cont.)"
  • Line Location: WRITE+0
Function Call: WRITE
  • Prompt: !?53,"------",!?52,"$",$J(MT,6,2),!
  • Line Location: WRITE+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: IOST?1"C-".E
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: !?33,"ORDER HISTORY"
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: !,"Station: ",RMPFSTAP,?68,RMPFDAT
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !,"Patient: ",$E(RMPFNAM,1,25),?40,"SSN: ",RMPFSSN,?62,"DOB: ",RMPFDOB
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: !,?3,"Order",?12,"Type of",?70,"Order"
  • Line Location: HEAD+4
Function Call: WRITE
  • Prompt: !?3,"Date",?13,"Entry",?24,"Model",?36,"Component(s)",?53,"Price",?61,"Ear",?68,"Entered By"
  • Line Location: HEAD+5
Function Call: WRITE
  • Prompt: !,"----------",?12,"-------",?21,"-----------",?33,"------------------",?53,"------",?61,"---",?66,"--------------"
  • Line Location: HEAD+6
Function Call: READ
  • Variable: Y
  • Timeout: DTIME
  • Line Location: READ+1
Function Call: READ
  • Variable: Y
  • Timeout: 5
  • Line Location: READ+1
Function Call: WRITE
  • Prompt: !,"Type <RETURN> to continue or <^> to exit: "
  • Line Location: CONT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: CONT1+0
Function Call: WRITE
  • Prompt: !,"Type <RETURN> to continue or <P>rint: "
  • Line Location: CONT1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SPACE+0
Function Call: WRITE
  • Prompt: !
  • Line Location: QUE+0
Info |  Source |  Entry Points |  Interaction Calls