Routine: PRCHITX

Package	Total	Call Graph
VA FileMan	3	C^%DTC EN^DDIOL $$GET1^DIQ
Kernel	2	$$DT^XLFDT $$KSP^XUPARAM

Package	Total	Caller Graph
IFCAP	1	PRCHITX1

Entry Points

Name	Comments	DBIA/ICR reference
IN	;Entry point
ONEYRAGO()	;Returns FileMan date of one year ago
DATEGTR(X,Y)	;Tests if first date is greater than second
GETPONUM(PRCDA)	;Returns PO Number
GETSTAT(PRCDA)	;Returns Supply Status Order
STATUSOK(X)	;Checks if Supply Status Order value okay for selection
GETPODT(PRCDA)	;Returns P.O. Date in FileMan date format
GETFCP(PRCDA)	;Returns Fund Control Point
MOPOK(PRCDA)	;Checks Method of Processing
GETVENDR(PRCDA)	;Returns Vendor ID
GETITMID(PRCDA,PRCDA1)	;Returns Item Master File Ien
GETUOP(PRCDA,PRCDA1)	;Returns Unit of Purchase
GETPKGM(PRCDA,PRCDA1)	;Returns Packaging Multiple
GETFSC(PRCDA,PRCDA1)	;Returns Federal Supply Classification
GETNSN(PRCDA,PRCDA1)	;Returns National Stock Number
GETSTKNO(PRCDA,PRCDA1)	;Returns Vendor Stock Number
GETNDC(PRCDA,PRCDA1)	;Returns National Drug Code
GETCONTR(PRCDA,PRCDA1)	;Returns Contract/BOA #
ITEMACT(X)	;Checks if item is active
GETMPNUM(X)	;Returns Manufacturer Part Number
GETSDESC(X)	;Returns Item Short Description
GETVNAME(X)	;Returns Vendor Name
GETTIN(X)	;Returns Tax ID Number or Social Security Number
GETPOC(X)	;Returns Vendor Point of Contact
GETPHONE(X)	;Returns Vendor's Phone Number
REUSABLE(PRCDA)	;Returns 1 if item is reusable or 0 if not
LASTVDR(PRCDA)	;Returns vendor ID
CONTRACT(PRCDA,PRCDA1)	;Returns Contract #
STKNO(PRCDA,PRCDA1)	;Returns vendor stock #
UOP(PRCDA,PRCDA1)	;Returns Unit of Purchase
PKGMULT(PRCDA,PRCDA1)	;Returns Packaging Multiple
NDC(PRCDA,PRCDA1)	;Returns NDC
FSC(PRCDA)	;Returns Federal Supply Classification
NSN(PRCDA)	;Returns National Stock Number
FCP(PRCDA)	;Returns FCP
DATE(X)	;Processes date in VA FileMan format and returns date as 'DD-MON-YYYY'
GETSTATN()	;Returns station number of VistA installation
NIFITEM(X)	;Checks if item already has NIF Item #
ACCNT(X)	;Returns vendor account number
VDRLSTD(X)	;Returns vendor with highest ID from item's VENDOR multiple
INVVNDR(PRCX)	;Returns inv's mandatory/requested source of item on trxn
FCPINV(PRCX)	;Get FCP for Inv Transaction

External References

