MAGNU001 ;WOIFO/NST - Utilities for RPC calls ; 25 Apr 2017 4:16 PM
Source file <MAGNU001.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 2 | $$GET1^DID ($$FLDNUM,$$ROOT)^DILFD |
| Imaging | 1 | $$ISFLDSUB^MAGNU001 |
| 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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FM2IDF(FMDT) | ; converts date time in FileMan format CYYMMDD.HHMMSS to YYYYMMDD.HHMMSS
|
|
| GETFILNM(FILE) | ; Returns file name
|
|
| GETFILGL(FILE) | ; Get Global root of the file
|
|
| GETFLDID(FILE,FNAME) | ; Returns a field number
|
|
| GETFLDS(MAGRY,MAGRYW,FILE,FLAGS) | ; Returns array with all fields in a file
; ; Input Parameters ; ================ ; FILE = FileMan file number ; FLAGS = I - add I(internal) to the field numbers in Result e.g .01I;2I;3I ; ; Return Values ; ============= ; ; Result=n1;n2;n3 (e.g. .01;2;3) - no multiple or word-processing fields ; ; MAGRY(n)=nth field name ; MAGRY(n,"TYPE")=type of the field (e.g. RP2006.916, 2006.9183, RD, RN, etc.) ; ; MAGRYW(n)=nth Word-Processing field name ; MAGRY(n,"TYPE")=type of the field (e.g. RP2006.916, 2006.9183, RD, RN, etc.) |
|
| ISFLDSUB(TYPEDEF,FILE,FLDID) | ; Returns true(1) or false(0) if a field is from Word-Processing type or Multiple
|
|
| ISFLDDT(FILE,FLDID) | ; Returns true(1) or false(0) if a field is from DATE/TIME type
|
|
| ISFLDWP(TYPEDEF,FILE,FLDID) | ; Returns true(1) or false(0) if a field is from Word-Processing type
|
|
| GSUBFILE(FILE,FIELD) | ; Returns sub-file of a multiple field
|
|
| GSUBROOT(FILE,FIELD,D0) | ; Return open root of multiple field
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | GETFLDS+24, GETFLDS+25 |
| Name | Line Occurrences |
|---|---|
| $$GETFILGL | GSUBROOT+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| D0 | GSUBROOT~, GSUBROOT+5 |
| DEL | GETFLDS+18~, GETFLDS+35*, GETFLDS+39, GETFLDS+40* |
| FIELD | GSUBFILE~, GSUBFILE+1, GSUBROOT~, GSUBROOT+2 |
| FILE | GETFILNM~, GETFILNM+1, GETFILGL~, GETFILGL+1, GETFLDID~, GETFLDID+1, GETFLDS~, GETFLDS+24, GETFLDS+25, GETFLDS+26 , GETFLDS+32, GETFLDS+38, ISFLDSUB~, ISFLDSUB+3, ISFLDSUB+4, ISFLDDT~, ISFLDDT+1, ISFLDWP~, ISFLDWP+3, ISFLDWP+4 , GSUBFILE~, GSUBFILE+1, GSUBROOT~, GSUBROOT+2, GSUBROOT+4 |
| FILESUB | ISFLDSUB+1~, ISFLDSUB+4*, ISFLDSUB+5 |
| FLAGS | GETFLDS~, GETFLDS+21 |
| FLDID | GETFLDS+18~, GETFLDS+25*, GETFLDS+26, GETFLDS+27, GETFLDS+28, GETFLDS+31, GETFLDS+32, ISFLDSUB~, ISFLDSUB+3, ISFLDSUB+4 , ISFLDDT~, ISFLDDT+1, ISFLDWP~, ISFLDWP+3, ISFLDWP+4 |
| FLDS | GETFLDS+18~, GETFLDS+23*, GETFLDS+39*, GETFLDS+42 |
| FMDT | FM2IDF~, FM2IDF+1, FM2IDF+3, FM2IDF+4 |
| FNAME | GETFLDID~, GETFLDID+1 |
| I | GETFLDS+18~, GETFLDS+22*, GETFLDS+24*, GETFLDS+25, GETFLDS+27, GETFLDS+31, GETFLDS+35*, GETFLDS+36*, GETFLDS+38, GETFLDS+39 |
| IVAL | GETFLDS+19~, GETFLDS+21*, GETFLDS+39 |
| MAGRY | GETFLDS~, GETFLDS+20! |
| MAGRY( | GETFLDS+31*, GETFLDS+32*, GETFLDS+36 |
| MAGRYW | GETFLDS~, GETFLDS+20! |
| MAGRYW( | GETFLDS+27*, GETFLDS+28* |
| MAGTIME | FM2IDF+2~, FM2IDF+3*, FM2IDF+4 |
| NODE | GSUBROOT+1~, GSUBROOT+2*, GSUBROOT+3*, GSUBROOT+5 |
| ROOT | GSUBROOT+1~, GSUBROOT+4*, GSUBROOT+5 |
| TYPEDEF | ISFLDSUB~, ISFLDSUB+2*, ISFLDSUB+5*, ISFLDWP~, ISFLDWP+2*, ISFLDWP+5* |
| WPFILE | ISFLDWP+1~, ISFLDWP+4*, ISFLDWP+5 |
| WPTYPE | GETFLDS+19~, GETFLDS+26, GETFLDS+28, GETFLDS+38 |