PRCHQ20 (119)    BLOCK (.404)

Name Value
NAME PRCHQ20
DATA DICTIONARY NUMBER 444.1
DESCRIPTION
Editing information on vendor in the RFQ Temporary Vendor File.
FIELD
  • FIELD ORDER:   1
    CAPTION:   RFQ Temporary Vendor
    FIELD TYPE:   CAPTION ONLY
    CAPTION COORDINATE:   1,28
  • FIELD ORDER:   10
    CAPTION:   Line #2
    POST ACTION ON CHANGE:   S PRC(2)=$G(DDSEXT) D:$$GET^DDSVAL(444.1,DA,17.4)=""&(PRC(2)'="") PUT^DDSVAL(444.1,DA,17.4,PRC(2))
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   9,15
    DATA LENGTH:   33
    CAPTION COORDINATE:   9,6
  • FIELD ORDER:   11
    CAPTION:   Line #3
    POST ACTION ON CHANGE:   S PRC(3)=$G(DDSEXT) D:$$GET^DDSVAL(444.1,DA,17.5)=""&(PRC(3)'="") PUT^DDSVAL(444.1,DA,17.5,PRC(3))
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   10,15
    DATA LENGTH:   25
    CAPTION COORDINATE:   10,6
  • FIELD ORDER:   12
    CAPTION:   Line #4
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   11,15
    DATA LENGTH:   25
    CAPTION COORDINATE:   11,6
  • FIELD ORDER:   13
    CAPTION:   City
    POST ACTION ON CHANGE:   S PRC(5)=$G(DDSEXT) D:$$GET^DDSVAL(444.1,DA,17.7)=""&(PRC(5)'="") PUT^DDSVAL(444.1,DA,17.7,PRC(5))
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   12,12
    DATA LENGTH:   20
    CAPTION COORDINATE:   12,6
  • FIELD ORDER:   14
    CAPTION:   State
    POST ACTION ON CHANGE:   S PRC(6)=$G(X) D:$$GET^DDSVAL(444.1,DA,17.8)=""&(PRC(6)'="") PUT^DDSVAL(444.1,DA,17.8,PRC(6),"","I")
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   13,13
    DATA LENGTH:   30
    CAPTION COORDINATE:   13,6
  • FIELD ORDER:   15
    CAPTION:   Zip Code
    POST ACTION ON CHANGE:   S PRC(7)=$G(DDSEXT) D:$$GET^DDSVAL(444.1,DA,17.9)=""&(PRC(7)'="") PUT^DDSVAL(444.1,DA,17.9,PRC(7))
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   14,16
    DATA LENGTH:   10
    CAPTION COORDINATE:   14,6
  • FIELD ORDER:   2
    CAPTION:   Vendor Name
    POST ACTION ON CHANGE:   S PRC(0)=$G(DDSEXT) D:$$GET^DDSVAL(444.1,DA,17.1)="" PUT^DDSVAL(444.1,DA,17.1,PRC(0))
    DATA VALIDATION:   I $G(DDSEXT)="" D EN^DDIOL("Deletion is inhibited.") S DDSERROR=1
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   3,15
    DATA LENGTH:   36
    CAPTION COORDINATE:   3,2
  • FIELD ORDER:   3
    CAPTION:   Dun #
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   4,9
    DATA LENGTH:   12
    CAPTION COORDINATE:   4,2
  • FIELD ORDER:   4
    CAPTION:   Tax ID/SSN
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   4,51
    DATA LENGTH:   9
    CAPTION COORDINATE:   4,39
  • FIELD ORDER:   5
    CAPTION:   Contact
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   5,11
    DATA LENGTH:   30
    CAPTION COORDINATE:   5,2
  • FIELD ORDER:   6
    CAPTION:   Voice Phone #
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   6,17
    DATA LENGTH:   21
    CAPTION COORDINATE:   6,2
  • FIELD ORDER:   7
    CAPTION:   Fax #
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   6,46
    DATA LENGTH:   21
    CAPTION COORDINATE:   6,39
  • FIELD ORDER:   8
    CAPTION:   Order Address
    FIELD TYPE:   CAPTION ONLY
    CAPTION COORDINATE:   7,2
  • FIELD ORDER:   9
    CAPTION:   Line #1
    POST ACTION ON CHANGE:   S PRC(1)=$G(DDSEXT) D:$$GET^DDSVAL(444.1,DA,17.3)=""&(PRC(1)'="") PUT^DDSVAL(444.1,DA,17.3,PRC(1))
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   8,15
    DATA LENGTH:   33
    CAPTION COORDINATE:   8,6