©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
PSOQTIU4 ;VAPA/ELZ - tiu utility routine ; 30 Nov 2007 8:01 AM
Source file <PSOQTIU4.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NEXTAPPT(DFN) | ; -- entry point for next scheduled appointment
|
|
| ADDRESS(DFN,TARGET) | ; -- entry point for pt's home address
|
|
| PHONE(DFN) | ; -- entry point for pt's home phone number
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^UTILITY("VASD" | NEXTAPPT+3, NEXTAPPT+4! |
| Name | Field # of Occurrence |
|---|---|
| ^("E" | NEXTAPPT+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | ADDRESS+1~, ADDRESS+4*, ADDRESS+5, ADDRESS+7 |
| DFN | PHONE~, ADDRESS~, NEXTAPPT~ |
| DT | ADDRESS+12 |
| INFO | NEXTAPPT+1~, NEXTAPPT+3*, NEXTAPPT+5 |
| LINE | ADDRESS+1~, ADDRESS+2*, ADDRESS+6*, ADDRESS+7, ADDRESS+9*, ADDRESS+10*, ADDRESS+11*, ADDRESS+12 |
| TARGET | ADDRESS~, ADDRESS+2, ADDRESS+7, ADDRESS+9, ADDRESS+10, ADDRESS+11, ADDRESS+12, ADDRESS+13 |
| U | ADDRESS+9, ADDRESS+10, ADDRESS+11, NEXTAPPT+3 |
| VAPA | PHONE+1~, ADDRESS+1~ |
| VAPA( | ADDRESS+5, ADDRESS+7 |
| VAPA(10 | ADDRESS+11 |
| VAPA(4 | ADDRESS+9 |
| VAPA(5 | ADDRESS+9 |
| VAPA(6 | ADDRESS+9 |
| VAPA(8 | PHONE+3 |
| VAPA(9 | ADDRESS+10 |