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

Package: IFCAP

Routine: PRCSP132


Information

PRCSP132 ;SF-ISC/LJP-CPA PRINTS CON'T-TRANSACTION STATUS REPORT ;4/21/93 08:59

Source Information

Source file <PRCSP132.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
IT
ITEM1
ITEM2
PRCARD
HDR
SUBC
SUBCW
RTS

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Would you like to review the item information for this request"
  • Line Location: IT+0
Function Call: WRITE
  • Prompt: !,$E(P(4),1,12),"|",?52,"|",?62,"|",?67,"|",!,$E(P(4),13,24)
  • Line Location: ITEM1+2
Function Call: WRITE
  • Prompt: !,P(4)
  • Line Location: ITEM1+3
Function Call: WRITE
  • Prompt: ?12,"|",^UTILITY($J,"W",DIWL,J,0),?52,"|",?62,"|",?67,"|"
  • Line Location: ITEM2+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ITEM2+3
Function Call: WRITE
  • Prompt: ?12,"|",^UTILITY($J,"W",DIWL,Z,0),?52,P(0)
  • Line Location: ITEM2+4
Function Call: WRITE
  • Prompt: !,?12,"|",?52,"|",?62,"|",?67,"|"
  • Line Location: ITEM2+4
Function Call: WRITE
  • Prompt: ?12,"|",^UTILITY($J,"W",DIWL,1,0),?52,P(0)
  • Line Location: ITEM2+5
Function Call: WRITE
  • Prompt: !,?12,"|",?52,"|",?62,"|",?67,"|"
  • Line Location: ITEM2+5
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y>0
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: ?10,"OBLIGATION TRANSACTION STATUS DISPLAY - ITEM INFORMATION"
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !!,"Transaction Number: ",$P(PRCS0,"^"),?41,"Transaction Type: ",PRCSTP,!
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: I
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"STOCK NUMBER",?15,"ITEM DESCRIPTION",?53,"QUANTITY",?63,"U/I",?68,"UNIT COST",!
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: I
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SUBCW+0
Function Call: WRITE
  • Prompt: "Sub-Control Point:"
  • Condition for execution: J=1
  • Line Location: SUBCW+0
Function Call: WRITE
  • Prompt: ?20,$S($D(^PRCS(410.4,+PRCSX,0)):$E($P(^(0),U),1,23),1:""),?41,"$ Amount: $",$J($P(PRCSX,U,2),0,2)
  • Line Location: SUBCW+0
Function Call: WRITE
  • Prompt: !
  • Line Location: RTS+0
Function Call: WRITE
  • Prompt: !
  • Line Location: RTS+3
Function Call: WRITE
  • Prompt: "Return to Service Comments:",!
  • Condition for execution: J=1
  • Line Location: RTS+3
Function Call: WRITE
  • Prompt: ?10,^UTILITY($J,"W",DIWL,J,0)
  • Line Location: RTS+3
Info |  Source |  Entry Points |  Interaction Calls