| GENERAL DESCRIPTION |
The DD for the CPT file #81 includes the following DD
Identifier node which causes the CPT Versioned Description field #62 to be
displayed when a lookup is done on the CPT file:
^DD(81,0,"ID",6)=D EN^DDIOL((" "_$$IDCPF^ICPTID(+Y)),"","?0")
D:$D(SRSITE) ^SROCPT
An agreement is established for Surgery to call ^DD(81,0,"ID",6). This DD node
will remain in place to assist with CPT lookups from within the Surgery
package. Surgery will be responsible for support of the conditional call to
^SROCPT.
The following MUMPS code will be included with the file Identifier supporting
the Surgery Package to display the Versioned Description field #62 using the
Code Set Versioning API $$CPTD^ICDCODE:
D:$D(SRSITE) ^SROCPT
|
| GLOBAL REFERENCE |
| GLOBAL REFERENCE |
GLOBAL DESCRIPTION |
DD(81,0,'ID',6) |
File Identifier:
^DD(81,0,"ID",6)=D EN^DDIOL((" "_$$IDCPF^ICPTID(+Y)),"","?0")
D:$D(SRSITE) ^SROCPT
Where $$IDCPF returns the Versioned Short Name from field #61, and the
Versioned Status from field #60 (only if Inactive), and ^SROCPT returns the
Versioned Description from field #62.
|
|
