Routine: PRCVIBF

Package	Total	Call Graph
IFCAP	12	$$DATE^PRC0C $$QTRDATE^PRC0D A410^PRC0F ERS410^PRC0G FYQ^PRCFSITE $$IBCNS^PRCPWPU1 IB^PRCS0B NODE^PRCS58OB ENCODE^PRCSC1 TRANS^PRCSES $$BBFY^PRCSUT (EN1,EN2)^PRCSUT3
VA FileMan	4	NOW^%DTC ^DIC (,UPDATE,WP)^DIE ^DIK
Kernel	1	DUZ^XUP

Package

Total

Call Graph

$$DATE^PRC0C $$QTRDATE^PRC0D A410^PRC0F ERS410^PRC0G FYQ^PRCFSITE $$IBCNS^PRCPWPU1 IB^PRCS0B NODE^PRCS58OB
ENCODE^PRCSC1 TRANS^PRCSES $$BBFY^PRCSUT (EN1,EN2)^PRCSUT3

VA FileMan

NOW^%DTC ^DIC (,UPDATE,WP)^DIE ^DIK

Kernel

DUZ^XUP

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
IFCAP	1	PRCVIBH

Entry Points

Name	Comments	DBIA/ICR reference
INIT(NOD)	; ; 1. Find out it is IV or SV
PROCESS	;
TRANS	; 2. get new transaction number
NOD0	; 3. create file 410, node 0 and 3
NODE2	; 4. create file 410, node 2
CC	; 6. Cost Center
ITEM	; FIND UPDATE^DIE USAGE
TOT	; TOTAL COST and Date Commited
445	;
COMMIT	;
ESIG	;
POSTING	; ; Buyer and Seller's FCP provided by DynaMed
FILE	;
FINAL	; ; All issue book from DynaMed are FINAL
EXIT	;
ADJ	; ; Adjustment ; Get IEN from "AS"
DMITEM	; ; Initiate new item number for DynaMed interface
ERR(N)	; ; if error, send HL7 app ACK of AE
ERCODE	;

Name	Field # of Occurrence
NOW^%DTC	PROCESS+5
^DIC	ESIG+10
^DIE	ESIG+13
UPDATE^DIE	DMITEM+7
WP^DIE	DMITEM+10
^DIK	FINAL+9
$$DATE^PRC0C	ADJ+19
$$QTRDATE^PRC0D	ADJ+18
A410^PRC0F	ADJ+20, ADJ+22
ERS410^PRC0G	COMMIT+17
FYQ^PRCFSITE	PROCESS+10
$$IBCNS^PRCPWPU1	POSTING+6
IB^PRCS0B	FILE+1
NODE^PRCS58OB	ESIG+18
ENCODE^PRCSC1	ESIG+2
TRANS^PRCSES	ESIG+4
$$BBFY^PRCSUT	PROCESS+13
EN1^PRCSUT3	TRANS+3
EN2^PRCSUT3	NOD0+2
DUZ^XUP	PROCESS+8

Name

Field # of Occurrence

NOW^%DTC

PROCESS+5

^DIC

ESIG+10

^DIE

ESIG+13

UPDATE^DIE

DMITEM+7

WP^DIE

DMITEM+10

^DIK

FINAL+9

ADJ+19

ADJ+18

ADJ+20, ADJ+22

COMMIT+17

PROCESS+10

POSTING+6

FILE+1

ESIG+18

ESIG+2

ESIG+4

PROCESS+13

TRANS+3

NOD0+2

PROCESS+8

