DILIBF ;SFISC/STAFF-LIBRARY OF FUNCTIONS ;24JULY2015
Source file <DILIBF.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| HTFM(%H,%F) | ;$H to FM
|
|
| FMTH(X,%F) | ;FM to $H
|
|
| H | ;
|
|
| HTE(%H,%F) | ;$H to external
|
|
| FMTE(Y,%F) | ;FM to external
|
|
| T2 | ||
| DOW(X,Y) | ;Day of Week
|
|
| FMDIFF(X1,X2,X3) | ;FM diff in two dates in days if x3=1 seconds if x3=2.
|
|
| D2 | ||
| HDIFF(X1,X2,X3) | ;$H diff in two dates, X3 same as FMDIFF.
|
|
| HADD(X,D,H,M,S) | ;Add to $H date
|
|
| A2 | ||
| FMADD(X,D,H,M,S) | ;Add to FM date
|
|
| CONVQQ(X) | ; CONVERT SINGLE TO DOUBLE QUOTES IN STRING X
|
|
| CONVQ(X) | ; CONVERT DOUBLE TO SINGLE QUOTES IN STRING X
|
|
| QUOTE(X) | ; PUT QUOTES AROUND STRING
|
|
| FNO(X) | ; gets a subfile's top level file number
|
|
| GLO(Z) | ; gets the file number from a global root
|
|
| UP(X) | ; convert string X to uppercase
|
|
| ROUEXIST(X) | ; Execute routine existence test
|
|
| QRER | ||
| F5 | ;
|
|
| F1 | ||
| TM | ||
| M | ;; Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec
|
|
| MU | ;; JAN FEB MAR APR MAY JUN JUL AUG SEP OCT NOV DEC
|
|
| F2 | ||
| F3 | ||
| F4 | ||
| F6 | ||
| F7 | ||
| HKERR(DIFILE,DIIENS,DIFLD,DIHOOK) | ;
|
|
| FILENUM(DIGREF) | ;Return file/subfile number from open global reference
|
