TIULS ; SLC/JER - String Library functions ;26-Feb-2010 11:56;MGH
Source file <TIULS.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | ^DIWP ^DIWW |
| Kernel | 1 | $$STRIP^XLFSTR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INAME(X) | ; Call with X="FIRST MI[.] LAST[,M.D.]", RETURNS "LAST,FIRST MI"
|
|
| STRIP(TEXT) | ; Strips white space from text
|
|
| SIGNAME(TIUDA) | ; Get/Return Signature Block Printed Name
|
|
| WRAP(TEXT,LENGTH) | ; Breaks text string into substrings of length LENGTH
|
|
| CENTER(X) | ; Center X
|
|
| QDATE | ||
| HASNUM(X) | ; Boolean - evaluates whether X contains a number
|
|
| LOWER(X) | ; Convert UPPER CASE X to lower case
|
|
| MIXED(X) | ; Return Mixed Case X
|
|
| UPPER(X) | ; Convert lower case X to UPPER CASE
|
|
| URGENCY(X) | ; Input transform for urgency codes
|
|
| DATE(X,FMT) | ; Call with X=2910419.01 and FMT=Return Format of date ("MM/DD")
|
|
| INAMEX | ||
| TIME(X,FMT) | ; Recieves X as 2910419.01 and FMT=Return Format of time (HH:MM:SS).
|
|
| SIGTITL(TIUDA) | ; Get/Return Signature Block Printed Name
|
|
| NAME(X,FMT) | ; Call with X="LAST,FIRST MI", FMT=Return Format ("LAST, FI")
|
|
| PARSE(X,Y) | ; Parse string X, return array Y with list of words from X
|
|
| WORD(X,FMT) | ; Call with X=Word Processing array root, FMT=Wrap Width
|
|
| NAMEX | ||
| FILL(X,Y,LEN) | ; Append ", "_X to Y, unless Y would excede LEN
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^UTILITY($J | WORD+1!, WORD+4! |
| ^VA(200 - [#200] | SIGNAME+1, SIGTITL+1 |
| Name | Line Occurrences |
|---|---|
| $$LOWER | NAME+4, MIXED+2 |
| $$TIME | DATE+7 |
| $$UPPER | NAME+9, MIXED+2, URGENCY+1, PARSE+4 |
| NAMEX | NAME+2 |
| QDATE | DATE+2 |
| Name | Field # of Occurrence |
|---|---|
| ^( | WORD+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AMTH | DATE+1~, DATE+5* |
| CC | DATE+1~, DATE+4* |
| DD | DATE+1~, DATE+4* |
| DIWF | WORD+1~, WORD+2* |
| DIWL | WORD+1~, WORD+2* |
| FIRST | INAME+1~, INAME+4*, INAME+6 |
| FMT | TIME~, TIME+2*, TIME+4*, TIME+5, DATE~, DATE+2*, DATE+3*, DATE+5, DATE+6*, DATE+7* , QDATE, NAME~, NAME+2*, NAME+3*, NAME+4*, NAME+9*, NAMEX, WORD~, WORD+2 |
| HR | TIME+1~, TIME+3* |
| I | PARSE+1~, PARSE+2*, PARSE+3, PARSE+4, HASNUM+1~* |
| IOM | CENTER+2 |
| LAST | INAME+1~, INAME+5*, INAME+6 |
| LEN | FILL~, FILL+1 |
| LENGTH | WRAP~, WRAP+5, WRAP+6, WRAP+10 |
| LINE | WRAP+1~, WRAP+8*, WRAP+10*, WRAP+11 |
| MI | INAME+1~, INAME+5*, INAME+6 |
| MIDDLE | INAME+1~, INAME+4*, INAME+5 |
| MIN | TIME+1~, TIME+3* |
| MM | DATE+1~, DATE+4*, DATE+5 |
| NAME | INAME+1~, INAME+4*, INAME+5, INAME+6*, INAMEX |
| SEC | TIME+1~, TIME+3* |
| SP | CENTER+1~, CENTER+2*, CENTER+3 |
| TEXT | STRIP~, STRIP+3*, STRIP+4, STRIP+5*, STRIP+6, WRAP~, WRAP+2, WRAP+3, WRAP+4, WRAP+7* , WRAP+8, WRAP+9, WRAP+10, WRAP+11, WRAP+12*, WRAP+13 |
| TIUDA | SIGNAME~, SIGNAME+1, SIGTITL~, SIGTITL+1 |
| TIUFI | NAME+1~, NAME+6* |
| TIUFIRST | NAME+1~, NAME+5*, NAME+6, NAME+7, NAME+8* |
| TIUI | TIME+1~, TIME+4*, DATE+1~, DATE+6*, NAME+1~, NAME+9*, WORD+1~, WORD+3*, MIXED+1~, MIXED+2* , WRAP+1~, WRAP+3*, WRAP+4, WRAP+7, WRAP+9*, WRAP+10, WRAP+11, WRAP+12* |
| TIUJ | WRAP+1~, WRAP+12* |
| TIULAST | NAME+1~, NAME+5* |
| TIULI | NAME+1~, NAME+5* |
| TIUMI | NAME+1~, NAME+7* |
| TIUTI | STRIP+1~, STRIP+3*, STRIP+4* |
| TIUTMP | DATE+1~, DATE+2* |
| TIUX | STRIP+1~, STRIP+4*, STRIP+5, WRAP+1~, WRAP+4*, WRAP+5, WRAP+6 |
| TIUX( | WRAP+10, WRAP+11*, WRAP+12 |
| TIUX(1 | WRAP+8* |
| TIUX1 | WRAP+1~, WRAP+6*, WRAP+7 |
| TIUX2 | WRAP+1~, WRAP+6*, WRAP+7 |
| TIUY | WRAP+1~, WRAP+10*, WRAP+11* |
| TMP | MIXED+1~, MIXED+2*, MIXED+3 |
| U | SIGNAME+1, SIGTITL+1 |
| WORD | MIXED+1~, MIXED+2*, PARSE+1~, PARSE+3*, PARSE+4 |
| X | TIME~, TIME+3*, DATE~, DATE+2, DATE+4, DATE+7, NAME~, NAME+2, NAME+5, INAME~ , INAME+2*, INAME+4, WORD~, WORD+1~, WORD+3*, UPPER~, UPPER+1, LOWER~, LOWER+1, MIXED~ , MIXED+2, CENTER~, CENTER+2, CENTER+3, URGENCY~, URGENCY+1, FILL~, FILL+1, PARSE~, PARSE+2 , PARSE+3, HASNUM~, HASNUM+1 |
| Y | FILL~, FILL+1, PARSE~, HASNUM+1~*, HASNUM+2 |
| Y( | PARSE+4* |
| YY | DATE+1~, DATE+4* |