IBACCWLPREV ;EDE/TPF - ACC (Automated Community Care) Encounters - Action Item Previous Activity ; 12-SEP-2023
Source file <IBACCWLPREV.m>
| Package | Total | Call Graph |
|---|---|---|
| List Manager | 2 | EN^VALM ($$SETFLD,$$SETSTR,PAUSE)^VALM1 |
| VA FileMan | 2 | ($$GET1,GETS)^DIQ ^DIWP |
| Integrated Billing | 1 | PROTOCOL^IBACCWLUTIL |
| Kernel | 1 | $$SENTENCE^XLFSTR |
| 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 |
| Package | Total | Caller Graph |
|---|---|---|
| Integrated Billing | 4 | IBACC WL PREV. ACTIVITY VIEWER IBACCWLAI IBACCWLAIVIEW IBJTTC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(IBENCIFN,IBIFN) | ; -- main entry point for IBACC WL GENERIC VIEWER
|
|
| HDR | ; -- header code
|
|
| INIT(IBENCIFN,IBIFN,IBLN) | ; -- init variables and list array
|
|
| ENCOUNTERS(IBENCIFN,IBIFN,RECORDNUM) | ;EP - PULL PREV. ACTIVITY FOR EACH ENCOUNTER
|
|
| CAPTION(FILENUM,PREVACTIENS,PREVACTRET,VALMCNT,LINENUM,RECORDNUM,SET) | ;EP - CATPIONS FOR FIELD DATA
|
|
| CAPITALIZE(COLHEADER) | ;EP - CONVERT COLUMNS FROM UPPERCASE
|
|
| COMMENTS(PRECOMARRAY,VALMCNT,RECORDNUM,SET) | ;EP - PROCESS COMMENTS
|
|
| SETIBTPJIHDR(IBLN,RECORDNUM,IBENCIFN,IBIFN) | ;EP - SET TPJIJ COMMENT HEADER FOR ACC ENCOUNTER PREVIOUS ACTIVITY
|
|
| SET(X,VALMCNT,RECORDNUM,IEN,SET) | ;EP -
|
|
| HELP | ; -- help code
|
|
| EXIT | ; -- exit code
|
|
| EXPND | ; -- expand code
|
|
| WORDWRAP(LINE,INDENT) | ;EP - TAKE LONG LINE AND APPLY WORD PROCESSOR TO IT
|
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | HDR+3, SETIBTPJIHDR+7 |
| GETS^DIQ | ENCOUNTERS+32 |
| ^DIWP | WORDWRAP+6 |
| PROTOCOL^IBACCWLUTIL | HELP+2 |
| EN^VALM | EN+1 |
| $$SETFLD^VALM1 | ENCOUNTERS+20, ENCOUNTERS+22, CAPTION+10, CAPTION+19, CAPTION+26, COMMENTS+12, COMMENTS+31, SETIBTPJIHDR+11, SETIBTPJIHDR+16, SETIBTPJIHDR+21 , SETIBTPJIHDR+26 |
| $$SETSTR^VALM1 | SETIBTPJIHDR+10, SETIBTPJIHDR+15, SETIBTPJIHDR+20, SETIBTPJIHDR+25 |
| PAUSE^VALM1 | INIT+29, ENCOUNTERS+25, ENCOUNTERS+38 |
| $$SENTENCE^XLFSTR | CAPITALIZE+6 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^IBA(364.9 - [#364.9] | GET1^DIQ |
| 364.94 | GETS^DIQ |
| ^DGCR(399 - [#399] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | ENCOUNTERS+6, ENCOUNTERS+7, SETIBTPJIHDR+6 |
| ^IBA(364.9 - [#364.9] | INIT+21, ENCOUNTERS+15, ENCOUNTERS+29, ENCOUNTERS+30 |
| ^IBA(364.92 - [#364.92] | CAPTION+14 |
| ^SD(409.61 - [#409.61] | INIT+13, INIT+16 |
| ^UTILITY($J | WORDWRAP+2!, WORDWRAP+7, WORDWRAP+9, WORDWRAP+10, WORDWRAP+13! |
| Name | Line Occurrences |
|---|---|
| CAPTION | ENCOUNTERS+33 |
| COMMENTS | CAPTION+29 |
| ENCOUNTERS | INIT+23, INIT+31 |
| SET | ENCOUNTERS+23, CAPTION+21, CAPTION+27, CAPTION+32, COMMENTS+13, COMMENTS+32, SETIBTPJIHDR+12, SETIBTPJIHDR+17, SETIBTPJIHDR+22, SETIBTPJIHDR+27 |
| SETIBTPJIHDR | INIT+22 |
| WORDWRAP | COMMENTS+17 |
| Name | Field # of Occurrence |
|---|---|
| ^( | INIT+16 |
| ^(0 | INIT+16 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABORT | INIT+2~, INIT+11, INIT+14* |
| ACTDESC | CAPTION+2~, CAPTION+14*, CAPTION+17 |
| ACTIEN | CAPTION+2~, CAPTION+13*, CAPTION+14 |
| CAPOFFSET | CAPTION+2~, CAPTION+3*, CAPTION+16, CAPTION+23, COMMENTS+4~, COMMENTS+5*, COMMENTS+12, COMMENTS+31 |
| CAPTION | CAPTION+2~, CAPTION+16*, CAPTION+18, CAPTION+23*, CAPTION+25 |
| CHAR | COMMENTS+1~ |
| COLHEADER | CAPITALIZE~, CAPITALIZE+5, CAPITALIZE+7* |
| COMMENT | COMMENTS+1~, COMMENTS+9*, COMMENTS+12*, COMMENTS+13, COMMENTS+30*, COMMENTS+31*, COMMENTS+32, WORDWRAP+1~, WORDWRAP+10*, WORDWRAP+11 , WORDWRAP+12 |
| COMMENTS | COMMENTS+1~ |
| COMNUM | COMMENTS+1~, COMMENTS+7*, COMMENTS+10 |
| >> DATA | ENCOUNTERS+21*, ENCOUNTERS+22, CAPTION+17*, CAPTION+18*, CAPTION+19, CAPTION+24*, CAPTION+25*, CAPTION+26, SETIBTPJIHDR+9*, SETIBTPJIHDR+10* , SETIBTPJIHDR+11, SETIBTPJIHDR+14*, SETIBTPJIHDR+15*, SETIBTPJIHDR+16, SETIBTPJIHDR+19*, SETIBTPJIHDR+20*, SETIBTPJIHDR+21, SETIBTPJIHDR+24*, SETIBTPJIHDR+25*, SETIBTPJIHDR+26 |
| >> DFN | ENCOUNTERS+6* |
| DIR | INIT+28~, ENCOUNTERS+24~, ENCOUNTERS+37~ |
| DIRUT | ENCOUNTERS+24~, ENCOUNTERS+37~ |
| DIWF | WORDWRAP+1~, WORDWRAP+3* |
| DIWL | WORDWRAP+1~, WORDWRAP+3* |
| DIWPIEN | WORDWRAP+1~, WORDWRAP+8*, WORDWRAP+9*, WORDWRAP+10, WORDWRAP+11 |
| DIWR | WORDWRAP+1~, WORDWRAP+3* |
| DTOUT | ENCOUNTERS+24~, ENCOUNTERS+37~ |
| DUOUT | ENCOUNTERS+24~, ENCOUNTERS+37~ |
| ENCOUNTER | HDR+2~ |
| ERROR | ENCOUNTERS+34! |
| >> FIELDNAME | CAPTION+4*, CAPTION+8, CAPTION+12, CAPTION+13, CAPTION+16, CAPTION+17, CAPTION+23, CAPTION+24 |
| FILENUM | CAPTION~, CAPTION+17, CAPTION+24, COMMENTS+7, COMMENTS+15 |
| I | INIT+2~, INIT+15*, INIT+16* |
| IBBILL | ENCOUNTERS+2~, ENCOUNTERS+7*, ENCOUNTERS+10, SETIBTPJIHDR+2~, SETIBTPJIHDR+6*, SETIBTPJIHDR+15 |
| IBENC | SETIBTPJIHDR+2~, SETIBTPJIHDR+7*, SETIBTPJIHDR+20 |
| IBENCIFN | EN~, HDR+3, INIT~, INIT+6*, INIT+20*, INIT+21*, INIT+22, INIT+23, INIT+26, INIT+31 , ENCOUNTERS~, ENCOUNTERS+15, ENCOUNTERS+29, ENCOUNTERS+30, ENCOUNTERS+31, SETIBTPJIHDR~, SETIBTPJIHDR+7 |
| IBIFN | EN~, HDR+3, INIT~, INIT+7*, INIT+10, INIT+11, INIT+21, INIT+22, INIT+23, INIT+31 , ENCOUNTERS~, ENCOUNTERS+5, ENCOUNTERS+6, ENCOUNTERS+7, SETIBTPJIHDR~, SETIBTPJIHDR+6 |
| IBIFNIEN | INIT+2~ |
| IBLN | INIT~, INIT+10, INIT+11, INIT+22, ENCOUNTERS+13, ENCOUNTERS+40*, SETIBTPJIHDR~, SETIBTPJIHDR+4, SETIBTPJIHDR+28* |
| IBTPJI | INIT+2~, INIT+12*, INIT+17*, INIT+20 |
| IEN | SET~, SET+8 |
| INDENT | WORDWRAP~, WORDWRAP+4 |
| LINE | INIT+2~, INIT+4*, COMMENTS+1~, COMMENTS+15*, COMMENTS+17, COMMENTS+31, COMMENTS+33*, SETIBTPJIHDR+25, WORDWRAP~, WORDWRAP+5 |
| LINENUM | ENCOUNTERS+3~, ENCOUNTERS+33, CAPTION~ |
| LISTIEN | INIT+10~, INIT+13*, INIT+14, INIT+16 |
| NEWSTR | CAPITALIZE+2~, CAPITALIZE+4*, CAPITALIZE+6*, CAPITALIZE+7 |
| NEXTLINE | COMMENTS+1~, COMMENTS+2* |
| OFFSET | WORDWRAP+1~, WORDWRAP+4*, WORDWRAP+12 |
| OLDSTR | CAPITALIZE+2~, CAPITALIZE+5*, CAPITALIZE+6 |
| PIECE | CAPITALIZE+2~, CAPITALIZE+5* |
| PRECOMARRAY | COMMENTS~ |
| PRECOMARRAY( | COMMENTS+7, COMMENTS+15 |
| >> PREVACTIEN | ENCOUNTERS+30*, ENCOUNTERS+31 |
| PREVACTIENS | ENCOUNTERS+23, ENCOUNTERS+31*, ENCOUNTERS+32, ENCOUNTERS+33, CAPTION~, CAPTION+13, CAPTION+17, CAPTION+21, CAPTION+24, CAPTION+27 , CAPTION+32, COMMENTS+7, COMMENTS+13, COMMENTS+15, COMMENTS+32 |
| PREVACTLSTDT | ENCOUNTERS+2~, ENCOUNTERS+15*, ENCOUNTERS+17, ENCOUNTERS+28*, ENCOUNTERS+29*, ENCOUNTERS+30 |
| PREVACTRET | ENCOUNTERS+33, ENCOUNTERS+34!, CAPTION~, CAPTION+29 |
| PREVACTRET( | CAPTION+13, CAPTION+17, CAPTION+24 |
| PREVCOMIEN | COMMENTS+1~, COMMENTS+3*, COMMENTS+7*, COMMENTS+15 |
| RECORD | ENCOUNTERS+19*, ENCOUNTERS+20*, ENCOUNTERS+22*, ENCOUNTERS+23, CAPTION+2~, CAPTION+6*, CAPTION+10*, CAPTION+19*, CAPTION+21, CAPTION+26* , CAPTION+27, CAPTION+31*, CAPTION+32, SETIBTPJIHDR+9*, SETIBTPJIHDR+11*, SETIBTPJIHDR+12, SETIBTPJIHDR+14*, SETIBTPJIHDR+16*, SETIBTPJIHDR+17, SETIBTPJIHDR+19* , SETIBTPJIHDR+21*, SETIBTPJIHDR+22, SETIBTPJIHDR+24*, SETIBTPJIHDR+26*, SETIBTPJIHDR+27 |
| RECORDNUM | INIT+2~, INIT+5*, INIT+22, INIT+23, ENCOUNTERS~, ENCOUNTERS+18*, ENCOUNTERS+20, ENCOUNTERS+23, ENCOUNTERS+33, CAPTION~ , CAPTION+9*, CAPTION+10, CAPTION+21, CAPTION+27, CAPTION+29, CAPTION+32, COMMENTS~, COMMENTS+13, COMMENTS+32, SETIBTPJIHDR~ , SETIBTPJIHDR+12, SETIBTPJIHDR+17, SETIBTPJIHDR+22, SETIBTPJIHDR+27, SET~, SET+7 |
| SET | CAPTION~, CAPTION+21, CAPTION+27, CAPTION+29, CAPTION+32, COMMENTS~, COMMENTS+13, COMMENTS+32, SET~, SET+2 |
| U | INIT+10, INIT+11, INIT+16, ENCOUNTERS+6, ENCOUNTERS+7, CAPTION+14, SETIBTPJIHDR+6 |
| >> VALMAR | INIT+17, ENCOUNTERS+36, SET+6, SET+7, SET+8, EXIT+1 |
| >> VALMBCK | ENCOUNTERS+26*, ENCOUNTERS+41* |
| VALMCNT | ENCOUNTERS+12*, ENCOUNTERS+13*, ENCOUNTERS+14*, ENCOUNTERS+23, ENCOUNTERS+33, ENCOUNTERS+40, CAPTION~, CAPTION+21, CAPTION+27, CAPTION+29 , CAPTION+32, COMMENTS~, COMMENTS+13, COMMENTS+32, SETIBTPJIHDR+4*, SETIBTPJIHDR+12, SETIBTPJIHDR+17, SETIBTPJIHDR+22, SETIBTPJIHDR+27, SETIBTPJIHDR+28 , SET~, SET+5*, SET+6, SET+7, SET+8 |
| VALMDDF | INIT+10~ |
| VALMDDF( | INIT+16* |
| >> VALMHDR(1 | HDR+3* |
| WINDOW | COMMENTS+1~ |
| >> WPIEN | WORDWRAP+7*, WORDWRAP+9, WORDWRAP+10 |
| X | SET~, SET+3, SET+6, WORDWRAP+5* |
| >> XQY0 | INIT+10, INIT+11 |