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 |
|