ACDFLAT4 ;IHS/ADC/EDE/KML - GENERATE FLAT RECORDS;
Source file <ACDFLAT4.m>
| Package | Total | Call Graph | 
|---|---|---|
| Alcohol Chemical Dependency | 1 | ($$LBLNK,$$LZERO)^ACDFUNC | 
| IHS VA Utilities | 1 | EP^XBCLM | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PR | ; | |
| FLATX | ; EXIT | |
| PR2 | ; PROCESS ONE PR DAY ENTRY ; killing of ACDF(n) necessary because one flat record is ; generated for each PR entry and all fields remain the same except ; those set here. Fields may be missing. | |
| SETARRAY | ; SET RECORD INTO ARRAY | |
| FLAT(ACDPIEN,ACDARRAY) | ; EP-SET FLAT RECORDS INTO ARRAY ; i $$flat^acdflat4(cdmis_prevention_ien,.array_name) then flat records ; will be in array_name(n)=flat_record where n=1:1 and Q value will ; be the number of entries in array_name. | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ACDCOMP - [#9002170.1] | FLAT+16 | 
| ^ACDLOT - [#9002170.8] | PR2+15 | 
| ^ACDPD - [#9002170.7] | FLAT+10, FLAT+11, PR+3, PR2+5, PR2+6, PR2+36, PR2+37, PR2+38 | 
| ^ACDPREV(9002170.9 - [#9002170.9] | PR2+11 | 
| ^VA(200 - [#200] | FLAT+20, PR2+41 | 
| Name | Line Occurrences | 
|---|---|
| FLATX | FLAT+10 | 
| PR | FLAT+23 | 
| PR2 | PR+3 | 
| SETARRAY | FLAT+24 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| % | PR2+33~, PR2+39*, PR2+40 | 
| A | PR2+33~, PR2+40*, PR2+41 | 
| >> ACD6DIG | FLAT+13 | 
| ACDARRAY | FLAT~, FLAT+12! | 
| ACDARRAY( | SETARRAY+6* | 
| ACDF | FLAT+12! | 
| ACDF( | PR2+41*, SETARRAY+3 | 
| ACDF(1 | FLAT+13* | 
| ACDF(106 | PR2+8!, PR2+9* | 
| ACDF(127 | FLAT+20* | 
| ACDF(133 | PR2+34! | 
| ACDF(139 | PR2+34! | 
| ACDF(14 | FLAT+16* | 
| ACDF(145 | PR2+34! | 
| ACDF(17 | FLAT+17* | 
| ACDF(175 | PR2+12!, PR2+13* | 
| ACDF(177 | PR2+16!, PR2+17* | 
| ACDF(179 | PR2+19!, PR2+20* | 
| ACDF(18 | FLAT+18* | 
| ACDF(180 | PR2+22!, PR2+23* | 
| ACDF(186 | PR2+25!, PR2+26* | 
| ACDF(188 | PR2+28!, PR2+29* | 
| ACDF(189 | PR2+31!, PR2+32* | 
| ACDF(7 | FLAT+14* | 
| ACDFREC | FLAT+8~, SETARRAY+1*, SETARRAY+4*, SETARRAY+6, SETARRAY+7 | 
| >> ACDFTEST | SETARRAY+7 | 
| >> ACDLC | PR2+36*, PR2+39 | 
| >> ACDMIEN | PR2+35*, PR2+36*, PR2+37, PR2+38 | 
| ACDN0 | FLAT+8~, FLAT+11*, FLAT+14, FLAT+15, FLAT+17, FLAT+19, PR+1~, PR2+6*, PR2+7, PR2+10 , PR2+14, PR2+18, PR2+21, PR2+24, PR2+27, PR2+30 | 
| >> ACDPDIEN | PR+2*, PR+3*, PR2+5, PR2+6, PR2+36, PR2+37, PR2+38 | 
| ACDPIEN | FLAT~, FLAT+10, FLAT+11, PR+3, PR2+5, PR2+6, PR2+36, PR2+37, PR2+38 | 
| ACDRCTR | FLAT+8~, FLAT+9*, FLATX+1, SETARRAY+5*, SETARRAY+6 | 
| U | FLAT+14, FLAT+15, FLAT+16, FLAT+17, FLAT+19, FLAT+20, PR2+7, PR2+10, PR2+11, PR2+14 , PR2+15, PR2+18, PR2+21, PR2+24, PR2+27, PR2+30, PR2+38, PR2+41 | 
| V | SETARRAY+3!* | 
| X | FLAT+8~, PR2+7*, PR2+9, PR2+10*, PR2+11*, PR2+13, PR2+14*, PR2+15*, PR2+17, PR2+18* , PR2+20, PR2+21*, PR2+23, PR2+24*, PR2+26, PR2+27*, PR2+29, PR2+30*, PR2+32, SETARRAY+3* | 
| Y | FLAT+8~, FLAT+15*, FLAT+16, FLAT+19*, FLAT+20, PR2+38*, PR2+41, SETARRAY+3* |