ALPBFRMU ;OIFO-DALLAS MW,SED,KC-PRINT FORMATTING UTILITIES;03/06/16 3:06pm
Source file <ALPBFRMU.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
FTEXT(COL,TEXT,RESULTS) | ; format TEXT array...
; COL = number of columns (line length) ; TEXT = array to be reformatted. the array should be in ; standard FM format: TEXT(1,0)=text ; TEXT(2,0)=text ; TEXT(n,0)=text ; RESULT = array passed by reference into which reformatted text ; will be returned: RESULTS(1,0)=formatted text to COL length ; RESULTS(2,0)=formatted text to COL length |
|
HDR(DATA,PG,RESULTS) | ; print page header...
; DATA = an array passed by reference containing the nodes in ; a patient's record in ^ALPB(53.7,...) ; PG = page number to use ; RESULTS = an array passed by reference that will be used to return ; the formated data ; returns data in formated 132-column output |
|
FOOT | ; print page footer (note: output is 5 lines)...
; code adapted from original routine ^ALPFOOT by FD@NJHCS, May 2002 |
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 |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|