©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
IBDFDE61 ;ALB/AAS - AICS Manual Data Entry, process selection lists ; 24-FEB-96
Source file <IBDFDE61.m>
| Package | Total | Call Graph |
|---|---|---|
| Automated Information Collection System | 1 | (,ONE)^IBDFDE6 |
| VA Fileman | 1 | ^DIR |
| Package | Total | Caller Graph |
|---|---|---|
| Automated Information Collection System | 1 | IBDFDE6 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PARTLQ | ||
| ASKNUM | ||
| ASKPT(CNT) | ; -- select patient from list
|
|
| MULT(CNT,IBD) | ; -- multiple appointment
|
|
| PARTLST(NEXT,ANS) | ; -- user gave inexact match, find which one
|
|
| MULTQ | ||
| ASKN |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP( | MULT+5, ASKN+8 |
| ^TMP("IBD-PLN" | PARTLST+3, PARTLST+6, PARTLST+7 |
| Name | Line Occurrences |
|---|---|
| ASKN | ASKN+3, ASKN+5, ASKN+6, ASKPT+8, ASKPT+10, ASKPT+11 |
| ASKNUM | ASKNUM+3, ASKNUM+5, ASKNUM+6 |
| MULTQ | ASKN, ASKN+2, ASKPT+7 |
| PARTLQ | ASKNUM, ASKNUM+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ANS | PARTLST~, PARTLST+6 |
| ANS2 | PARTLST+2~, ASKNUM+1*, ASKNUM+2, ASKNUM+3, ASKNUM+4*, ASKNUM+5, ASKNUM+6, ASKNUM+8, PARTLQ, MULT+1~ , ASKN+1*, ASKN+2, ASKN+3, ASKN+4*, ASKN+5, ASKN+6, ASKN+8, MULTQ, ASKPT+6*, ASKPT+7 , ASKPT+8, ASKPT+9*, ASKPT+10, ASKPT+11, ASKPT+13 |
| >> ARRAY | MULT+5, ASKN+8 |
| CNT | MULT~, MULT+2, MULT+5, ASKN, ASKN+1, ASKN+3, ASKN+5, ASKPT~, ASKPT+6, ASKPT+8 , ASKPT+10 |
| DIR | ASKPT+2~ |
| DIR(0 | ASKPT+3* |
| DIRUT | ASKPT+2~ |
| DTIME | ASKNUM+1, ASKN+1, ASKPT+6 |
| DTOUT | ASKPT+2~ |
| DUOUT | ASKPT+2~ |
| I | PARTLST+2~, PARTLST+3*, PARTLST+4, ASKPT+2~ |
| IBD | PARTLST+2~, MULT~, MULT+2 |
| IBD( | PARTLST+3*, PARTLST+7*, PARTLST+8, ASKNUM+6, ASKNUM+8, MULT+5, ASKN+6, ASKN+8, ASKPT+11, ASKPT+13 |
| >> IBDF("CLINIC" | PARTLST+3, PARTLST+6, PARTLST+7, MULT+5, ASKN+8 |
| IBDI | MULT+1~, MULT+5* |
| >> IBQUIT | PARTLQ*, MULTQ*, ASKPT+1, ASKPT+3* |
| IOST | ASKPT+3 |
| J | PARTLST+2~, PARTLST+3*, PARTLST+4, PARTLST+7*, PARTLST+8, ASKNUM, ASKNUM+1, ASKNUM+3, ASKNUM+5 |
| K | PARTLST+2~, PARTLST+6*, PARTLST+7 |
| NEXT | PARTLST~, PARTLST+3, PARTLST+6 |
| >> NODE | MULT+5* |
| RESULT | MULT+1~, MULT+3*, ASKN+8*, MULTQ+1, ASKPT+13*, ASKPT+14 |
| SEL | PARTLST+2~, PARTLST+3*, ASKNUM+2*, ASKNUM+8*, PARTLQ+1, ASKPT+7* |
| >> Y | ASKPT+3 |