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

Package: IFCAP

Routine: PRCSP131


Information

PRCSP131 ;WISC/SAW-CPA PRINTS CON'T-TRANSACTION STATUS REPORT ;4/21/93 08:56

Source Information

Source file <PRCSP131.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
COM

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $P(^(0),"^")
  • Line Location: V+4
Function Call: WRITE
  • Prompt: "*NO NEW PERSON ENTRY*"
  • Line Location: V+4
Function Call: WRITE
  • Prompt: !,"Requestor: "
  • Line Location: V+5
Function Call: WRITE
  • Prompt: $S($D(^VA(200,+PRCS7,0)):$P(^(0),U),1:"")
  • Line Location: V+5
Function Call: WRITE
  • Prompt: ?41,"Form Type: ",$S($D(^PRCS(410.5,+$P(PRCS0,U,4),0)):$P(^(0),U),1:"")
  • Line Location: V+6
Function Call: WRITE
  • Prompt: !,"Requestor's Title: ",$P(PRCS7,U,2)
  • Line Location: V+7
Function Call: WRITE
  • Prompt: ?41,"Requesting Service: "
  • Line Location: V+7
Function Call: WRITE
  • Prompt: ?41,"Requesting Service: "
  • Line Location: V+7
Function Call: WRITE
  • Prompt: " ("_$P(^(0),U,8)_")"
  • Condition for execution: $P(^(0),U,8)]""
  • Line Location: V+7
Function Call: WRITE
  • Prompt: !,"Approving Official: "
  • Line Location: V+8
Function Call: WRITE
  • Prompt: $S($D(^VA(200,+$P(PRCS7,U,3),0)):$P(^(0),U),1:"")
  • Line Location: V+8
Function Call: WRITE
  • Prompt: $S($D(^PRCP(445,$P(^(0),U,6),0)):$P($P(^(0),U,1),"-",2),1:"")
  • Line Location: V+9
Function Call: WRITE
  • Prompt: !,"Appr. Official's Title: ",$P(PRCS7,U,4)
  • Line Location: V+10
Function Call: WRITE
  • Prompt: ?41,"Cost Center: ",$S($D(^PRCS(410,DA,3)):$E($P(^(3),U,3),1,25),1:"")
  • Line Location: V+10
Function Call: WRITE
  • Prompt: !,"Date Signed (Approved): "
  • Line Location: V+11
Function Call: WRITE
  • Prompt: Y
  • Line Location: V+11
Function Call: WRITE
  • Prompt: !
  • Line Location: V+15
Function Call: WRITE
  • Prompt: "Justification:"
  • Condition for execution: J=1
  • Line Location: V+15
Function Call: WRITE
  • Prompt: ?15,^UTILITY($J,"W",DIWL,J,0)
  • Line Location: V+15
Function Call: WRITE
  • Prompt: !,"Deliver To/Location: ",$P(PRCS9,U)
  • Line Location: V+17
Function Call: WRITE
  • Prompt: !,"Classification of Request: "
  • Line Location: V+18
Function Call: WRITE
  • Prompt: X
  • Line Location: V+18
Function Call: WRITE
  • Prompt: !,"Sort Group: ",X
  • Line Location: V+19
Function Call: WRITE
  • Prompt: !
  • Line Location: COM+3
Function Call: WRITE
  • Prompt: "Comments:"
  • Condition for execution: J=1
  • Line Location: COM+3
Function Call: WRITE
  • Prompt: ?10,^UTILITY($J,"W",DIWL,J,0)
  • Line Location: COM+3
Info |  Source |  Entry Points |  Interaction Calls