STANDARD DATA DICTIONARY #444.1 -- RFQ VENDOR FILE 3/24/25 PAGE 1
STORED IN ^PRC(444.1, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.1)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains vendors used in the RFQ process who are not found in the site's main VENDOR file (#440). Once a vendor is
selected as the source during RFQ award, an entry for him should be made in file #440 so that he will be vendorized by the Austin
Automation Center and be ready for payment transactions. In lookups for vendors in the RFQ module, file #440 is first searched for
the vendor. If the vendor is not found, the search continues in file #444.1. If not present in this file, the user has the option
to add a vendor to this file.
DD ACCESS: @
RD ACCESS: [
WR ACCESS: ]
DEL ACCESS: %
LAYGO ACCESS: $
IDENTIFIED BY: DUN & BRADSTREET # (#18.3)
POINTED TO BY: SOLICITED VENDOR field (#20) of the REQUEST FOR QUOTATION File (#444)
QUOTES field (#24) of the REQUEST FOR QUOTATION File (#444)
SOLICITED VENDOR field (#.01) of the SOLICITED VENDOR sub-field (#444.01) of the REQUEST FOR QUOTATION File (#444)
VENDOR SELECTED field (#17) of the ITEM sub-field (#444.019) of the REQUEST FOR QUOTATION File (#444)
RECIPIENT field (#11) of the 864 MESSAGES sub-field (#444.021) of the REQUEST FOR QUOTATION File (#444)
RECIPIENT field (#.01) of the RECIPIENT sub-field (#444.022) of the 864 MESSAGES sub-field (#444.021) of the REQUEST
FOR QUOTATION File (#444)
QUOTE VENDOR field (#.01) of the QUOTES sub-field (#444.024) of the REQUEST FOR QUOTATION File (#444)
CROSS
REFERENCED BY: VENDOR NAME(B), DUN & BRADSTREET #(DB)
444.1,.01 VENDOR NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>36!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: NOV 20, 1995
HELP-PROMPT: Answer must be 3-36 characters in length.
DESCRIPTION:
This is the Vendor's Name.
CROSS-REFERENCE: 444.1^B
1)= S ^PRC(444.1,"B",$E(X,1,30),DA)=""
2)= K ^PRC(444.1,"B",$E(X,1,30),DA)
444.1,1 ORDER ADDR LINE 1 1;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>33!($L(X)<1) X
LAST EDITED: JAN 18, 1996
HELP-PROMPT: Answer must be 1-33 characters in length.
DESCRIPTION:
This is the first line of the Ordering Address.
444.1,2 ORDER ADDR LINE 2 1;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>33!($L(X)<1) X
LAST EDITED: JAN 18, 1996
HELP-PROMPT: Answer must be 1-33 characters in length.
DESCRIPTION:
This is the second line of the Ordering Address.
444.1,3 ORDER ADDR LINE 3 1;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>25!($L(X)<1) X
LAST EDITED: JAN 18, 1996
HELP-PROMPT: Answer must be 1-25 characters in length.
DESCRIPTION:
This is the third line of the Ordering Address.
444.1,4 ORDER ADDR LINE 4 1;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>25!($L(X)<1) X
LAST EDITED: JAN 18, 1996
HELP-PROMPT: Answer must be 1-25 characters in length.
DESCRIPTION:
This is the fourth line of the Ordering Address.
444.1,4.2 ORDER ADDR CITY 1;5 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<3) X
LAST EDITED: JAN 18, 1996
HELP-PROMPT: Answer must be 3-20 characters in length.
DESCRIPTION:
This is the City field of the Ordering Address.
444.1,4.4 ORDER ADDR STATE 1;6 POINTER TO STATE FILE (#5)
LAST EDITED: JAN 18, 1996
HELP-PROMPT: Enter State's name or abbreviation
DESCRIPTION:
This is the State of the Ordering Address.
444.1,4.6 ORDER ADDR ZIP CODE 1;7 FREE TEXT
INPUT TRANSFORM: K:$L(X)>10!($L(X)<5)!'(X?5N!(X?5N1"-"4N)) X
LAST EDITED: JAN 18, 1996
HELP-PROMPT: Enter Zip Code as 5 digits or as 5 plus 4 digits.
DESCRIPTION:
This is the Zip Code of the Ordering Address.
444.1,4.8 CONTACT 0;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X?.ANP) X
LAST EDITED: JAN 18, 1996
HELP-PROMPT: Enter the name of the contact person for product information (3-30 chars).
DESCRIPTION:
This is the name of the contact person for information from this vendor.
444.1,5 VOICE PHONE 0;6 FREE TEXT
INPUT TRANSFORM: K:$L(X)>21!($L(X)<10) X
LAST EDITED: JAN 18, 1996
HELP-PROMPT: Answer must be 10-21 characters in length.
DESCRIPTION:
This is the voice phone number for product and ordering information.
444.1,8.3 BUSINESS TYPE 0;5 SET
'1' FOR SMALL;
'2' FOR LARGE;
'3' FOR OUTSIDE U.S.;
'4' FOR STATE/LOC/ED/NPF;
LAST EDITED: JAN 18, 1996
HELP-PROMPT: Enter FPDS Business Type for FPDS reports for FY 1989 or later.
DESCRIPTION:
This is the type of business for FY89 FPDS reporting purposes.
444.1,9 TYPE OF OWNERSHIP 3;0 POINTER Multiple #444.19
DESCRIPTION:
This is the type of ownership.
SCREEN: S DIC("S")="I ""MWVY""[$P(^PRCD(420.6,Y,0),U),$P(^(0),U,3)=0"
EXPLANATION: Can only be an M, W, Y, or V
444.19,.01 TYPE OF OWNERSHIP 0;1 POINTER TO CODE INDEX FILE (#420.6) (Multiply asked)
INPUT TRANSFORM:S DIC("S")="I ""MWVY""[$P(^PRCD(420.6,Y,0),U),$P(^(0),U,3)=0" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X S
:$D(X) DINUM=X
OUTPUT TRANSFORM:Q:Y="" S Y=$S($D(^PRCD(420.6,Y,0)):^(0),1:""),Y=$P(Y,U)_" "_$P(Y,U,2)
LAST EDITED: JAN 18, 1996
DESCRIPTION:
This is the type of ownership.
SCREEN: S DIC("S")="I ""MWVY""[$P(^PRCD(420.6,Y,0),U),$P(^(0),U,3)=0"
EXPLANATION: Can only be an M, W, Y, or V
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE:444.19^B
1)= S ^PRC(444.1,DA(1),3,"B",$E(X,1,30),DA)=""
2)= K ^PRC(444.1,DA(1),3,"B",$E(X,1,30),DA)
444.1,10 SOCIOECONOMIC GROUP 4;0 POINTER Multiple #444.11
DESCRIPTION:
This is the socioeconomic group.
SCREEN: S DIC("S")="I Y>155,$P(^(0),U,3)=1"
EXPLANATION: Select N, P, Q, R, W, or OO
444.11,.01 SOCIOECONOMIC GROUP 0;1 POINTER TO CODE INDEX FILE (#420.6) (Multiply asked)
INPUT TRANSFORM: S DIC("S")="I Y>155,$P(^(0),U,3)=1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X S:$D(X) DINUM=X
OUTPUT TRANSFORM: Q:Y="" S Y=$S($D(^PRCD(420.6,Y,0)):^(0),1:""),Y=$P(Y,U)_" "_$P(Y,U,2)
LAST EDITED: JAN 19, 1996
HELP-PROMPT: Enter FPDS Socioeconomic Group for use in FPDS reporting for FY 1989 or later.
DESCRIPTION:
This is the socioeconomic group.
SCREEN: S DIC("S")="I Y>155,$P(^(0),U,3)=1"
EXPLANATION: Select N, P, Q, R, W, or OO
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 444.11^B
1)= S ^PRC(444.1,DA(1),4,"B",$E(X,1,30),DA)=""
2)= K ^PRC(444.1,DA(1),4,"B",$E(X,1,30),DA)
444.1,17.1 PAYMENT ADDR NAME 2;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>35!($L(X)<1) X
LAST EDITED: JAN 19, 1996
HELP-PROMPT: Answer must be 1-35 characters in length.
DESCRIPTION:
This is the first line of the Payment Address' Name.
444.1,17.15 PAYMENT ADDR NAME 2 2;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>35!($L(X)<1) X
LAST EDITED: JAN 19, 1996
HELP-PROMPT: Answer must be 1-35 characters in length.
DESCRIPTION:
This is the second line of the Payment Address' Name.
444.1,17.3 PAYMENT ADDR LINE 1 2;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>35!($L(X)<1) X
LAST EDITED: JAN 19, 1996
HELP-PROMPT: Answer must be 1-35 characters in length.
DESCRIPTION:
This is the first line of the Payment Address.
444.1,17.4 PAYMENT ADDR LINE 2 2;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>35!($L(X)<1) X
LAST EDITED: JAN 19, 1996
HELP-PROMPT: Answer must be 1-35 characters in length.
DESCRIPTION:
This is the second line of the Payment Address.
444.1,17.5 PAYMENT ADDR LINE 3 2;5 FREE TEXT
INPUT TRANSFORM: K:$L(X)>35!($L(X)<1) X
LAST EDITED: JAN 19, 1996
HELP-PROMPT: Answer must be 1-35 characters in length.
DESCRIPTION:
This is the third line of the Payment Address.
444.1,17.7 PAYMENT CITY 2;6 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
LAST EDITED: JAN 19, 1996
HELP-PROMPT: Answer must be 1-30 characters in length.
DESCRIPTION:
This is the City of the Payment Address.
444.1,17.8 PAYMENT STATE 2;7 POINTER TO STATE FILE (#5)
LAST EDITED: JAN 19, 1996
HELP-PROMPT: Enter the State's name or abbreviation.
DESCRIPTION:
This is the State of the Payment Address.
444.1,17.9 PAYMENT ZIP CODE 2;8 FREE TEXT
INPUT TRANSFORM: K:$L(X)>10!($L(X)<5)!'(X?5N!(X?5N1"-"4N)) X
LAST EDITED: JAN 19, 1996
HELP-PROMPT: Enter the Zip Code as 5 digits or as 5 plus 4 digits.
DESCRIPTION:
This is the Zip Code of the Payment Address.
444.1,18.3 DUN & BRADSTREET # 0;2 FREE TEXT
INPUT TRANSFORM: S:$E(X,1,3)="DUN" X=$E(X,4,99) K:$L(X)>12!($L(X)<5) X I $D(X)#10,'$$DBCHK^PRCHQ1B(X) D EN^DDIOL("Fa
iled D&B Checksum") K X
LAST EDITED: JUN 13, 1996
HELP-PROMPT: Enter the vendor's 5-12 characters code.
DESCRIPTION:
This field contains the Dun & Bradstreet # for the Vendor. This is the unique key for the vendor.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 444.1^DB^MUMPS
1)= S ^PRC(444.1,"DB","DUN"_$E(X,1,30),DA)=""
2)= K ^PRC(444.1,"DB","DUN"_$E(X,1,30),DA)
This cross reference enables lookup by Dun & Bradstreet #.
444.1,38 TAX ID 0;4 FREE TEXT
INPUT TRANSFORM: S X=$TR(X,"-") K:$L(X)>9!($L(X)<9)!'(X?9N) X
LAST EDITED: JAN 18, 1996
HELP-PROMPT: Enter 9 digits code without hyphens.
DESCRIPTION:
This is the Tax ID or Social Security Number for the vendor.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
444.1,46 FAX # 0;7 FREE TEXT
INPUT TRANSFORM: K:$L(X)>21!($L(X)<10) X
LAST EDITED: JAN 18, 1996
HELP-PROMPT: Answer must be 10-21 characters in length.
DESCRIPTION:
This is the fax phone number.
444.1,50 SECTION 8(a) PARTICIPANT 0;8 SET
'y' FOR YES;
'n' FOR NO;
LAST EDITED: MAR 14, 1996
HELP-PROMPT: Enter 'YES' if vendor is a Section 8(a) Program participant.
DESCRIPTION:
This field indicates whether the vendor is a Section 8(a) program participant.
444.1,60 LINK TO FILE 440 VENDOR 0;9 POINTER TO VENDOR FILE (#440)
INPUT TRANSFORM: S DIC("S")="I $P($G(^(7)),U,12)=$P($G(^PRC(444.1,D0,0)),U,2)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: JUL 06, 1996
HELP-PROMPT: Enter File #440 entry which is the same vendor
DESCRIPTION: This field enables mapping of an entry from RFQ Vendor file (a temporary file) to an entry in the
VENDOR file so that 2237s and POs will be built with information from the VENDOR file if the
equivalent entry has been added.
SCREEN: S DIC("S")="I $P($G(^(7)),U,12)=$P($G(^PRC(444.1,D0,0)),U,2)"
EXPLANATION: Only allow linkage to vendor with same Dun & Bradstreet #
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
FILES POINTED TO FIELDS
CODE INDEX (#420.6) SOCIOECONOMIC GROUP:SOCIOECONOMIC GROUP (#.01)
TYPE OF OWNERSHIP:TYPE OF OWNERSHIP (#.01)
STATE (#5) ORDER ADDR STATE (#4.4)
PAYMENT STATE (#17.8)
VENDOR (#440) LINK TO FILE 440 VENDOR (#60)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):
PRCHQ3 FEB 21, 1996@14:06 USER #0
PRCHQ20 DD #444.1
PRCHQ21 DD #444.1
PRCHQ24 DD #444.19
PRCHQ25 DD #444.11