CPT File 81 Identifier Update    ICR (5413)

Direct Kill of the following DD nodes in the
Post-Install:

^DD(81,0,"ID",2)=
D EN^DDIOL(("  "_$$IDCPS^ICPTID(+Y)),"","?0") D:$D(SRSITE) ^SROCPT

^DD(81,0,"ID",5)=
D EN^DDIOL(("   "_$$IDCP^ICPTID(+Y,5)),"","?0")

Direct Set of the following DD node in the Post-Install:

^DD(81,0,"ID",6)=
D EN^DDIOL(("  "_$$IDCPF^ICPTID(+Y)),"","?0") D:$D(SRSITE) ^SROCPT

NOTE:  Field #6 is the SOURCE field and is used to distinguish between
national codes and VA codes.  The identifiers are being moved from the deleted
fields to a static field.

Patch ICPT*6.0*46 deletes SHORT NAME field #2 and
INACTIVE FLAG #5 from the CPT file #81.  The CPT package needs permission to
delete the file identifiers associated with these two fields and then set a
replacement identifier in the Data Dictionary.

This agreement is one time only and expires with the installation of
ICPT*6.0*46.