PXRMTAXD ; SLC/PKR - Routines used by taxonomy data dictionary. ;10/23/2015
Source file <PXRMTAXD.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BLD30N(IEN) | ;Build the 30 node (USE IN DIALOG CODES) after the 20 node
|
|
| CDINPTR(CODE) | ;Input transform for code field of Use in Dialogs Code multiple.
|
|
| CHGUID(IEN,CODESYS,CODE,UID) | ;For all instances of coding system code pair in
|
|
| CSYSOPTR(CODESYS) | ;Output transform for Coding System field of Use in Dialogs
|
|
| INUSE(TIEN,CHKTYP) | ;Check to see if a taxonomy is in use. Used for the "DEL"
|
|
| KENODE(DA,X) | ;Kill the "AE" (coding system, code) index.
|
|
| KILLUIDC(IEN,CODE,CODESYS) | ;Remove codes from the Use In Dialogs Codes multiple
|
|
| KTC(DA,X) | ;Kill the "ATC" (term, coding system) index.
|
|
| KTCC(DA,X) | ;KILL the "ATCC" (term, coding system, code) index.
|
|
| KUID(DA,X) | ;Kill the "AUID" Use in Dialog index and remove the code
|
|
| KUIDC(DA,X) | ;When a code is deleted from the Use In Dialog Codes multiple
|
|
| RBLD20I(D0) | ;Rebuild all the indexes on the 20 node for a taxonomy. This
|
|
| RBLD20IA | ;Rebuild all the indexes on the 20 node.
|
|
| RBLDUIDI(D0) | ;Rebuild the "AUID" index for an individual taxonomy.
|
|
| RBLDUID | ;Rebuild the "AUID" index for all taxonomies.
|
|
| SAVEUIDC(IEN,CODESYS,CODE) | ;Save codes marked as Use In Dialog in the
|
|
| SENODE(DA,X) | ;Set the "AE" (coding system, code) index.
|
|
| STC(DA,X) | ;Set the "ATC" (term, coding system) index.
|
|
| STCC(DA,X) | ;Set the "ATCC" (term, coding system, code) index.
|
|
| SUID(DA,X) | ;Set the "AUID" Use in Dialog index.
|
|
| SUIDC(DA,X) | ;Copy codes from the Use in Dialog Codes multiple to the Selected
|
|
| VCSYS(LEXSAB) | ;Return true if the coding system is supported in taxonomies.
|
