LRJSML ;ALB/GTS - Lab Vista Hospital Location Utilities;02/24/2010 11:00:25
Source file <LRJSML.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| HDR | ; -- header code
|
|
| INIT | ;* init variables and list array
|
|
| CLEAR(LRFROM,LRTO,LRHLARY) | ;* clean up entries
|
|
| MSG | ; -- set default message
|
|
| REFRESH(LRFROM,LRTO,LRHLARY) | ;* refresh display
|
|
| BUILD(LRFROM,LRTO,LRHLARY) | ; -- build display array
|
|
| LISTHL(LRFROM,LRTO,LRHLARY) | ; -- place Hospital Locations in the display array
|
|
| BREAK(VALMCNT,X,NODE) | ; -- break into 79/80 char chunks for display
|
|
| CREATRPT(LRFROM,LRTO,LRHLARY) | ;Create array of HL changes between selected dates
|
|
| DATEENT(LRPRMPT,LRBD,LRED) | ;Prompt for extract date
|
|
| DISPEXT(LRHLARY) | ;Display Raw HL changes extracted
|
|
| MMHDR | ; -- header code for Mail Message display
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|