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* |