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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PRCHITX

Package: IFCAP

Routine: PRCHITX


Information

PRCHITX ;WOIFO/LKG-SELECTING ITEMS USED IN LAST 12 MONTHS ;1/27/05 10:56

Source Information

Source file <PRCHITX.m>

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] GET1^DIQ
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call