INHUTIL ;JSH; 6 Mar 96 13:04;Function library part 1 - VA version
Source file <INHUTIL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
CASECONV(STRING,CODE) | ;Returns STRING case converted according to CODE
|
|
JUST(S,W,T,P) | ;returns string S in a field of width W
|
|
TB(X) | ;Returns X with trailing spaces stripped
|
|
NOCTRL(X) | ;Returns X with all control characters removed
|
|
CENTER(S,L) | ;center text S in field of length L
|
|
FORMAT(S,W,D) | ;Formats string S into an array referenced by D with a
|
|
ACTV(BIT) | ;activate/inactivate all active messages in Script Generator
; Message file #4011 |
|
LB(X) | ;Returns X with leading spaces stripped
|
|
ENV | ;Set up user environment
|
|
DUP(C,L) | ;Returns a string of length L made by duplicating
|
|
TRANS(%E) | ;input transform for reader
|
|
LBTB(X) | ;Returns X with both leading and trailing spaces removed
|
|
REPLACE(STRING,ST1,ST2) | ;Replace all occurrences of ST1 in STRING with ST2
|
|
NAME(NAME,F) | ;Returns NAME (in FileMan storage form LAST,FIRST MIDDLE)
|
|
SOC(P1,P2,SOC,T) | ;Set of Codes front end to readers
|
|
QS(GLB,SUB) | ; return subscript - temporary replacement for $QS
; Input: ; (r) GLB - Global node ; (r) SUB - Subscript of node |
Name | Field # of Occurrence |
---|---|
^DIC | TRANS+3, ENV+1 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DIC(3 - [#3] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("EOFF" | TRANS+4 |
^%ZOSF("EON" | TRANS+2 |
^INRHSITE(1 | ENV+2 |
^INTHL7M - [#4011] | ACTV+9* |
^INTHL7M("B" | ACTV+6, ACTV+8 |
^UTILITY("UTSOC" | SOC+6!, SOC+7*, SOC+8*, SOC+9! |
Name | Line Occurrences |
---|---|
$$LB | LBTB+1 |
$$TB | LBTB+1 |
@( | SOC+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | DUP+2~*, FORMAT+2~*, FORMAT+4, FORMAT+6*, QS+4~, QS+9*, QS+11* |
%1 | REPLACE+2~, REPLACE+3* |
%E | TRANS~, TRANS+2, TRANS+4 |
%F | NAME+2~* |
%L | NAME+2~* |
%M | NAME+2~* |
%N | NAME+2~, NAME+3*, NAME+4*, NAME+5*, NAME+6 |
%P | JUST+3~, JUST+4*, JUST+5 |
%S | REPLACE+2~*, REPLACE+3*, REPLACE+4 |
BIT | ACTV~, ACTV+9, ACTV+10, ACTV+11 |
C | DUP~, DUP+2 |
CODE | CASECONV~, CASECONV+3*, CASECONV+4, CASECONV+5 |
D | FORMAT~, FORMAT+2, FORMAT+4, FORMAT+6 |
DIC | SOC+4~, TRANS+3*, ENV+1* |
DIC(0 | TRANS+3*, ENV+1* |
DUZ | ENV+1* |
F | NAME~, NAME+3, NAME+4, NAME+5 |
GLB | QS~, QS+5*, QS+6, QS+7, QS+8*, QS+9, QS+10*, QS+11*, QS+12 |
I | SOC+4~, SOC+7*, SOC+8, LB+1~*, TB+1~*, NAME+2~, NAME+3*, NAME+4, NAME+5, DUP+2~ , FORMAT+2~, FORMAT+5*, FORMAT+6*, QS+4~ |
INI | ACTV+4~, ACTV+7*, ACTV+8*, ACTV+9 |
IOM | ACTV+10 |
J | SOC+4~, SOC+7* |
L | CENTER~, CENTER+1, DUP~, DUP+2 |
N | QS+4~, QS+10*, QS+11 |
NAME | NAME~, NAME+2 |
P | JUST~, JUST+4, QS+4~, QS+9* |
P01 | ACTV+4~, ACTV+5*, ACTV+6*, ACTV+8, ACTV+10, ACTV+11 |
P1 | SOC~, SOC+5* |
P2 | SOC~, SOC+8* |
P21 | SOC+4~, SOC+7*, SOC+8 |
PO | QS+4~, QS+9* |
S | CENTER~, CENTER+1*, DUP+2~*, FORMAT~, FORMAT+3, FORMAT+4*, FORMAT+5, FORMAT+6*, JUST~, JUST+4 , JUST+5, QS+4~, QS+9* |
S1 | FORMAT+2~ |
SOC | SOC~, SOC+7 |
ST1 | REPLACE~, REPLACE+3 |
ST2 | REPLACE~, REPLACE+3 |
STRING | CASECONV~, CASECONV+4, CASECONV+5, CASECONV+6, REPLACE~, REPLACE+3*, REPLACE+4 |
SUB | QS~, QS+5, QS+9, QS+10 |
T | SOC~, SOC+5, SOC+9, JUST~, JUST+5 |
U | SOC+7, TRANS+3, ACTV+9 |
W | FORMAT~, FORMAT+4, FORMAT+5, FORMAT+6, JUST~, JUST+4, JUST+5 |
X | SOC+4~, SOC+9, TRANS+2, TRANS+3!*, LB~, LB+1, TB~, TB+1, LBTB~, LBTB+1 , NOCTRL~, NOCTRL+2, QS+4~ |
X( | QS+5, QS+6*, QS+9*, QS+10 |
X(0 | QS+6*, QS+7* |
Y | SOC+4~, TRANS+3, LB+1~*, LB+2, TB+1~*, TB+2, ENV+1 |