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 |