YTQRRPT ;SLC/LLH - Report Builder ; 08/13/2018
Source file <YTQRRPT.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| 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
|
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | ADMINFO+3, ADMINFO+10 |
| DEM^VADPT | PATINFO+7 |
| KVA^VADPT | PATINFO+16 |
| $$FMTE^XLFDT | ADMINFO+8 |
| $$NAMEFMT^XLFNAME | ADMINFO+9, PATINFO+6 |
| $$LOW^XLFSTR | PATINFO+9 |
| $$REPLACE^XLFSTR | GETDATA+2, FMTANS+2 |
| $$SENTENCE^XLFSTR | PATINFO+15 |
| $$TITLE^XLFSTR | ADMINFO+10 |
| ALLANS^YTQAPI2 | BLDRPT+22 |
| GETSCORE^YTQAPI8 | BLDRPT+20 |
| LEGACY^YTQAPI8 | BLDRPT+7 |
| SETERROR^YTQRUTL | BLDRPT+2, BLDRPT+12, BLDRPT+13, BLDRPT+25 |
| FileNo | Call Tags |
|---|---|
| ^YTT(601.84 - [#601.84] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | VARYAUDC+3 |
| ^TMP("YSDATA" | BLDRPT+9, BLDRPT+10 |
| ^TMP($J | BLDRPT+16!, SETSCL+2, SETSCL+3, SETSCL+4 |
| ^YTT(601.71 - [#601.71] | BLDRPT+4, BLDRPT+15, BLDRPT+26 |
| ^YTT(601.72 - [#601.72] | SWAPANS+20 |
| ^YTT(601.75 - [#601.75] | SWAPANS+20 |
| ^YTT(601.84 - [#601.84] | BLDRPT+2, BLDRPT+3, BLDRPT+15, ADMINFO+2, ADMINFO+7, ADMINFO+8, VARYAUDC+2, VARYAUDC+4 |
| ^YTT(601.93 - [#601.93] | BLDRPT+12, BLDRPT+13, BLDRPT+26, LOADTLT+4, LOADTLT+5 |
| Name | Field # of Occurrence |
|---|---|
| ^( | BLDRPT+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADATA | BLDRPT+1~, BLDRPT+17, ADMINFO~ |
| ADATA("DATE" | ADMINFO+8* |
| ADATA("DFN" | BLDRPT+18, ADMINFO+7* |
| ADATA("LOC" | ADMINFO+10* |
| ADATA("ORDERED" | ADMINFO+9* |
| ADMIN | BLDRPT~, BLDRPT+2, BLDRPT+3, BLDRPT+6, BLDRPT+14, BLDRPT+15, BLDRPT+17, BLDRPT+26, ADMINFO~, ADMINFO+2 , ADMINFO+3, ADMINFO+7, ADMINFO+8, ADMINFO+10, VARYAUDC~, VARYAUDC+2, VARYAUDC+4 |
| ANS | BLDRPT+1~, SWAPANS+1~, SWAPANS+6*, SWAPANS+8*, SWAPANS+10, SWAPANS+12, SWAPANS+14, SWAPANS+15, SWAPANS+18, SWAPANS+20 , SWAPANS+22, SWAPANS+24, SWAPANS+26, FMTANS~, FMTANS+2 |
| ANSID | SWAPANS+1~, SWAPANS+7*, SWAPANS+10, SWAPANS+12, SWAPANS+14, SWAPANS+16, SWAPANS+17, SWAPANS+18, SWAPANS+20, SWAPANS+22 , SWAPANS+24, SWAPANS+26 |
| CLIN | ADMINFO+1~, ADMINFO+3*, ADMINFO+6 |
| DATA | ADMINFO+1~, ADMINFO+2* |
| DFN | PATINFO~, PATINFO+2, PATINFO+5, VARYAUDC+1~, VARYAUDC+2*, VARYAUDC+3 |
| DOB | PATINFO+1~, PATINFO+9*, PATINFO+10 |
| DONE | VARYAUDC+1~, VARYAUDC+6*, VARYAUDC+9* |
| END | LOADTLT+2~, LOADTLT+8*, LOADTLT+9, LOADTLT+11, LOADTLT+12, FIXP+1~, FIXP+4*, FIXP+5, FIXP+7, FIXP+9 |
| ENSRC | VARYAUDC+1~, VARYAUDC+4* |
| FRAG | LOADTLT+2~, LOADTLT+3*, LOADTLT+11, LOADTLT+12*, LOADTLT+14*, LOADTLT+16, FIXP+1~, FIXP+2*, FIXP+7, FIXP+9* , FIXP+11* |
| FVC | RMVDOTS+1~*, RMVDOTS+3*, RMVDOTS+4 |
| I | BLDRPT+5~, BLDRPT+9*, BLDRPT+10*, RMVDOTS+1~*, RMVDOTS+2, RMVDOTS+3, RMVDOTS+4*, RMVDOTS+5, WRAPTLT+1~, WRAPTLT+2* , WRAP+1~, WRAP+3*, WRAP+11*, VARYAUDC+1~, VARYAUDC+6*, VARYAUDC+7, VARYAUDC+8, VARYAUDC+9 |
| INST | BLDRPT+1~, BLDRPT+3*, BLDRPT+4, BLDRPT+12, BLDRPT+13 |
| J | BLDRPT+5~, BLDRPT+10*, WRAP+1~, WRAP+6*, WRAP+7, WRAP+8 |
| LF | LOADTLT+2~, LOADTLT+3*, LOADTLT+11, LOADTLT+16, FIXP+1~, FIXP+2*, FIXP+4, WRAP+1~, WRAP+2*, WRAP+3 , WRAP+11 |
| LN | LOADTLT+2~, LOADTLT+3*, LOADTLT+10*, LOADTLT+11, LOADTLT+16*, FIXP+1~, FIXP+2*, FIXP+6*, FIXP+7, FIXP+8 |
| LP | BLDRPT+1~, LOADTLT+2~, LOADTLT+4*, LOADTLT+5, LOADTLT+6, LOADTLT+7*, FIXP+1~, FIXP+3*, FIXP+4, FIXP+7 , FIXP+11, GETDATA+1~, GETDATA+2*, SWAPIT+1~, SWAPIT+2*, SWAPANS+1~, SWAPANS+5*, SWAPANS+6, SETSCL+1~, SETSCL+3* , SETSCL+4 |
| MAX | WRAPTLT~, WRAPTLT+2, SWAPANS+1~, SWAPANS+3*, SWAPANS+30, SWAPANS+32, WRAP~, WRAP+4, WRAP+8 |
| MAXWIDTH | BLDRPT~, BLDRPT+28, SWAPANS+3 |
| MYNAME | ADMINFO+1~, ADMINFO+9, PATINFO+1~, PATINFO+6 |
| MYNAME("FIELD" | ADMINFO+5*, PATINFO+4* |
| MYNAME("FILE" | ADMINFO+4*, PATINFO+3* |
| MYNAME("IENS" | ADMINFO+6*, PATINFO+5* |
| OUT | WRAP+1~, ADDOUT+1* |
| OUT( | WRAP+11, ADDOUT+1* |
| PDATA | BLDRPT+1~, BLDRPT+18, PATINFO~ |
| PDATA("AGE" | PATINFO+11* |
| PDATA("DOB" | PATINFO+10* |
| PDATA("GENDER" | PATINFO+13*, PATINFO+15* |
| PDATA("NM" | PATINFO+6* |
| PDATA("SSN" | PATINFO+8* |
| QSTN | SWAPANS+1~, SWAPANS+4*, SWAPANS+6*, SWAPANS+7, SWAPANS+10, SWAPANS+20 |
| RESULTS | BLDRPT~, BLDRPT+30, FIXP~ |
| RESULTS( | BLDRPT+10*, FIXP+7*, FIXP+8* |
| RPT | BLDRPT+1~, BLDRPT+13*, BLDRPT+24, BLDRPT+25, BLDRPT+26, LOADTLT~, LOADTLT+4, LOADTLT+5 |
| RSTR | BLDRPT+1~, BLDRPT+24, BLDRPT+25, BLDRPT+26, BLDRPT+28, BLDRPT+30, FIXP~ |
| RSTR( | FIXP+3, FIXP+4, FIXP+7, FIXP+11, GETDATA+2* |
| S | ADDOUT~, ADDOUT+1 |
| SCL | BLDRPT+1~ |
| SEQ | SWAPANS+1~, SWAPANS+6*, SWAPANS+12 |
| START | LOADTLT+2~, LOADTLT+8*, LOADTLT+11, LOADTLT+12*, LOADTLT+14, LOADTLT+15*, FIXP+1~, FIXP+4*, FIXP+7, FIXP+9* , FIXP+11, FIXP+12* |
| STR | SWAPANS+1~, SETSCL+1~, SETSCL+4*, SETSCL+5 |
| SWAP | BLDRPT+1~, GETDATA+2 |
| SWAP( | SWAPIT+2*, SWAPANS+10*, SWAPANS+12*, SWAPANS+14*, SWAPANS+16*, SWAPANS+17*, SWAPANS+18*, SWAPANS+20*, SWAPANS+22*, SWAPANS+24* , SWAPANS+26*, SWAPANS+29, SWAPANS+30, SWAPANS+32* |
| SWAP("<*Answer_" | SWAPANS+4* |
| SWAP("<-" | SETSCL+5* |
| SWAP("<.DLL_String.>" | SWAPIT+3* |
| SWITCH | FMTANS+1~, FMTANS+2 |
| SWITCH("|" | FMTANS+1* |
| TLT | LOADTLT~, WRAPTLT~, VARYAUDC~ |
| TLT( | LOADTLT+11*, LOADTLT+16*, WRAPTLT+2*, VARYAUDC+6, VARYAUDC+7, VARYAUDC+8, VARYAUDC+9* |
| TSTNM | BLDRPT+1~, BLDRPT+15*, SWAPANS+10, SWAPANS+16 |
| TX | WRAP~, WRAP+3 |
| TXT | SWAPIT+1~, SWAPIT+2* |
| U | BLDRPT+3, BLDRPT+4, BLDRPT+15, BLDRPT+26, ADMINFO+7, ADMINFO+8, PATINFO+9, PATINFO+11, PATINFO+12, PATINFO+13 , PATINFO+15, SWAPANS+6, SWAPANS+20, SETSCL+5, VARYAUDC+2, VARYAUDC+3, VARYAUDC+4 |
| >> VA("BID" | PATINFO+8 |
| >> VADM(14 | PATINFO+12, PATINFO+13 |
| >> VADM(3 | PATINFO+9 |
| >> VADM(4 | PATINFO+11 |
| >> VADM(5 | PATINFO+15 |
| X | LOADTLT+2~, LOADTLT+5*, LOADTLT+6*, LOADTLT+7*, LOADTLT+8, LOADTLT+11, LOADTLT+14, RMVDOTS~, RMVDOTS+2, RMVDOTS+4 , RMVDOTS+5, SWAPANS+1~, SWAPANS+29*, SWAPANS+30, SWAPANS+31, SWAPANS+32, WRAP+1~, WRAP+3*, WRAP+4, WRAP+6 , WRAP+7, WRAP+8, WRAP+11*, WRAP+12 |
| X1 | VARYAUDC+1~, VARYAUDC+8*, VARYAUDC+9 |
| X2 | VARYAUDC+1~, VARYAUDC+8*, VARYAUDC+9 |
| Y | WRAP+1~, WRAP+5*, WRAP+7, WRAP+8*, WRAP+9*, WRAP+10 |
| YNEW | WRAP+1~, WRAP+7*, WRAP+8, WRAP+9 |
| YS | BLDRPT+1~, BLDRPT+7, BLDRPT+20, BLDRPT+22 |
| YS("AD" | BLDRPT+6*, BLDRPT+14* |
| YSDATA | BLDRPT+1~, BLDRPT+7, BLDRPT+20, BLDRPT+22, SWAPANS+2 |
| YSDATA( | SWAPANS+5, SWAPANS+6 |
| YSDATA(1 | SWAPANS+2 |
| Name | Field # of Occurrence |
|---|---|
| $T(SWAP+LP | SWAPIT+2 |