BMXADOS ; IHS/CIHA/GIS - UPDATE THE BMX ADO SCHEMA FILE ;
Source file <BMXADOS.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 5 | ^DIC YN^DICN ^DIE ^DIK ^DIR |
IHS VA Utilities | 1 | ^XBFMK |
Name | Comments | DBIA/ICR reference |
---|---|---|
OLD1 | ||
FLIST(OUT,FILE,MODE) | ;EP - GIVEN A FILE RETURN THE FILEDS IN AN ARRAY MODE=0: NUMERIC ORDER, MODE=1: ALPHA ORDER
; ONLY NON MULTIPLES AND WORD PROCESSING FIELDS ARE LISTED |
|
PASS1 | ; PASS 1. BUILD THE ARRAY OF ALL SUBFILES
|
|
FDEL(SIEN,FIELD) | ; DELETE AN EXISTING ENTRY FROM THE 'FIELD' MULTIPLE. RETURN '1' IF THE RECORD WAS DELETED
|
|
PAUSE(I) | ; SCROLL CHECK
|
|
NEW | ||
LKUP | ; AUTOMATICALLY ADD A LOOKUP FIELD TO THE SCHEMA
|
|
OLD | ||
ASTG(STG) | ; CONVERT STRING FROM FILE NUMBERS TO FILE NAMES
|
|
UDIC | ||
SCHEMA | ||
FDEF(FILE,FIELD) | ;EP - GIVEN A FILEMAN FILE AND FIELD, RETURN THE DATA DEFINITION IN ADO FORMAT
|
|
UPDATE | ; UPDATE THE SCHEMA FILE
|
|
IFLG | ||
FNAME | ||
SC(OUT,FILE,MODE) | ;EP - SUB CRAWLER. GIVEN A FILE NUMBER RETURN ALL OF ITS DESCENDANT FILES IN AN ARRAY
|
|
DDA | ; ADO FORMAT
|
|
FIN | ||
ID | ; AUTOMATICALLY ADD AN IDENTIFIER REFERENCE
|
|
SC3 | ; 3RD PASS. BUILD OUTPUT ARAY
|
|
SC2 | ; SECOND PASS. BUILD THE INTERMEDIATE ARRAY
|
|
F1 | ||
F2 | ||
FILE(SIEN) | ; GET THE FILE OR SUBFILE NUMBER
|
|
DTYPE | ||
FLD1 | ||
NEW2 | ||
FLD(FIEN,SIEN) | ; GET THE FIELD
|
|
NEW1 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^BMXADO - [#90093.99] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^BMXADO - [#90093.99] | SCHEMA+2, IFLG+13*, FDEL+2, FDEL+8, FILE+2 |
^DD( | FLD+5, FLD1+7, IFLG+15, FDEF+2, FDEF+3, OLD+1, OLD+2, SC+1, SC2+2, SC2+4 , SC2+9, PASS1+2, PASS1+4, ASTG+4, F1, F1+1, F1+3 |
Name | Line Occurrences |
---|---|
$$ASTG | SC2+5 |
$$FDEF | FLD1+3 |
$$FDEL | FLD1+2 |
$$FILE | SCHEMA+1 |
$$PAUSE | FLD+6, NEW1+4 |
FIN | UDIC+2, SCHEMA+1 |
FLD | SCHEMA+3 |
FLD1 | FLD+8 |
FLIST | FLD+3 |
ID | IFLG+19 |
IFLG | IFLG+10 |
NEW2 | NEW1+6 |
OLD1 | OLD1+5 |
PASS1 | SC+4, PASS1+6 |
SC | NEW1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | UPDATE+1~, FLD+2~, FLD1*, FLD1+1, FLD1+7*, FLD1+8*, FLD1+9*, FLD1+10, FLD1+14*, IFLG+2* , FDEL+4*, FDEL+5, FDEF+1~, DTYPE*, DTYPE+1, DDA+3*, DDA+5, DDA+6, DDA+9*, DDA+10 , DDA+14*, DDA+16, DDA+27*, FILE+1~, OLD1+1*, OLD1+2, OLD1+4*, OLD1+5, NEW1+8*, PAUSE+1~ , PAUSE+5*, PAUSE+6, PAUSE+7, PAUSE+8, SC+2~, FLIST+2~, F1+2*, F1+3, F1+4, F1+7* , F2+3*, F2+4 |
%Y | FLD+2~, FLD1+9 |
ARR | SC+2~, FLIST+2~ |
ARR( | SC2+1, SC2+2!, SC2+12!, PASS1+3*, F1+8*, F2+1, F2+3, F2+5! |
ARR(0 | SC+5 |
DA | SCHEMA+2*, FLD+1~, FLD+9!, IFLG+16*, LKUP+5*, ID+1~, ID+7*, FDEL+1~, FDEL+6*, FDEL+9* , NEW1+9! |
DA(1 | IFLG+11*, ID+2*, FDEL+6* |
DIC | UPDATE+1~, UDIC+1*, SCHEMA+2, FLD+1~, IFLG+11*, IFLG+16, LKUP+5, ID+7, FILE+1~, NEW* |
DIC("A" | UDIC* |
DIC("P" | IFLG+12* |
DIC(0 | UDIC+1*, IFLG+12*, NEW* |
DIE | SCHEMA+2*, FLD+1~, IFLG+16*, LKUP+5*, ID+1~, ID+7* |
DIK | FDEL+1~, FDEL+6* |
DIR | FLD+9!, FLD1+5!, NEW1+9! |
DIR("A" | FLD+9*, FLD1+5*, NEW1+9* |
DIR("B" | FLD1+5* |
DIR(0 | FLD+9*, FLD1+5*, NEW1+9* |
DNAME | FDEF+1~, FNAME*, DDA+1, DDA+8, DDA+13, DDA+19, DDA+25, DDA+30, DDA+31, DDA+33 |
DR | SCHEMA+2*, FLD+1~, IFLG+17*, LKUP+6*, ID+1~, ID+8* |
DTIME | IFLG+4, PAUSE+5 |
DTYPE | FLD+2~, FLD1+4*, LKUP+4*, ID+6*, FDEF+1~, DTYPE*, DTYPE+1*, DTYPE+2, DDA+1, DDA+8 , DDA+13, DDA+19, DDA+25, DDA+30, DDA+31, DDA+32 |
FARR | FLD+2~, FLD+3, FILE+1~, NEW1 |
FARR( | FLD+6, FLD1, NEW1+4, NEW2, PAUSE+7 |
FARR(9999 | FLD+4 |
FARR(999999 | NEW1+1 |
FDEF | FLD+1~ |
FIELD | FDEL~, FDEL+2, FDEL+8, FDEF~, FDEF+2, FDEF+3 |
FIEN | UPDATE+1~, SCHEMA+1*, SCHEMA+2, SCHEMA+3, FLD~, FLD+3, FLD+5, FLD1+3, FLD1+7, IFLG+15 , FDEL+1~, FDEL+2*, FDEL+6, FDEL+8*, FDEL+9, FILE+1~, OLD, OLD1+2*, SC+2~, SC+3* , PASS1+2, PASS1+5~* |
FILE | FDEF~, FDEF+2, FDEF+3, FILE+1~, FILE+2*, OLD1, OLD1+2, SC~, SC+1, SC+3 , FLIST~, F1, F1+1 |
FLD | FLIST+2~, FLIST+3*, F1*, F1+1, F1+6, F1+8 |
FLDIEN | FLD+1~, FLD1+1*, FLD1+2, FLD1+3, FLD1+7, FLD1+9, IFLG+12, IFLG+15, LKUP+1, DDA+4 , DDA+23 |
FLDNAME | FLD+1~, FLD1+1*, FLD1+5 |
FLDTYPE | FLD+1~ |
FNAME | UPDATE+1~, FDEF+1~, FILE+1~, NEW+1*, NEW1+2, SC+2~, SC2+9*, SC2+11, SC3+5*, SC3+8 |
FNO | FILE+1~, FILE+2*, OLD, OLD+1, OLD+2*, NEW+1*, NEW1, NEW1+1, NEW1+8, SC+2~ , SC2+1*, SC2+2, SC2+3, SC2+9, SC2+11, SC2+12, SC3+7*, SC3+8, PASS1+1~*, PASS1+2* , PASS1+3, PASS1+4, PASS1+5, ASTG+1~, ASTG+3*, ASTG+4 |
GBL | FILE+1~, OLD1+6*, OLD1+7, OLD1+8* |
HDR | FLD+2~, FLD1+6*, LKUP+4*, ID+6* |
I | FLD+2~, FLD+6*, FDEF+1~, DTYPE+1*, DDA+27*, FILE+1~, NEW1+4*, PAUSE~, PAUSE+3, PAUSE+4 , PAUSE+7 |
IFLAG | FLD+2~, IFLG, IFLG+8*, IFLG+19, DDA+4*, DDA+23* |
IFLAG(0 | IFLG+6*, IFLG+7*, IFLG+8*, IFLG+10, ID+3 |
IMSG | FLD+2~, IFLG+3*, IFLG+6, IFLG+10! |
>> IPFLAG(0 | IFLG+10! |
LEN | FLD+2~, FLD1+4*, LKUP+4*, ID+6*, FDEF+1~, DDA+1, DDA+2*, DDA+5*, DDA+6*, DDA+8 , DDA+11*, DDA+13, DDA+17*, DDA+19, DDA+21*, DDA+22*, DDA+25, DDA+28* |
LEV | ASTG+1~, ASTG+2*, ASTG+3 |
LEVEL | SC+2~, SC2+8*, SC2+11, SC3+6*, SC3+8 |
MODE | SC~, SC2+5, FLIST~, F1+7 |
NAME | ASTG+1~, ASTG+4*, ASTG+5*, ASTG+6, ASTG+7, FLIST+2~, F1+5*, F1+7, F1+8 |
NODE | SC+2~, SC3+1*, SC3+2*, SC3+3 |
NSTG | FILE+1~, OLD+1*, OLD+2*, OLD1 |
OUT | SC~, FLIST~ |
OUT( | SC3+8*, F2+4* |
PAUSE | FLD+2~, FLD+6*, FLD+7, FLD+8, NEW1+4*, NEW1+5, NEW1+6 |
PCE | ASTG+1~, ASTG+3*, ASTG+7 |
PFLAG | FLD+2~, FLD1+11, FLD1+14*, IFLG+20, DDA+30* |
READ | FLD+2~, IFLG+15* |
REF | ID+1~, ID+3* |
SARR | SC+2~ |
SIEN | UPDATE+1~, SCHEMA*, SCHEMA+1, SCHEMA+2, SCHEMA+3, FLD~, FLD1+2, IFLG+11, IFLG+13, ID+2 , FDEL~, FDEL+2, FDEL+6, FDEL+8, FILE~, FILE+2, OLD1+6 |
SNAME | UPDATE+1~, SCHEMA* |
SS | FLIST+2~, F1+6*, F1+7*, F1+8, F2*, F2+1*, F2+3, F2+5 |
STG | FLD+2~, FDEF+1~, FDEF+3*, DTYPE, FNAME, DDA+3, DDA+8, DDA+9, DDA+14, DDA+15 , DDA+20, DDA+26, SC+2~, SC2+3*, SC2+4*, SC2+5*, SC2+6*, SC2+7, SC2+8, SC2+10 , ASTG~, ASTG+2, ASTG+3, ASTG+6*, ASTG+7*, ASTG+9, F1+1*, F1+2, F1+5 |
STOP | UPDATE+1~, SCHEMA+3, FLD+4*, FLD+7*, FLD+10* |
SUB | FILE+1~ |
TOT | FLD+2~, FLD+4*, FLD+9, FILE+1~, NEW1+1*, NEW1+2, NEW1+9, SC+2~, SC+3*, SC3+4* , SC3+8, FLIST+2~, FLIST+3*, F2+2*, F2+4 |
TRANS | FLD+1~, FLD1+6*, FLD1+10* |
U | SCHEMA, SCHEMA+2, FLD+7, FLD1+7, IFLG+15, DTYPE, FNAME, DDA+26, FILE+2, OLD1+8 , NEW+1, NEW1+5, PAUSE+6, SC2+2, SC2+11, SC3+5, SC3+6, SC3+7, F1+2, F1+3 , F1+5, F1+8, F2+4 |
UP | SC+2~, SC2+3*, SC2+4* |
WP | FLIST+2~, F1+4*, F1+8 |
X | UPDATE+1~, FLD+1~, FLD1+3*, FLD1+4, IFLG+12*, LKUP+1*, LKUP+3, ID+1~, ID+2*, ID+5 , FDEF+1~, DTYPE*, DTYPE+1, DDA+15*, DDA+16, DDA+26*, DDA+27, FILE+1~, SC+2~, SC2+10* , SC2+11, SC3+3*, SC3+5, SC3+6, SC3+7 |
Y | UPDATE+1~, UDIC+2, SCHEMA, FLD+1~, FLD+8*, FLD+10, FLD1, FLD1+6, IFLG+4*, IFLG+5 , IFLG+6, IFLG+7, IFLG+8, IFLG+14, IFLG+16, LKUP+2, LKUP+5, ID+1~, ID+4, ID+7 , FDEF+1~, DTYPE+1*, DDA+10*, DDA+11, DDA+16*, DDA+17, DDA+20*, DDA+21, DDA+26*, DDA+27* , DDA+28, FILE+1~, NEW, NEW+1, NEW1+6*, NEW1+10, NEW2 |
Z | FDEF+1~, DDA+27* |