| GENERAL DESCRIPTION |
This is a one time aggreement via patch PRC*5.1*128.
Kill node 9 from following field DD definition:
^DD(443.61,8,0)=FEDERAL SUPPLY CLASSIFICATION^RP441.2'X^PRC(441.2,^2;3^D
EN100^PRCHNPO7
.1)=FSC/PSC ^DD(443.61,8,1,0)=^.1
^DD(443.61,8,1,1,0)=443.61^AU^MUMPS
1)=I $G(PRCHNORE)=1 D:PRCHAMDA=21 EN1^PRCHAMXG Q:PRCHAMDA=21
D FLAG^PRCHMA Q:$T I PRCHAMDA=23 S PRCHX=X,X=0 D EN1^PRCHAMXD S X=PRCHX K
PRCHX
2)=I $G(PRCHNORE)=1,PRCHAMDA=23 S FLAG=1 D EN1^PRCHAMXD
^DD(443.61,8,1,1,"%D",0)=^^5^5^2970416^^^^ ^DD(443.61,8,1,1,"%D",1,0)=This
x-ref will update the CHANGES multiple whenever a 'Line Item Add' or a
^DD(443.61,8,1,1,"%D",2,0)='Line Item Edit' amendment changes this field.
^DD(443.61,8,1,1,"%D",3,0)=
^DD(443.61,8,1,1,"%D",4,0)=****NOTE-See routine PRCHAMXA for information on
variable PRCHNORE and ^DD(443.61,8,1,1,"%D",5,0)=incidence of undefined DIK
variable errors. ^DD(443.61,8,1,1,"DT")=2950321 ^DD(443.61,8,3)=
9)=^ <<<=========== kill this field
^DD(443.61,8,21,0)=^.001^2^2^3050909^^^^ ^DD(443.61,8,21,1,0)=This is the
Federal Supply Classification for an item, or the Product
^DD(443.61,8,21,2,0)=Service Code for a service. ^DD(443.61,8,"DT")=3050909
Global ^DD(442.01,8 -- NOTE: translation in effect ^DD(442.01,8,0)=FEDERAL
SUPPLY CLASSIFICATION^RP441.2'X^PRC(441.2,^2;3^D EN10^PRCHNPO7
.1)=FSC/PSC
3)=ANSWER MUST BE 1-24 CHARACTERS IN LENGTH
9)=^ <<<=========== kill this field
^DD(442.01,8,21,0)=^^2^2^3050809^ ^DD(442.01,8,21,1,0)=This is the Federal
Supply Classification for an item, or the Product ^DD(442.01,8,21,2,0)=Service
Code for a service. ^DD(442.01,8,"DT")=3050809
|
