Routine: PRCFDPVT

Package	Total	Call Graph
IFCAP	10	^PRCE58P0 SC^PRCESOE EN^PRCFDA3 (STATA,STATE,STATM,STATQ,STATR,STATR1,STATT)^PRCFDPV2 (MSG1,MSG2,MSG4)^PRCFDPVM ($$RETRANS,GET,NUM,PAUSE,PAUSE1)^PRCFDPVU GENDIQ^PRCFFU7 ^PRCFSITE WAIT^PRCFYN NODE^PRCS58OB
Kernel	1	^%ZIS
VA FileMan	1	EN1^DIP

Entry Points

Name	Comments	DBIA/ICR reference
V	;;5.1;IFCAP;;Oct 20, 2000
TYPE(X)
EX
STAT
TPO	; Payment Voucher Error Processing when MOP = Invoice/Rec Rep,CI,Req
T1358	; 1358 Error Processing when MOP = MISC OBL(1358)
OUT
SCREEN	; Control screen display
HDR	; Write Option Header

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"**PONUM=",PONUM,! Line Location: TYPE+5
Function Call: READ	Formatting: ! Prompt: "Hit <RETURN> to continue." Variable: Y Timeout: DTIME Line Location: TYPE+6
Function Call: WRITE	Prompt: !,"This Payment Voucher is being edited by someone else, please try later!" Line Location: TYPE+6
Function Call: WRITE	Prompt: ! Line Location: TPO+9
Function Call: WRITE	Prompt: ! Line Location: T1358+10
Function Call: WRITE	Prompt: @IOF Line Location: SCREEN+1
Function Call: WRITE	Prompt: IOINHI,$P(XQY0,U,2),IOINORM Line Location: HDR+1
Routine Call	%ZIS Line Location: T1358+8

Name	Line Occurrences (* Changed, ! Killed)
^PRCF(421.5 - [#421.5]	TYPE+6, TPO+11

Name	Field # of Occurrence
>> BY	TPO+4*
>> D0	TPO+1*
>> DA	T1358+3, T1358+4, T1358+13
DIC	TPO+3*, TPO+6!, OUT!
DIROUT	TYPE+3, EX!
DIRUT	TYPE+3, EX!
DK	TPO+6!
DTIME	TYPE+6
DTOUT	TYPE+3, EX!
DUOUT	TYPE+3, EX!
>> FLDS	TPO+4*
FMSNO	TYPE~, OUT!
FMSTYPE	TYPE~, TYPE+1*, TYPE+2, OUT!
>> FR	TPO+4*
GECSDATA	STAT, OUT!
GECSDATA(	STAT
GO	TPO+2, TPO+10!, TPO+11, TPO+12, T1358+6, T1358+11!, T1358+12
IOF	SCREEN+1
>> IOINHI	HDR+1
>> IOINORM	HDR+1
>> IOP	TPO+4, T1358+8
>> L	TPO+4*
>> OB	T1358+3*, T1358+13
>> POIEN	T1358+2, T1358+3
>> PONUM	TYPE+5
>> PRC("CP"	T1358+5*
>> PRC("SITE"	TYPE+1*
>> PRCF("CIDA"	TPO+1*, TPO+4, TPO+11, TPO+14
>> PRCF("VIEW"	TPO+5*, TPO+6!
>> PRCF("X"	T1358+14*
>> PRCFA("ERROR"	TYPE+4
>> PRCFA("RETRAN"	TPO+13, T1358+13
>> PRCFA("TRANS"	TYPE+4
>> PRCTMP(442	T1358+3
RECORD	TPO+6!
RECORD1	TPO+6!
>> RESP	TPO+2, T1358+6
>> RETRAN	TPO+9, TPO+10, T1358+10, T1358+11
STATTXT1	TYPE~
STATUS	TYPE~, STAT*, STAT+1, STAT+2, STAT+3, STAT+4, STAT+5, STAT+6, OUT!
>> TO	TPO+4*
>> TRNODE	T1358+4
>> TRNODE(0	T1358+5
U	TYPE+1, TPO+2, TPO+10, T1358+6, T1358+11, HDR+1
VAR	EX!
X	TYPE~, TYPE+1
>> XQY0	HDR+1
>> Y	TYPE+5, TYPE+6*, TPO+1