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

Package: IFCAP

Routine: PRCSP2


Information

PRCSP2 ;WISC/SAW-CONTROL POINT ACTIVITY 2237 PRINTOUT (PRE-PRINTED 8X10 1/2) ;4/21/93 09:57

Source Information

Source file <PRCSP2.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
H
ITEM1
ITEM2
PRCARD
VENDOR ;PRINT VENDOR AND REQ MESSAGES
RM

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "PRESS RETURN WHEN READY TO PRINT NEXT PAGE: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: H+0
Function Call: WRITE
  • Prompt: !
  • Line Location: H+0
Function Call: WRITE
  • Prompt: !,$C(7)
  • Line Location: H+0
Function Call: WRITE
  • Prompt: !,@IOF
  • Line Location: H+1
Function Call: WRITE
  • Prompt: ?36,"PRIORITY: ",P(5),!
  • Line Location: H+2
Function Call: WRITE
  • Prompt: ?3,Y
  • Condition for execution: PRCS("P")=1
  • Line Location: H+2
Function Call: WRITE
  • Prompt: ?36,$P(^PRCS(410,DA,0),U),?80,"PAGE ",PRCS("P")
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !!!!,?24
  • Line Location: H+3
Function Call: WRITE
  • Prompt: $P(^(0),U)
  • Line Location: H+3
Function Call: WRITE
  • Prompt: " ("_$P(^(0),U,8)_")"
  • Condition for execution: $P(^(0),U,8)]""
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !!,?4,"X"
  • Line Location: H+4
Function Call: WRITE
  • Prompt: ?45,Y
  • Line Location: H+4
Function Call: WRITE
  • Prompt: !!!
  • Line Location: H+5
Function Call: WRITE
  • Prompt: !!!
  • Line Location: H+6
Function Call: WRITE
  • Prompt: ?18,P,":"
  • Line Location: H+6
Function Call: WRITE
  • Prompt: ?18,P,":"
  • Line Location: H+6
Function Call: WRITE
  • Prompt: ?18,P,":"
  • Line Location: H+6
Function Call: WRITE
  • Prompt: !
  • Line Location: H+8
Function Call: WRITE
  • Prompt: !,?2,$E(P(4),1,15),!,?2,$E(P(4),16,24)
  • Line Location: ITEM1+1
Function Call: WRITE
  • Prompt: !,?2,P(4)
  • Line Location: ITEM1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ITEM2+0
Function Call: WRITE
  • Prompt: ?18,^UTILITY($J,"W",DIWL,J,0),!
  • Line Location: ITEM2+2
Function Call: WRITE
  • Prompt: ?18,^UTILITY($J,"W",DIWL,Z,0),?53,P(0),!
  • Line Location: ITEM2+3
Function Call: WRITE
  • Prompt: ?18,^UTILITY($J,"W",DIWL,1,0),?53,P(0),!
  • Line Location: ITEM2+4
Function Call: WRITE
  • Prompt: !,?18,"TOTAL COST: ","$"_$J($P(^(4),U),0,2),!!
  • Line Location: VENDOR+2
Function Call: WRITE
  • Prompt: !,?18,$P(P1,U,3)
  • Line Location: VENDOR+9
Function Call: WRITE
  • Prompt: !,?18,$P(P1,U,4)
  • Line Location: VENDOR+10
Function Call: WRITE
  • Prompt: !,?18,$P(P1,U,5)
  • Line Location: VENDOR+11
Function Call: WRITE
  • Prompt: " ",$P(P1,U,8)
  • Condition for execution: $P(P1,U,7)'="" ",",$P(^DIC(5,$P(P1,U,7),0),U,2) W:$P(P1,U,8)'=""
  • Line Location: VENDOR+12
Function Call: WRITE
  • Prompt: !
  • Line Location: RM+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: RM+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: RM+1
Info |  Source |  Entry Points |  Interaction Calls