DIUTL ;GFT/GFT - TIMSON'S UTILITIES;24JAN2013
Source file <DIUTL.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| NAKED(DIUTLREF) | ;The argument is evaluated and returned, while keeping the naked reference as it was!
 | 
|
| DATE(Y) | ;**CCO/NI   RETURN A DATE
 | 
|
| NOWINT() | ;INTERNAL VERSION OF NOW
 | 
|
| NOW() | ;EXTERNAL NOW
 | 
|
| WP(DIRF,DIWL,DIWR,DIWPUT) | ;Write out WP field (if any) stored at DIRF, or put it in DIWPUT array
 | 
|
| QWP | ||
| IJ(N) | ;build I & J arrays given subfile number N
 | 
|
| 0 | ||
| DIVR(DI,DIFLD) | ;verify
 | 
|
| CHKPT(DIFILE,DIDA,DIUTLMSG,DIFLG) | ;check if any entries points to this entry(DIDA) in file (DIFILE)
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  |