LEXU3 ;ISL/KER - Miscellaneous Lexicon Utilities ;05/23/2017
Source file <LEXU3.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PRF(LEX,LEXVDT,LEXSAB) | ;  Get Code for a Preferred Term by Source
 ; ; Input ; LEX IEN file 757.01 ; LEXVDT Date for screening ; LEXSAB Source or pointer to 757.03  | 
|
| ADR(LEX) | ; Mailing Address
 | 
|
| VDT | ; Resolve LEXVDT
 | 
|
| INC(X) | ; Increment Concept Usage for a term
 | 
|
| FREQ(TEXT) | ; Get the Frequency of use for a Text String
 ; ; Input ; ; TEXT Text String ; ; Output ; ; $$FREQ Frequency of Text ;  | 
|
| PAR(TEXT,ARY) | ; Parse Text into Words
 | 
|
| MAX(SYS) | ; Get the Maximum Number of Terms to Search
 ; ; Input ; ; SYS Coding System Abbreviation (757.03,.01) ; or pointer to file 757.03 ; ; Output ; ; $$MAX Maximum number of term to look at before ; issuing a warning to the user ;  | 
|
| NXSAB(SYS,REV) | ; Get the Next/Previous Source Abbreviation
 ; ; Input ; ; SYS Coding System Abbreviation (757.03,.01) ; or pointer to file 757.03 ; or null ; REV Direction flag (optional) ; 0 or null finds next in a forward direction ; 1 finds next in a reverse direction ; ; Output ; ; $$NXSAB Next Source Abbreviation in the file  | 
|
| RECENT(X) | ; Recently Updated (90 day window)
 | 
|
| RUPD(SYS) | ; Get the Date the Coding System was most Recently Updated
 | 
|
| LUPD(SYS,LEXVDT) | ; Get the date the Coding System was Last Updated
 | 
|
| EXP(IEN) | ; Get Expression for IEN
 ; ; Input ; ; IEN IEN of file 757.01  | 
|
| EXPS(IEN,CDT,ARY) | ; Get Expression and Codes for IEN
 ; ; Input ; ; IEN IEN of file 757.01 ; CDT Versioning Date ; ARY Output Array passed by reference  | 
|
| PREF(CODE,SAB,CDT) | ; Get Preferred Expression for an Active Code
 | 
| FileNo | Call Tags | 
|---|---|
| ^DIC(4.2 - [#4.2] | Classic Fileman Calls |