Name	Field # of Occurrence
C^%DTC	IN+2
EN^DDIOL	PRCHITX+3
$$GET1^DIQ	GETSTATN+2
$$DT^XLFDT	ONEYRAGO+1
$$KSP^XUPARAM	GETSTATN+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(4 - [#4]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PRC(420 - [#420]	FCP+5, FCP+6, FCPINV+5, FCPINV+6
^PRC(440 - [#440]	IN+27, IN+43, GETVNAME+1, GETTIN+1, GETPOC+1, GETPHONE+1, CONTRACT+2, ACCNT+2, INVVNDR+4
^PRC(441 - [#441]	IN+22, IN+27, IN+43, ITEMACT+1, ITEMACT+2, GETMPNUM+1, GETSDESC+1, REUSABLE+1, LASTVDR+1, CONTRACT+1 , STKNO+1, UOP+1, PKGMULT+1, NDC+1, FSC+1, FSC+2, NSN+1, FCP+2, FCP+3, NIFITEM+2 , VDRLSTD+2
^PRC(442 - [#442]	IN+5, IN+7, IN+12, GETPONUM+1, GETSTAT+1, GETPODT+1, GETFCP+1, MOPOK+1, GETVENDR+1, GETITMID+1 , GETUOP+1, GETPKGM+1, GETFSC+1, GETFSC+2, GETNSN+1, GETSTKNO+1, GETNDC+1, GETCONTR+1
^PRCD(420.5 - [#420.5]	GETUOP+2, UOP+2
^PRCD(442.3 - [#442.3]	GETSTAT+2
^PRCD(442.5 - [#442.5]	MOPOK+2
^PRCP(	IN+47, IN+49
^PRCP(445 - [#445]	INVVNDR+3, FCPINV+4
^PRCP(445.2 - [#445.2]	IN+32, IN+33, IN+36, IN+37, INVVNDR+2, FCPINV+2
^TMP($J	IN+1!, IN+15, IN+16, IN+17, IN+18, IN+19, IN+23, IN+24, IN+28, IN+29 , IN+34, IN+36, IN+40, IN+44, IN+45, IN+50, IN+51, IN+52, IN+53, IN+56 , IN+57, IN+58, IN+59

Label References

Name	Line Occurrences
$$ACCNT	IN+58
$$CONTRACT	IN+28, IN+44, IN+52
$$DATEGTR	IN+8, IN+15, IN+39
$$FCP	IN+24, IN+51
$$FCPINV	IN+40
$$FSC	IN+24, IN+40, IN+51
$$GETCONTR	IN+18
$$GETFCP	IN+17
$$GETFSC	IN+17
$$GETITMID	IN+13
$$GETMPNUM	IN+17, IN+24, IN+40, IN+51
$$GETNDC	IN+18
$$GETNSN	IN+17
$$GETPHONE	IN+58
$$GETPKGM	IN+18
$$GETPOC	IN+58
$$GETPODT	IN+8
$$GETPONUM	IN+17
$$GETSTAT	IN+10
$$GETSTKNO	IN+18
$$GETTIN	IN+58
$$GETUOP	IN+18
$$GETVENDR	IN+18
$$GETVNAME	IN+58
$$INVVNDR	IN+41
$$ITEMACT	IN+14, IN+23, IN+34, IN+48, IN+50
$$LASTVDR	IN+25, IN+41, IN+52
$$MOPOK	IN+9
$$NDC	IN+28, IN+44, IN+52
$$NIFITEM	IN+14, IN+23, IN+34, IN+48, IN+50
$$NSN	IN+24, IN+40, IN+51
$$ONEYRAGO	IN+2
$$PKGMULT	IN+28, IN+44, IN+52
$$REUSABLE	IN+23
$$STATUSOK	IN+10
$$STKNO	IN+28, IN+44, IN+52
$$UOP	IN+28, IN+44, IN+52
$$VDRLSTD	IN+25, IN+41, IN+52

Naked Globals

Name	Field # of Occurrence
^(9	IN+27, IN+43

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DT	ONEYRAGO+1*
PRCA	IN+1~, IN+2, IN+6, IN+7, IN+8, IN+9, IN+10, IN+12, IN+13, IN+17 , IN+18, IN+31, IN+35, IN+36, IN+37, IN+40, IN+41, FCP+1~, FCP+4*, FCP+5 , FCP+6
PRCB	IN+1~, IN+11, IN+12, IN+13, IN+17, IN+18, FCP+1~, FCP+4*, FCP+5, FCP+6
PRCCNT	IN+1~, IN+2, IN+16, IN+19, IN+24, IN+29, IN+40, IN+45, IN+51, IN+53 , IN+55, IN+58*, IN+59
PRCDA	GETPONUM~, GETPONUM+1, GETSTAT~, GETSTAT+1, GETPODT~, GETPODT+1, GETFCP~, GETFCP+1, MOPOK~, MOPOK+1 , GETVENDR~, GETVENDR+1, GETITMID~, GETITMID+1, GETUOP~, GETUOP+1, GETPKGM~, GETPKGM+1, GETFSC~, GETFSC+1 , GETFSC+2, GETNSN~, GETNSN+1, GETSTKNO~, GETSTKNO+1, GETNDC~, GETNDC+1, GETCONTR~, GETCONTR+1, REUSABLE~ , REUSABLE+1, LASTVDR~, LASTVDR+1, CONTRACT~, CONTRACT+1, STKNO~, STKNO+1, UOP~, UOP+1, PKGMULT~ , PKGMULT+1, NDC~, NDC+1, FSC~, FSC+1, FSC+2, NSN~, NSN+1, FCP~, FCP+2 , FCP+3, FCPINV+4~, FCPINV+5, FCPINV+6
PRCDA1	GETITMID~, GETITMID+1, GETUOP~, GETUOP+1, GETPKGM~, GETPKGM+1, GETFSC~, GETFSC+1, GETFSC+2, GETNSN~ , GETNSN+1, GETSTKNO~, GETSTKNO+1, GETNDC~, GETNDC+1, GETCONTR~, GETCONTR+1, CONTRACT~, CONTRACT+1, CONTRACT+2 , STKNO~, STKNO+1, UOP~, UOP+1, PKGMULT~, PKGMULT+1, NDC~, NDC+1
PRCDATE	IN+1~, IN+15*
PRCDT	IN+1~, IN+2*, IN+4, IN+8, IN+39
PRCFILE	IN+1~, IN+47*, IN+49
PRCI	IN+1~, IN+25, IN+26, IN+27, IN+28, IN+41, IN+42, IN+43, IN+44, IN+52* , IN+55, IN+56, IN+57, FCP+1~, FCP+2, FCP+3
PRCINV	INVVNDR+1~, INVVNDR+3, FCPINV+2~, FCPINV+3, FCPINV+4, FCPINV+5
PRCITM	IN+1~, IN+13, IN+14, IN+15, IN+16, IN+17, IN+18, IN+21, IN+22, IN+23 , IN+24, IN+25, IN+27, IN+28, IN+31, IN+33, IN+34, IN+36, IN+40, IN+41 , IN+43, IN+44, IN+49, IN+50, IN+51, IN+52
PRCJ	IN+1~, IN+47*, IN+48, IN+49
>> PRCPHYS	IN+31
PRCPODT	IN+1~, IN+8*, IN+15, IN+17
PRCSTA	FCPINV+4~*, FCPINV+5, FCPINV+6
PRCSTAT	IN+1~, IN+10*
PRCTRANS	IN+1~, IN+31*, IN+38
PRCV	IN+1~, IN+27, IN+43
PRCX	IN+1~, IN+4, IN+5, IN+7, IN+31, IN+32, IN+33, IN+36, FCP+1~, FCP+2 , FCP+6, FCP+7, INVVNDR~, INVVNDR+1, INVVNDR+2, FCPINV~, FCPINV+1, FCPINV+2
PRCY	IN+1~, IN+37, IN+38, IN+39, INVVNDR+1~, INVVNDR+2, INVVNDR+3
PRCZ	INVVNDR+1~, INVVNDR+2, INVVNDR+3, INVVNDR+4*
X	IN+1~, IN+2, IN+57, IN+58, ONEYRAGO+1~, ONEYRAGO+2, DATEGTR~, DATEGTR+1, GETPONUM+1~, GETPONUM+2 , GETSTAT+1~, GETSTAT+2, GETSTAT+3, STATUSOK~, STATUSOK+1, MOPOK+1~, MOPOK+2, MOPOK+3, GETVENDR+1~, GETVENDR+2 , GETITMID+1~, GETITMID+2, GETUOP+1~, GETUOP+2, GETUOP+3, GETPKGM+1~, GETPKGM+2, GETFSC+1~, GETFSC+2, GETFSC+3 , GETNSN+1~, GETNSN+2, GETSTKNO+1~, GETSTKNO+2, GETNDC+1~, GETNDC+2, GETCONTR+1~, GETCONTR+2, ITEMACT~, ITEMACT+1 , ITEMACT+2, GETMPNUM~, GETMPNUM+1, GETMPNUM+2, GETSDESC~, GETSDESC+1, GETSDESC+2, GETVNAME~, GETVNAME+1, GETVNAME+2 , GETTIN~, GETTIN+1, GETTIN+2, GETPOC~, GETPOC+1, GETPOC+2, GETPHONE~, GETPHONE+1, GETPHONE+2, REUSABLE+1~* , REUSABLE+2, LASTVDR+1~, LASTVDR+2, CONTRACT+1~, CONTRACT+2, CONTRACT+3, STKNO+1~, STKNO+2, UOP+1~, UOP+2 , UOP+3, PKGMULT+1~, PKGMULT+2, NDC+1~, NDC+2, FSC+1~, FSC+2, FSC+3, NSN+1~, NSN+2 , FCP+1~, FCP+3, FCP+4, DATE~, DATE+1, DATE+3, DATE+4, DATE+5, DATE+6, GETSTATN+1~ , GETSTATN+2, GETSTATN+3, NIFITEM~, NIFITEM+2, ACCNT~, ACCNT+2, VDRLSTD~, VDRLSTD+2
X1	IN+1~, IN+2*
X2	IN+1~, IN+2*
Y	DATEGTR~, DATEGTR+1, DATE+2~, DATE+3, DATE+5, NIFITEM+1~, NIFITEM+2, NIFITEM+3, ACCNT+1~, ACCNT+2* , ACCNT+3, VDRLSTD+1~, VDRLSTD+2, VDRLSTD+3, INVVNDR+1~, INVVNDR+2, INVVNDR+4, INVVNDR+5, FCPINV+1~, FCPINV+6 , FCPINV+7
Z	DATE+2~, DATE+4*, DATE+5

Customize PDF page

Package: IFCAP

Routine: PRCHITX

Information

Source Information

Call Graph

Call Graph Total: 5

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: