©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
IBDFQSL2 ;ALB/CJM/AAS/MAF - ENCOUNTER FORM - Quick selection edit (cont.);12-Jun-95
Source file <IBDFQSL2.m>
| Package | Total | Call Graph |
|---|---|---|
| Automated Information Collection System | 1 | (F2,SUBCOL)^IBDF18A1 |
| Package | Total | Caller Graph |
|---|---|---|
| Automated Information Collection System | 2 | IBDFGRP IBDFQSL1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETLST(FORM,BLOCK,LIST,INTRFACE,ARY,FILTER,COUNT) | ; -- returns any specified selection list for a clinic
; -- input FORM = ien of entry in 357 ; BLOCK = ien of entry in 357.1 ; LIST = ien of entry in 357.2 ; INTRFACE = name of selection list in package interface file ; ARY = name of array to return list in ; FILTER = predefined filters (optional, default = 1) ; 1 = must be selection list ; 2 = only visit cpts on list |
|
| COPYLIST(LIST,ARY,COUNT) | ;copies the entries from LIST to @ARY, starting subscript at COUNT+1
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IBE(357.3 - [#357.3] | COPYLIST+13, COPYLIST+15, COPYLIST+16, COPYLIST+18, COPYLIST+25 |
| ^IBE(357.4 - [#357.4] | COPYLIST+7, COPYLIST+9, COPYLIST+10 |
| Name | Line Occurrences |
|---|---|
| COPYLIST | GETLST+24 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARY | GETLST~, GETLST+22*, GETLST+23, GETLST+24, GETLST+25, COPYLIST~, COPYLIST+11, COPYLIST+23, COPYLIST+28 |
| BLOCK | GETLST~, GETLST+18 |
| COUNT | GETLST~, GETLST+20*, GETLST+24, GETLST+25, COPYLIST~, COPYLIST+11*, COPYLIST+22*, COPYLIST+23, COPYLIST+28* |
| FILTER | GETLST~, GETLST+21*, GETLST+22, GETLST+26 |
| FORM | GETLST~, GETLST+18 |
| GROUP | COPYLIST+2~, COPYLIST+8*, COPYLIST+9*, COPYLIST+10, COPYLIST+11, COPYLIST+13, COPYLIST+15, COPYLIST+23, COPYLIST+28 |
| GRPORDR | COPYLIST+2~, COPYLIST+6*, COPYLIST+7*, COPYLIST+9, COPYLIST+11 |
| HDR | COPYLIST+2~, COPYLIST+10*, COPYLIST+11 |
| IBDTMP | GETLST+19~ |
| IEN | COPYLIST+2~, COPYLIST+17*, COPYLIST+28 |
| INTRFACE | GETLST~, GETLST+18 |
| LIST | GETLST~, GETLST+18, GETLST+24, COPYLIST~, COPYLIST+4, COPYLIST+7, COPYLIST+9, COPYLIST+13, COPYLIST+15, COPYLIST+23 , COPYLIST+28 |
| NODE | COPYLIST+2~, COPYLIST+16*, COPYLIST+17, COPYLIST+21, COPYLIST+25*, COPYLIST+26 |
| OLDARY | GETLST+19~, GETLST+22*, GETLST+26 |
| ORDER | COPYLIST+2~, COPYLIST+12*, COPYLIST+13*, COPYLIST+15, COPYLIST+23, COPYLIST+28 |
| SLCTN | COPYLIST+2~, COPYLIST+14*, COPYLIST+15*, COPYLIST+16, COPYLIST+18, COPYLIST+23, COPYLIST+25, COPYLIST+28 |
| SUBCOL | COPYLIST+2~, COPYLIST+18*, COPYLIST+20, COPYLIST+25 |
| TEXT | COPYLIST+2~, COPYLIST+21*, COPYLIST+23, COPYLIST+26*, COPYLIST+28 |
| TSUBCOL | COPYLIST+2~, COPYLIST+4, COPYLIST+18, COPYLIST+26 |