FileNo	Call Tags
^PRC(441 - [#441]	WP^DIE
^PRC(443 - [#443]	Classic Fileman Calls

FileNo

Call Tags

^PRC(441 - [#441]

WP^DIE

^PRC(443 - [#443]

Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^PRC(420 - [#420]	NOD0+1, COMMIT+9
^PRC(440 - [#440]	NODE2+1
^PRC(441 - [#441]	ITEM+7
^PRC(443 - [#443]	ESIG+14*
^PRCD(420.1 - [#420.1]	CC+1
^PRCD(420.2 - [#420.2]	ITEM+6
^PRCD(442.3 - [#442.3]	COMMIT+11, COMMIT+12, ESIG+11, ESIG+12, FINAL+4
^PRCS(410 - [#410]	NOD0+7, NOD0+9, NODE2+3, NODE2+4, NODE2+7, CC+2, ITEM+9, ITEM+10, ITEM+11, ITEM+12* , ITEM+13, ITEM+16, ITEM+17, ITEM+18, ITEM+19, ITEM+22, TOT+1, TOT+3, 445+1, COMMIT+1 , COMMIT+3, COMMIT+4, COMMIT+5, COMMIT+10, COMMIT+11, COMMIT+12, COMMIT+13!, COMMIT+14!, COMMIT+15!, COMMIT+16* , COMMIT+18, POSTING+8, POSTING+9, POSTING+10, FINAL+2, FINAL+4, FINAL+6, ADJ+3, ADJ+13, ADJ+17
^TMP(	INIT+4, PROCESS+6, PROCESS+11, ITEM+2, ITEM+4, ADJ+7, ADJ+9

Name

Line Occurrences (* Changed, ! Killed)

NOD0+1, COMMIT+9

NODE2+1

ITEM+7

ESIG+14*

^PRCD(420.1 - [#420.1]

CC+1

^PRCD(420.2 - [#420.2]

ITEM+6

^PRCD(442.3 - [#442.3]

COMMIT+11, COMMIT+12, ESIG+11, ESIG+12, FINAL+4

^PRCS(410 - [#410]

NOD0+7*, NOD0+9*, NODE2+3*, NODE2+4*, NODE2+7*, CC+2*, ITEM+9, ITEM+10*, ITEM+11*, ITEM+12*
, ITEM+13*, ITEM+16*, ITEM+17*, ITEM+18*, ITEM+19*, ITEM+22*, TOT+1*, TOT+3*, 445+1*, COMMIT+1
, COMMIT+3*, COMMIT+4*, COMMIT+5*, COMMIT+10, COMMIT+11*, COMMIT+12*, COMMIT+13!, COMMIT+14!, COMMIT+15!, COMMIT+16*
, COMMIT+18, POSTING+8*, POSTING+9*, POSTING+10*, FINAL+2*, FINAL+4*, FINAL+6*, ADJ+3, ADJ+13, ADJ+17

^TMP(

INIT+4, PROCESS+6, PROCESS+11, ITEM+2, ITEM+4, ADJ+7, ADJ+9

Name	Line Occurrences
ADJ	PROCESS+16
ERR	INIT+4, POSTING+7, ADJ+4, ADJ+12
EXIT	INIT+4, PROCESS+16, POSTING+7, ADJ+12

Name

Line Occurrences

ADJ

PROCESS+16

ERR

INIT+4, POSTING+7, ADJ+4, ADJ+12

EXIT

INIT+4, PROCESS+16, POSTING+7, ADJ+12

Name	Field # of Occurrence
^(0	ITEM+9*
^(3	ADJ+17

Name

Field # of Occurrence

^(0

ITEM+9*

^(3

ADJ+17

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	PROCESS+2~, PROCESS+6
A	ADJ+15~, ADJ+17, ADJ+18, ADJ+19
ACCOD	PROCESS+2~, ITEM+5*, ITEM+16
ACT	PROCESS+2~, PROCESS+7, PROCESS+16, ITEM+9
B	ADJ+15~, ADJ+17*, ADJ+19
BATCHID	PROCESS+2~, PROCESS+7*, 445+1, POSTING+10, ADJ+3
BOC	PROCESS+2~, ITEM+6*, ITEM+11
BUY	ADJ+15~, ADJ+16, ADJ+19, ADJ+20
CC	PROCESS+2~, PROCESS+12, CC+1, CC+2, ITEM+2, ITEM+3, ITEM+11, ADJ+7, ADJ+8, ADJ+13* , ADJ+16
CC2	PROCESS+4~, PROCESS+12*, CC+1
DA	PROCESS+2~, NOD0+5, NOD0+7, NOD0+9, NODE2+3, NODE2+4, NODE2+7, CC+2, ITEM+9, ITEM+10 , ITEM+11, ITEM+12, ITEM+13, ITEM+16, ITEM+17, ITEM+18, ITEM+19, ITEM+22, TOT+1, TOT+3 , 445+1, COMMIT+1, COMMIT+3, COMMIT+4, COMMIT+5, COMMIT+10, COMMIT+11, COMMIT+12, COMMIT+13, COMMIT+14 , COMMIT+15, COMMIT+16, COMMIT+17, COMMIT+18, ESIG+2, ESIG+14, ESIG+18, POSTING+4, FINAL+8~, FINAL+9* , ADJ+3*, ADJ+4, ADJ+5, ADJ+13, ADJ+17
DATIME	PROCESS+3~, PROCESS+6*, FINAL+6
DESC	PROCESS+3~, ITEM+7, ITEM+8, ITEM+13
DIC	PROCESS+2~, ESIG+9*, ESIG+10!, FINAL+8~
DIC(0	ESIG+9*
DIE	ESIG+13*!
DIK	FINAL+8~, FINAL+9*
DLAYGO	ESIG+9*, ESIG+10!
DR	ESIG+13*!
DT	PROCESS+6, POSTING+9, FINAL+2, ADJ+16
DUZ	PROCESS+1~, TOT+3, ESIG+2, FINAL+6
FDA	DMITEM+2~
FDA(1	DMITEM+8*
FDA(2	DMITEM+9*
FDA(441	DMITEM+3, DMITEM+4, DMITEM+5, DMITEM+6
IEN	PROCESS+3~, NODE2+1*, NODE2+2, NODE2+4
ITM	PROCESS+3~, ITEM+7*, ITEM+11, ITEM+19
ITOT	PROCESS+3~, ITEM+2*, TOT+1
IVAL	PROCESS+3~, ITEM+5*, ITEM+16
MESSAGE	ESIG+1*, ESIG+2, ESIG+3!
N	ERR~, ERR+2*, ERR+3
ND	PROCESS+3~, PROCESS+6, PROCESS+7, PROCESS+8, PROCESS+10, PROCESS+11, PROCESS+12, NODE2+1, NODE2+3, ITEM+4 , ITEM+5, ITEM+6, ITEM+16, ADJ+9*, ADJ+10
NOD	INIT~, INIT+4, PROCESS+6, PROCESS+11, ITEM+2, ITEM+4, ADJ+7, ADJ+9
PRC	PROCESS+2~
PRC("BBFY"	PROCESS+13*
PRC("CP"	PROCESS+12, PROCESS+13, TRANS+1, TRANS+2, NOD0+1, COMMIT+4, COMMIT+5, COMMIT+9, COMMIT+13, COMMIT+14 , FILE+1, ADJ+16
PRC("FY"	PROCESS+13, TRANS+1, TRANS+2, POSTING+6
PRC("QTR"	TRANS+2
PRC("SCP"	PROCESS+12, PROCESS+14, FILE+1, ADJ+21
PRC("SITE"	PROCESS+6*, PROCESS+13, TRANS+1, TRANS+2, NOD0+1, COMMIT+4, COMMIT+5, COMMIT+9, POSTING+6, FILE+1 , ADJ+16
PRCHQ	PROCESS+2~, COMMIT+1*, COMMIT+12, ESIG+18
PRCPDA	PROCESS+2~, POSTING+4*, POSTING+8, POSTING+9, POSTING+10, FILE+1, FINAL+2, FINAL+4, FINAL+6, FINAL+9
PRCPORD	PROCESS+2~, POSTING+6*, POSTING+7, POSTING+8
PRCPXX	ADJ+20, ADJ+22, ADJ+23!
PRCSCP	PROCESS+2~, COMMIT+9*, COMMIT+12, ESIG+12
PRCSN	PROCESS+4~, COMMIT+1*, COMMIT+13, COMMIT+14, ESIG+8, ESIG+9, ESIG+14
PRCSTAT	ESIG+11*, ESIG+13!
PRCVDT	PROCESS+4~, PROCESS+6*, NODE2+7, ITEM+12, TOT+1
PRCVI	PROCESS+4~, ITEM+3, ITEM+4, ITEM+10, ITEM+11, ITEM+12, ITEM+13, ITEM+16, ITEM+17, ITEM+18 , ITEM+19, ITEM+22, ADJ+8, ADJ+9
RECORD1	PROCESS+2~
RECORD10	PROCESS+2~
RECORD2	PROCESS+2~
RECORD3	PROCESS+2~
RECORD4	PROCESS+2~
RESULT	DMITEM+2~
RTVAL	INIT+3~, NOD0+5, EXIT+1, ADJ+5, ERR+3*
SAL	ADJ+15~, ADJ+19, ADJ+21, ADJ+22
STOT	PROCESS+3~, ITEM+2, ITEM+20, TOT+1, ESIG+4, POSTING+9, FILE+1, ADJ+7, ADJ+10, ADJ+12 , ADJ+14, ADJ+16, ADJ+21
SVAL	PROCESS+3~, ITEM+5*, ITEM+16, ITEM+20
T	PROCESS+2~
TRNODE	PROCESS+3~, ESIG+18
TRNODE(0	ESIG+18*
U	PROCESS+6*, PROCESS+7, PROCESS+8, PROCESS+10, PROCESS+12, ITEM+5, ITEM+6, ITEM+11, ITEM+16, ITEM+22 , TOT+1, TOT+3, COMMIT+3, COMMIT+4, COMMIT+5, COMMIT+9, COMMIT+11, COMMIT+12, COMMIT+13, COMMIT+14 , COMMIT+16, ESIG+8, ESIG+9, ESIG+14, POSTING+8, POSTING+9, FILE+1, FINAL+2, FINAL+4, FINAL+6 , ADJ+10, ADJ+16, ADJ+21
X	PROCESS+10, TRANS+1, ESIG+4, ESIG+9, ESIG+10!, ESIG+11, ESIG+12
Z	PROCESS+3~, PROCESS+7, PROCESS+14, TRANS+2

Name	Field # of Occurrence
$T(ERCODE+N	ERR+2

Name

Field # of Occurrence

$T(ERCODE+N

ERR+2

Customize PDF page

Package: IFCAP

Routine: PRCVIBF

Information

Source Information

Call Graph

Call Graph Total: 17

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items