YTQRRPT ;SLC/LLH - Report Builder ; 08/13/2018
Source file <YTQRRPT.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
BLDRPT(RESULTS,ADMIN,MAXWIDTH) | ;
|
|
LOADTLT(TLT,RPT) | ; Load template for RPT into .TLT split by "|" chars
; resulting TLT array uses $C(10) to represent line breaks |
|
RMVDOTS(X) | ; Return X with the initial line feed / dots removed
|
|
WRAPTLT(TLT,MAX) | ; Wrap lines in TLT that are >WIDTH by adding $C(10)
|
|
FIXP(RSTR,RESULTS) | ;
|
|
GETDATA | ;
|
|
ADMINFO(ADATA,ADMIN) | ;
|
|
PATINFO(PDATA,DFN) | ;
|
|
SWAPIT | ;
|
|
SWAP | ;
|
|
SWAPANS | ;
|
|
FMTANS(ANS) | ; return answer string with $C(10))_" " for "|" chars
|
|
SETSCL | ;
|
|
WRAP(TX,MAX) | ; If length of TX > MAX, wrap by adding $C(10)
|
|
ADDOUT(S) | ; add string to out array (expects OUT)
|
|
VARYAUDC(TLT,ADMIN) | ; modify .TLT for AUDC based on patient sex
|
FileNo | Call Tags |
---|---|
^YTT(601.84 - [#601.84] | GET1^DIQ |