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

Package: IFCAP

Routine: PRCSP122


Information

PRCSP122 ;WISC/SAW-CONTROL POINT ACTIVITY 2237 PRINTOUT CON'T ;4/21/93 08:53

Source Information

Source file <PRCSP122.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**95,107**;Oct 20, 2000;Build 13
DEL
SIG ;PRINT SIGNATURE BLOCKS
SIG1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: V+3
Function Call: WRITE
  • Prompt: !,^UTILITY($J,"W",DIWL,K,0)
  • Line Location: V+4
Function Call: WRITE
  • Prompt: !,"DELIVER TO: ",$P(^(9),U)
  • Line Location: DEL+0
Function Call: WRITE
  • Prompt: !,L,!,"FOB",?24,"|TERMS",?48,"|DELIVERY DATE",?63,"|QUOTE DATE",?77,"|BY(Initials)",!,?24,"|",?48,"|",?63,"|",?77,"|"
  • Line Location: DEL+1
Function Call: WRITE
  • Prompt: !,$E(L,1,24),"|",$E(L,1,23),"|",$E(L,1,14),"|",$E(L,1,13),"|",$E(L,1,12)
  • Line Location: DEL+2
Function Call: WRITE
  • Prompt: !,"JUSTIFICATION OF NEED OR TURN-IN (If recurring need, indicate 30-day estimate. If turn-in,",!,"do not use this form if circumstances require use of VA Form 90-1217, Report of Survey)"
  • Line Location: DEL+4
Function Call: WRITE
  • Prompt: !,^UTILITY($J,"W",DIWL,K,0)
  • Line Location: DEL+10
Function Call: WRITE
  • Prompt: !,L
  • Line Location: SIG+2
Function Call: WRITE
  • Prompt: $P($G(^VA(200,XNAME,0)),"^")
  • Line Location: SIG+3
Function Call: WRITE
  • Prompt: !,"Signature of Initiator",?39,"|Signature of Approving Official |Date"
  • Line Location: SIG+4
Function Call: WRITE
  • Prompt: !,?39,"|",?72,"|",!,?39,"|",?72,"|"
  • Line Location: SIG+5
Function Call: WRITE
  • Prompt: "/ES/",$$DECODE^PRCSC1(DA)
  • Line Location: SIG+6
Function Call: WRITE
  • Prompt: $E($P(^(20),U,2),1,31)
  • Line Location: SIG+7
Function Call: WRITE
  • Prompt: " (",$P(^(.13),U,2),")"
  • Line Location: SIG+8
Function Call: WRITE
  • Prompt: ?39,"|"
  • Line Location: SIG+9
Function Call: WRITE
  • Prompt: $E($P(^(20),U,2),1,33)
  • Line Location: SIG+9
Function Call: WRITE
  • Prompt: ?72,"|",!
  • Line Location: SIG+10
Function Call: WRITE
  • Prompt: $P(^(7),U,4)
  • Condition for execution: $P(^PRCS(410,DA,7),U,2)'="" $P(^(7),U,2) W ?39,"|" W:$P(^(7),U,4)'=""
  • Line Location: SIG+10
Function Call: WRITE
  • Prompt: ?72,"|"
  • Line Location: SIG+10
Function Call: WRITE
  • Prompt: ?72,"|"
  • Line Location: SIG+10
Function Call: WRITE
  • Prompt: !,$E(L,1,39)
  • Line Location: SIG1+0
Function Call: WRITE
  • Prompt: "|",$E(L,1,32)
  • Line Location: SIG1+1
Function Call: WRITE
  • Prompt: "|",$E(L,1,17)
  • Line Location: SIG1+2
Info |  Source |  Entry Points |  Interaction Calls