DGENDBS ;ALB/RMO/CJM - Database Server Utilities; [ 03/23/95 11:08 AM ]
Source file <DGENDBS.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 4 | $$GET1^DID (CHK,FILE,UPDATE)^DIE ($$IENS,CLEAN)^DILF $$EXTERNAL^DILFD |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| UPD(FILE,DGENDA,DATA,ERROR) | ;File data into an existing record.
; Input: ; FILE - File or sub-file number ; DGENDA - 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,DGENDA,DATA,ERROR,IEN) | ;
|
|
| TESTVAL(FILE,FIELD,VALUE) | ;
|
| 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 |
| DGENDA | UPD~, UPD+21, UPD+22, ADD~, ADD+30*, ADD+31, ADD+44* |
| >> 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 |
| 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 |