IBDFDBS ;ALB/RMO/CJM - Database Server Utilities; [ 03/23/95 11:08 AM ]
Source file <IBDFDBS.m>
| Package | Total | Call Graph | 
|---|---|---|
| VA Fileman | 4 | $$GET1^DID (CHK,FILE,UPDATE)^DIE ($$IENS,CLEAN)^DILF $$EXTERNAL^DILFD | 
| Package | Total | Caller Graph | 
|---|---|---|
| Automated Information Collection System | 1 | IBDECLN | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| TESTVAL(FILE,FIELD,VALUE) | ; | |
| UPD(FILE,IBDFDA,DATA,ERROR) | ;File data into an existing record. ; Input: ; FILE - File or sub-file number ; IBDFDA - New name for traditional DA array, with same meaning. ; Pass by reference. ; DATA - Data array to file (pass by reference) ; Format: DATA(<field #>)=<value> | |
| ADD(FILE,IBDFDA,DATA,ERROR,IEN) | ; | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| DATA | UPD~, ADD~ | 
| DATA( | UPD+24, UPD+25, ADD+33, ADD+34 | 
| >> DIERR | UPD+27, UPD+32, ADD+37 | 
| DISPLAY | TESTVAL+5~, TESTVAL+9*, TESTVAL+10 | 
| ERROR | UPD~, UPD+21*, UPD+28*, UPD+30*, ADD~, ADD+38*, ADD+42* | 
| ERRORS | UPD+16~, ADD+23~ | 
| ERRORS(1 | UPD+28, ADD+38 | 
| FDA | UPD+16~, ADD+23~ | 
| FDA( | UPD+25*, ADD+34* | 
| FIELD | UPD+16~, UPD+23*, UPD+24*, UPD+25, ADD+23~, ADD+32*, ADD+33*, ADD+34, TESTVAL~, TESTVAL+3 , TESTVAL+9, TESTVAL+12, TESTVAL+13 | 
| FILE | UPD~, UPD+25, ADD~, ADD+34, TESTVAL~, TESTVAL+3, TESTVAL+9, TESTVAL+12, TESTVAL+13 | 
| IBDFDA | UPD~, UPD+21, UPD+22, ADD~, ADD+30*, ADD+31, ADD+44* | 
| IEN | ADD~, ADD+35, ADD+39*, ADD+41*, ADD+44, ADD+45 | 
| IENA | ADD+23~ | 
| IENA(1 | ADD+35*, ADD+41 | 
| IENS | UPD+16~, UPD+22*, UPD+25, ADD+23~, ADD+31*, ADD+34 | 
| RESULT | TESTVAL+5~, TESTVAL+13 | 
| VALID | TESTVAL+5~, TESTVAL+6*, TESTVAL+10*, TESTVAL+12, TESTVAL+13*, TESTVAL+14 | 
| VALUE | TESTVAL~, TESTVAL+9, TESTVAL+13 |