ALPBFRM2 ;OIFO-DALLAS MW,SED,KC-SCREEN DISPLAY FORMATTING UTIL ;01/01/03
Source file <ALPBFRM2.m>
Package | Total | Caller Graph |
---|---|---|
Barcode Medication Administration | 3 | ALPBSP1 ALPBSP2 ALPBSWRD |
Name | Comments | DBIA/ICR reference |
---|---|---|
HDR(DATA,TYPE,PG,RESULTS) | ; screen display header...
; DATA = array passed by reference containing the data record to be formatted ; TYPE = either 'A' for ALL orders or 'C' for CURRENT orders. if null, not used in construction ; of first line of returned array ; PG = page number ; RESULTS = an array passed by reference into which the formatted output will be saved ; returns RESULTS array with formatted output (note: total lines returned in RESULTS(0)) |
|
F80(DATA,MLDATE,RESULTS) | ; format basic output for screen (80-column) display...
; DATA = array passed by reference containing the data record to be formatted ; MLDATE = a date from which med log data is retrieved ; returns RESULTS array with formatted output (note: total lines returned in RESULTS(0)) |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ALPBCMNT | F80+4~, F80+72*, F80+73, F80+74! |
ALPBMDT | F80+4~, F80+91*, F80+92*, F80+94, F80+96, F80+100! |
ALPBTEXT | F80+4~, F80+73, F80+79! |
ALPBTEXT( | F80+76, F80+78 |
ALPBX | F80+4~, F80+18*, F80+19*, F80+20, F80+21, F80+25!, F80+31*, F80+32*, F80+33, F80+35 , F80+36, F80+40!, F80+46*, F80+47*, F80+48, F80+50, F80+51, F80+55!, F80+75*, F80+76* , F80+78, F80+79!, F80+93*, F80+94*, F80+97, F80+98, F80+99!, HDR+7~, HDR+22*, HDR+23* , HDR+24, HDR+25 |
DATA | F80~, HDR~ |
DATA(0 | F80+6, F80+12, HDR+13, HDR+14, HDR+15, HDR+16, HDR+17 |
DATA(1 | F80+8, F80+11, HDR+19, HDR+23, HDR+24, HDR+25 |
DATA(10 | F80+81, F80+88, F80+92, F80+94, F80+97, F80+98 |
DATA(2 | F80+62, F80+63, F80+64, F80+66 |
DATA(3 | F80+9 |
DATA(4 | F80+59, F80+69 |
DATA(5 | F80+71, F80+72 |
DATA(7 | F80+15, F80+19, F80+20, F80+21 |
DATA(8 | F80+28, F80+32, F80+33, F80+35, F80+36 |
DATA(9 | F80+43, F80+47, F80+48, F80+50, F80+51 |
LINE | F80+4~, F80+13*, F80+16*, F80+17, F80+20, F80+22*, F80+23, F80+24, F80+29*, F80+30 , F80+33, F80+35, F80+37*, F80+38, F80+39, F80+44*, F80+45, F80+48, F80+50, F80+52* , F80+53, F80+54, F80+58*, F80+59, F80+61*, F80+62, F80+63, F80+65*, F80+66, F80+68* , F80+69, F80+77*, F80+78, F80+82*, F80+83, F80+84*, F80+85, F80+86, F80+87, F80+89* , F80+90, F80+95*, F80+96, F80+97, F80+98, F80+101*, F80+102, F80+103, HDR+7~, HDR+18* , HDR+20*, HDR+21, HDR+24, HDR+25, HDR+26*, HDR+27, HDR+28 |
MLDATE | F80~, F80+83, F80+88, F80+91 |
PG | HDR~, HDR+9*, HDR+12 |
RESULTS | F80~, HDR~ |
RESULTS( | F80+17*, F80+20*, F80+23*, F80+24*, F80+30*, F80+33*, F80+35*, F80+38*, F80+39*, F80+45* , F80+48*, F80+50*, F80+53*, F80+54*, F80+59*, F80+62*, F80+63*, F80+66*, F80+69*, F80+78* , F80+83*, F80+85*, F80+86*, F80+87*, F80+90*, F80+96*, F80+97*, F80+98*, F80+102*, HDR+21* , HDR+24*, HDR+25*, HDR+27* |
RESULTS(0 | F80+5*, F80+103*, HDR+10*, HDR+28* |
RESULTS(1 | F80+6*, F80+7*, F80+8*, HDR+11*, HDR+12* |
RESULTS(2 | F80+9*, F80+10*, F80+11*, HDR+13*, HDR+14*, HDR+15* |
RESULTS(3 | F80+12*, HDR+16*, HDR+17* |
TYPE | HDR~, HDR+8*, HDR+11 |