©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
AIBCVT1 ;IHS/DDPS/DFM-IBM STAT RECORDS NODE PROCESSING [ 09/23/88 11:52 AM ]
Source file <AIBCVT1.m>
| Package | Total | Call Graph |
|---|---|---|
| IBM DDPS Record Consolidation | 4 | (FACFOOT,FACHEAD)^AIBCVT2 (,WRITET)^AIBCVT3 FIELDS^AIBCVT5 ERRMSP^AIBCVT6 |
| Package | Total | Caller Graph |
|---|---|---|
| IBM DDPS Record Consolidation | 1 | AIBCVT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RETURN | ;RETURN TO CALLING ROUTINE
|
|
| EOD | ;RECORD COMPLETE
|
|
| PROCESS | ;READ FACILITY HEADER RECORD
|
|
| EOJ | ;END OF GLOBAL PROCESSING
|
|
| CKTEMP | ;CHECK IF SECONDARY FILE IS BEING CREATED
|
|
| ERROR | ;ERROR PROCESSING ROUTINE
|
|
| NODERR | ;PROCESS NODE ERROR
|
|
| WRITE | ;PERFORM WRITE ROUTINE
|
|
| READREC | ;PROCESS INITIAL NODE FOR FACILITY
|
|
| ABEND | ;ABNORMAL END OR PROCESSING
|
|
| FACFOUND | ;FACILITY HEADER RECORD FOUND
|
|
| GOODNODE | ;PROCESS FIELDS IN NODE
|
|
| NEXTFAC | ;WRITE FACILITY FOOTINGS, GO GET NEXT FACILITY
|
|
| READNODE | ;PROCESS NEXT NODE
|
|
| OVERFLOW | ;MORE THAT 250 CHARACTER RECORD - OVERFLOW IN AIBOT(1)
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD("DD" | FACFOUND+2 |
| Name | Line Occurrences |
|---|---|
| ABEND | PROCESS+3, ERROR+1 |
| CKTEMP | READNODE+4 |
| EOD | GOODNODE+4 |
| EOJ | PROCESS+1 |
| ERROR | GOODNODE+2 |
| FACFOUND | PROCESS+2 |
| GOODNODE | READNODE+3 |
| NEXTFAC | READNODE+1 |
| NODERR | READNODE+5, CKTEMP+2 |
| OVERFLOW | EOD+2 |
| PROCESS | NEXTFAC+1 |
| READNODE | GOODNODE+4 |
| READREC | CKTEMP+1, ERROR+2, WRITE+1 |
| RETURN | EOJ+1, ABEND+1 |
| WRITE | EOD+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> AIBA | EOJ+1*, ABEND+1* |
| >> AIBC | READNODE+2*, GOODNODE+2 |
| >> AIBC( | READNODE+2, READNODE+5 |
| >> AIBC(0 | READNODE+4, READNODE+5*, GOODNODE+4 |
| >> AIBCK | READNODE+2*, READNODE+3, NODERR+1 |
| >> AIBCN1 | READREC+1*, READNODE+2, READNODE+4, READNODE+5, GOODNODE+4* |
| >> AIBCTE | ERROR+1* |
| >> AIBCTI | GOODNODE+3* |
| >> AIBCTO | EOD+1* |
| >> AIBER | GOODNODE+1*, GOODNODE+2, NODERR+1*, ERROR+1 |
| >> AIBFBD | FACFOUND+2* |
| >> AIBFCD | FACFOUND+1* |
| >> AIBFCT | FACFOUND+3* |
| >> AIBFED | FACFOUND+2* |
| >> AIBFNR | FACFOUND+1* |
| >> AIBFSQ | FACFOUND+1* |
| >> AIBGBFT | PROCESS+2, READNODE+1, READNODE+2 |
| >> AIBGBLT | PROCESS+1 |
| >> AIBI | GOODNODE+2* |
| >> AIBIN | PROCESS+2*, FACFOUND+1, FACFOUND+2, FACFOUND+3, READNODE+2*, ERROR+2 |
| >> AIBMSG | PROCESS+3*, NODERR+1*, ERROR+2* |
| >> AIBNK | READNODE+2*, READNODE+3, READNODE+5, GOODNODE+3, NODERR+1 |
| >> AIBOT | EOD+3*, EOD+4*, OVERFLOW+1*, OVERFLOW+3 |
| >> AIBOT(1 | OVERFLOW+2*, OVERFLOW+3* |
| >> AIBRLN | EOD+2, EOD+3, EOD+4, OVERFLOW+2, OVERFLOW+3 |
| >> AIBTMP | CKTEMP+1 |
| >> AIBZ | PROCESS+1*, FACFOUND+1 |
| >> AIBZZ | PROCESS+2*, READNODE+1* |
| U | FACFOUND+1, FACFOUND+2, FACFOUND+3, READNODE+2, READNODE+5 |
| >> Y | FACFOUND+2* |