ALPBUTL ;OIFO-DALLAS MW,SED,KC-BCMA BCBU REPORT FUNCTIONS AND UTILITIES ;2/28/13 8:13am
Source file <ALPBUTL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
DEFPRT() | ; fetch and return default printer...
; returns default printer entry from Device file based on entry in ; DEFAULT MAR PRINTER field in BCMA BACKUP PARAMETERS file (53.71) |
|
DEFDAYS() | ; fetch and return default days for MAR printing...
; returns default number of days to print MARs based on entry in ; DEFAULT DAYS FOR MAR field in BCMA BACKUP PARAMETERS file (53.71) ; if null or undefined, returns default of 3 (days) |
|
MLRANGE(IEN) | ; find first and last Med Log entries' date/time...
; IEN = patient's record number in file 53.7 ; returns a delimited string = first Med Log date/time^last Med Log date/time |
|
PAD(STRING,SPACES) | ; pad a string...
; STRING = a string passed by reference ; SPACES = number of spaces to concatenate onto STRING ; returns STRING padded with SPACES number of blank spaces |
|
FDAYS(START,DAYS,SPACE) | ; format a sequence of DAYS beginning with START separated by SPACE...
; START = a date in FileMan internal format from which the formatted string will start ; DAYS = the number of consecutive days to return in the formatted string ; SPACE = the number of spaces between each number in the formatted string ; (if not passed, defaults to 4 spaces) ; returns a formatted string (example: 1 2 3) |
|
FMONS(START,DAYS,SPACE) | ; format a sequence of months given a START date separated by SPACE...
; START = a date in FileMan internal format the month of which will be the string starting point ; DAYS = the number of days that will be displayed ; SPACE = the number of spaces between each month (defaults to 1 space) ; returns a string equal to the month or months depending upon the number of days passed ; for example: if START=3021031 (Oct 31, 2002) and DAYS=3 then two month names will be ; returned: OCT NOV |
|
FDATES(START,DAYS,RESULTS) | ;
|
|
DIM(X) | ; number of days in a specified month...
; X = a date in internal FileMan format (can be partial: YYYMM) ; returns a number representing the number of days in month X |
|
MONN(X) | ; month name...
; X = month number (1-12) ; returns name of month specified in X |
|
FDATE(X) | ; special format for a FileMan date/time...
; X = date and time (time is optional) in FileMan format ; returns the FileMan date/time in the format MM/DD/YY@HH:MM |
|
WARDLIST(DTYPE) | ; list of wards on file...
; DTYPE = 'C' for vertical (columnar) list ; 'L' for horizontal list |
|
WARDSEL(WARD,RESULTS) | ; find a selected ward...
; WARD = a string representing a ward input by the user ; RESULTS = an array passed by reference in which possible matches are stored ; returns possible matches for the WARD in RESULTS |
|
OTYP(CODE) | ; expand order type for printing...
; CODE = a character representing an order type ; returns expanded order type from ^DD(53.79,6,0) |
|
ORDS(IEN,DATE,RESULTS,CO,INCLIM) | ; retrieve orders for a given patient... *73
; IEN = patient's record number in file 53.7 ; DATE = the date/time used to determine whether all or only current ; orders are returned: ; >passed as a date/time in FileMan internal format -- only orders ; with a stop date/time equal to or greater than DATE are returned ; >passed = "" then all orders are returned regardless of status ; returns RESULTS(order# ien) -- note: RESULTS(0)=count of active orders ; *73 add 2 new input varaibles below ; CO = Clinic name selected to match for return orders, if clinic ; report requested. ; INCLIM = Include IM orders for a CO report request. Y or N |
|
DELPT(IEN) | ; delete a patient's entire record...
; IEN = patient's record number in file 53.7 |
|
DELORD(IEN,OIEN) | ; delete an order from a patient's record...
; IEN = patient's record number in file 53.7 ; OIEN = order number's record number |
|
STATUS | ; return last update date/time and count of any errors...
|
|
CLINLIST(DTYPE) | ; list of Clinics on file...
; DTYPE = 'C' for vertical (columnar) list ; 'L' for horizontal list |
|
CLINSEL(CLIN,RESULTS) | ; find a selected Clinic...
; CLIN = a string representing a clinic input by the user ; RESULTS = an array passed by reference in which possible matches ; are stored ; returns possible matches for the CLIN in RESULTS |
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 |
|
FileNo | Call Tags |
---|---|
^ALPB(53.7 - [#53.7] | Classic Fileman Calls |