ESPUTIL ;DALISC/CKA- CONVERTS UOR # TO DESIRED FORMAT & ZIP CODE TRANSFORMS;3/93
Source file <ESPUTIL.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Package | Total | Caller Graph |
|---|---|---|
| Police and Security | 12 | ESPJOU ESPOFP ESPORP ESPUCFP3 ESPUCP3 ESPVNP ^ESP(910.2 ^ESP(912 COMPLAINANT OFFENDER VICTIM WITNESS |
| Prosthetics | 1 | RMPRFPRT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;Miscellaneous
|
|
| UORN | ;This is to get a UOR# fm 18 doesn't allow 1990 standard
|
|
| XR | ;This is to get a UOR# for UOR xref on DATE/TIME RECEIVED field
|
|
| ZIPIN | ; input transform for ZIP - massages user input and returns data
; in Fileman internal format (no '-'s) |
|
| ZIPOUT | ; output transform for ZIP - prints either ZIP or ZIP+4 (in 12345-1234)
; format. |
|
| EOP() | ; end of page check - return 1 to quit, 0 to continue
; |
|
| NOW() | ; return NOW in external format for print on reports
|
|
| ID(NODE0) | ;writes identifiers for file 910.2
|
|
| SUBTYPE(ESPS,ESPDTR) | ;screen for field #.03/subfile #912.01/file #912
; input ; ESPS = what 2nd & 3rd piece of file #912.9 record ; ESPDTR = date/time (internal FM format) when offense report ; received |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ESP(910 - [#910] | ID+11 |
| ^ESP(910.7 - [#910.7] | ID+5 |
| ^ESP(912 - [#912] | UORN+1 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | SUBTYPE+5 |
| ^(1 | SUBTYPE+6, SUBTYPE+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | ZIPIN+7~, ZIPIN+8* |
| COLOR | ID+2~, ID+3*, ID+4, ID+5*, ID+6*, ID+13 |
| >> D0 | UORN+1 |
| DIR | EOP+2~ |
| DIR(0 | EOP+5* |
| DIROUT | EOP+2~ |
| DIRUT | EOP+2~ |
| DTOUT | EOP+2~ |
| DUOUT | EOP+2~ |
| ESPDTR | SUBTYPE~, SUBTYPE+7 |
| ESPS | SUBTYPE~, SUBTYPE+5 |
| >> ESPUOR | XR+1* |
| IOSL | EOP+4 |
| IOST | EOP+3 |
| NODE0 | ID~, ID+1, ID+3, ID+7, ID+9 |
| OWNER | ID+2~, ID+9*, ID+10, ID+11*, ID+12*, ID+13 |
| TYPE | ID+2~, ID+7*, ID+8*, ID+13 |
| U | UORN+1, SUBTYPE+5, SUBTYPE+7 |
| X | UORN+1*, XR+1, ZIPIN+8*, ZIPIN+9!, EOP+2~, NOW+1~, NOW+2*, NOW+3 |
| Y | ZIPOUT+6*, EOP+2~, EOP+7 |