IBACCWLEE ;EDE/TPF - ACC (Automated Community Care) Encounters - Action Item Expand Encounter ; 12-SEP-2023 ; 12-SEP-2023
Source file <IBACCWLEE.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 5 | BLD^IBACCWLEE1 BLD^IBACCWLEE2 BLD^IBACCWLEE3 (DIAGBLD,PROCBLD)^IBACCWLEE4 (CPT,PRIMDX,SECDX)^IBACCWLEEUTIL |
| List Manager | 3 | EN^VALM ($$SETFLD,$$SETSTR,PAUSE)^VALM1 (CLEAN,CNTRL)^VALM10 |
| VA FileMan | 2 | FIELD^DID ($$GET1,GETS)^DIQ |
| Kernel | 1 | $$TITLE^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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(IBDA,IBENCIFN,IBIFN,DETRETURN,PREVVALMAR,IBFROMVALMDDF) | ;EP
|
|
| HDR | ; -- header code
|
|
| INIT(IBDA,IBENCIFN,IBIFN) | ;EP
|
|
| DISP3649(FILE,IBENCIENS,IBIFNIENS,RECORDNUM) | ;EP - DISPLAY #364.9
|
|
| TITLE(STR) | ;EP
|
|
| SETLINE(IBENCIENS,IBIFNIENS,RECORDNUM,DATA) | ;EP
|
|
| SUBFILE(FILE,SUBFILE,FIELDINFO,RECORDNUM) | ;EP
|
|
| SECTIONHDR(SECTNAME,RECORDNUM,REVERSE,INDENT) | ;EP - INSERT SECTION HEADER
|
|
| EMPTYLINE(RETURN,VALMCNT,RECORDNUM) | ;EP
|
|
| FAILLINE(TEXT,RECORDNUM) | ;EP - DISPLAY ERROR
|
|
| SET(X,VALMCNT,RECORDNUM,ENCIEN,BILLIEN,SET,NOINDEX) | ;EP -
|
|
| ORDER3649 | ;;
|
|
| 36494 | ;;PREVIOUS ACTIVITY
|
|
| 3649401 | ;;PREVIOUS ACTIVITY COMMENTS
|
|
| 36495 | ;;REASONS NOT AUTOBILLED
|
|
| 36491 | ;;ACC X12 CLAIM FAILURES
|
|
| 36492 | ;;ACC ACTIVITY CODES
|
|
| HELP | ; -- help code
|
|
| EXIT | ; -- exit code
|
|
| EXPND | ; -- expand code
|
|
| NODATA(VALMQUIT) | ;EP - NO DATA
|
| Name | Field # of Occurrence |
|---|---|
| FIELD^DID | SUBFILE+55 |
| $$GET1^DIQ | HDR+8, HDR+9, SUBFILE+59 |
| GETS^DIQ | INIT+15 |
| BLD^IBACCWLEE1 | INIT+32 |
| BLD^IBACCWLEE2 | INIT+45 |
| BLD^IBACCWLEE3 | INIT+47 |
| DIAGBLD^IBACCWLEE4 | INIT+41 |
| PROCBLD^IBACCWLEE4 | INIT+37 |
| CPT^IBACCWLEEUTIL | DISP3649+54 |
| PRIMDX^IBACCWLEEUTIL | DISP3649+50 |
| SECDX^IBACCWLEEUTIL | DISP3649+52 |
| EN^VALM | EN+4 |
| $$SETFLD^VALM1 | DISP3649+71, DISP3649+85, SETLINE+3, SUBFILE+75, SUBFILE+92, SUBFILE+107, SUBFILE+120, SECTIONHDR+18, FAILLINE+11 |
| $$SETSTR^VALM1 | DISP3649+56, DISP3649+57, SUBFILE+65, SECTIONHDR+16, FAILLINE+9 |
| PAUSE^VALM1 | INIT+22 |
| CLEAN^VALM10 | EXIT+5 |
| CNTRL^VALM10 | SECTIONHDR+22 |
| $$TITLE^XLFSTR | TITLE+5 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^IBA(364.9 - [#364.9] | GET1^DIQ |
| Name | Line Occurrences |
|---|---|
| $$TITLE | DISP3649+43, SUBFILE+46, SUBFILE+85, SUBFILE+113, SECTIONHDR+3 |
| DISP3649 | INIT+27 |
| EMPTYLINE | INIT+29, DISP3649+66, DISP3649+73, SUBFILE+67, SUBFILE+89 |
| FAILLINE | SUBFILE+12 |
| SECTIONHDR | INIT+34, INIT+39, INIT+43, DISP3649+7, DISP3649+17, SUBFILE+10 |
| SET | DISP3649+72, DISP3649+86, SETLINE+4, SUBFILE+76, SUBFILE+93, SUBFILE+108, SUBFILE+121, SECTIONHDR+10, SECTIONHDR+20, SECTIONHDR+25 , EMPTYLINE+9, FAILLINE+7, FAILLINE+12, FAILLINE+15 |
| SETLINE | DISP3649+9 |
| SUBFILE | DISP3649+35 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| API | DISP3649+2~, DISP3649+15* |
| BILLIEN | SET~, SET+10 |
| BILLRETURN | INIT+2~ |
| CAPTION | INIT+2~, DISP3649+39*, DISP3649+40*, DISP3649+41*, DISP3649+43*, DISP3649+56, DISP3649+78*, DISP3649+79, SUBFILE+43*, SUBFILE+44* , SUBFILE+45*, SUBFILE+46*, SUBFILE+61, SUBFILE+65, SUBFILE+81*, SUBFILE+82*, SUBFILE+83*, SUBFILE+85*, SUBFILE+92, SUBFILE+112* , SUBFILE+113*, SUBFILE+114 |
| CNT | EMPTYLINE+3~, EMPTYLINE+7* |
| COL | SECTIONHDR+1~, SECTIONHDR+12*, SECTIONHDR+13*, SECTIONHDR+16, SECTIONHDR+22 |
| COLONPOS | DISP3649+2~, DISP3649+20*, DISP3649+69, DISP3649+81, SUBFILE+30*, SUBFILE+72, SUBFILE+116 |
| DATA | DISP3649+2~, DISP3649+4*, DISP3649+45, DISP3649+56*, DISP3649+57*, DISP3649+59, DISP3649+65, DISP3649+69, DISP3649+70*, DISP3649+71 , DISP3649+74*, DISP3649+76*, DISP3649+77, DISP3649+79*, DISP3649+81, DISP3649+82*, DISP3649+85, DISP3649+87*, SETLINE~, SETLINE+3 , SETLINE+5*, SUBFILE+3~, SUBFILE+35*, SUBFILE+47, SUBFILE+51*, SUBFILE+53, SUBFILE+59, SUBFILE+62, SUBFILE+63*, SUBFILE+65* , SUBFILE+72, SUBFILE+73*, SUBFILE+75, SUBFILE+77*, SUBFILE+94*, SUBFILE+99*, SUBFILE+103*, SUBFILE+107, SUBFILE+109*, SUBFILE+111* , SUBFILE+114*, SUBFILE+116, SUBFILE+117*, SUBFILE+120, SUBFILE+122*, SECTIONHDR+1~, SECTIONHDR+3*, SECTIONHDR+12, SECTIONHDR+15, SECTIONHDR+16* , SECTIONHDR+18, FAILLINE+2~, FAILLINE+3*, FAILLINE+9*, FAILLINE+11 |
| DATALENGTH | DISP3649+2~, DISP3649+48*, DISP3649+56, DISP3649+57, SUBFILE+3~, SUBFILE+49*, SUBFILE+61*, SUBFILE+65 |
| DATATYPE | DISP3649+2~, DISP3649+21*, DISP3649+46, DISP3649+47, DISP3649+48, DISP3649+56, DISP3649+57, DISP3649+58, DISP3649+76, SUBFILE+3~ |
| DETRETURN | EN~, INIT+14 |
| DETRETURN( | INIT+16!, DISP3649+46*, DISP3649+47*, DISP3649+48, DISP3649+56, DISP3649+57, DISP3649+58, DISP3649+76, SUBFILE+34, SUBFILE+48* , SUBFILE+49, SUBFILE+51, SUBFILE+57, SUBFILE+88, SUBFILE+98, SUBFILE+99, SUBFILE+111 |
| DIR | INIT+21~ |
| DISPCAP | DISP3649+2~, DISP3649+33*, DISP3649+40, SUBFILE+3~ |
| DOCAPTION | DISP3649+2~, DISP3649+25*, DISP3649+38, DISP3649+56, DISP3649+79, SUBFILE+3~ |
| DUZ(0 | DISP3649+9 |
| ENCIEN | SET~, SET+9 |
| ENCOUNTER | HDR+2~, HDR+8*, HDR+10, DISP3649+2~, DISP3649+58*, DISP3649+77* |
| ERR | SUBFILE+54~ |
| ERROR | INIT+2~, INIT+18 |
| ERROR("DIERR" | INIT+20 |
| FIELDINFO | DISP3649+2~, DISP3649+11*, DISP3649+12, DISP3649+21, DISP3649+22, DISP3649+23, DISP3649+29, DISP3649+30, DISP3649+31, DISP3649+32 , DISP3649+33, DISP3649+35, SUBFILE~, SUBFILE+8, SUBFILE+14*, SUBFILE+15, SUBFILE+16, SUBFILE+17, SUBFILE+18, SUBFILE+22 , SUBFILE+23, SUBFILE+24, SUBFILE+25, SUBFILE+26, SUBFILE+27, SUBFILE+28 |
| FIELDNAME | DISP3649+2~, DISP3649+12*, DISP3649+13, DISP3649+14, DISP3649+15, DISP3649+16, DISP3649+39, DISP3649+46, DISP3649+47, DISP3649+48 , DISP3649+50, DISP3649+52, DISP3649+54, DISP3649+56, DISP3649+57, DISP3649+58, DISP3649+61, DISP3649+76, DISP3649+77, DISP3649+78 , SUBFILE+3~, SUBFILE+15*, SUBFILE+16, SUBFILE+17, SUBFILE+18, SUBFILE+19, SUBFILE+20, SUBFILE+21, SUBFILE+22, SUBFILE+23 , SUBFILE+24, SUBFILE+25, SUBFILE+26, SUBFILE+27, SUBFILE+28, SUBFILE+38*, SUBFILE+39*, SUBFILE+41, SUBFILE+42, SUBFILE+43 , SUBFILE+44, SUBFILE+46, SUBFILE+48, SUBFILE+49, SUBFILE+51, SUBFILE+55, SUBFILE+57, SUBFILE+58, SUBFILE+59, SUBFILE+65 , SUBFILE+67, SUBFILE+79, SUBFILE+80, SUBFILE+81, SUBFILE+82, SUBFILE+88, SUBFILE+98, SUBFILE+99, SUBFILE+111, SUBFILE+112 , SUBFILE+113 |
| FIELDNAME( | SUBFILE+16*, SUBFILE+17*, SUBFILE+18*, SUBFILE+19*, SUBFILE+20*, SUBFILE+21*, SUBFILE+22*, SUBFILE+23*, SUBFILE+24*, SUBFILE+25* , SUBFILE+26*, SUBFILE+27*, SUBFILE+28*, SUBFILE+37, SUBFILE+39, SUBFILE+41, SUBFILE+42, SUBFILE+44, SUBFILE+46, SUBFILE+48 , SUBFILE+49, SUBFILE+51, SUBFILE+58, SUBFILE+59, SUBFILE+65, SUBFILE+67, SUBFILE+79, SUBFILE+80, SUBFILE+82, SUBFILE+111 , SUBFILE+113 |
| FIELDS | INIT+2~, INIT+11*, INIT+15 |
| FILE | INIT+2~, INIT+10*, INIT+15, INIT+19, DISP3649~, DISP3649+46, DISP3649+47, DISP3649+48, DISP3649+56, DISP3649+57 , DISP3649+58, DISP3649+76, SUBFILE~, SUBFILE+6, SUBFILE+12, SUBFILE+34, SUBFILE+48, SUBFILE+49, SUBFILE+51, SUBFILE+55 , SUBFILE+57, SUBFILE+88, SUBFILE+98, SUBFILE+99, SUBFILE+111 |
| FILENM | SUBFILE+3~, SUBFILE+8*, SUBFILE+10 |
| FLAGS | INIT+2~, INIT+12*, INIT+15 |
| HPOS | DISP3649+2~, DISP3649+22*, DISP3649+63, SUBFILE+4~ |
| >> IBACCWLEELEV | EN+3*, EXIT+2*, EXIT+3* |
| IBBILL | HDR+2~, HDR+9*, HDR+10 |
| IBDA | EN~, INIT~ |
| IBENCIEN | INIT+2~ |
| IBENCIENS | INIT+2~, INIT+8*, INIT+15, INIT+27, DISP3649~, DISP3649+9, DISP3649+46, DISP3649+47, DISP3649+48, DISP3649+56 , DISP3649+57, DISP3649+58, DISP3649+72, DISP3649+76, DISP3649+86, SETLINE~, SETLINE+4, SUBFILE+76, SUBFILE+93, SUBFILE+108 , SUBFILE+121, SECTIONHDR+20, FAILLINE+12 |
| IBENCIFN | EN~, HDR+8, HDR+9, INIT~, INIT+6*, INIT+8, INIT+14 |
| IBFROMVALMDDF | EN~ |
| IBFT | INIT+37~ |
| IBIFN | EN~, INIT~, INIT+9, INIT+30, INIT+32, INIT+37, INIT+41, INIT+45, INIT+47 |
| IBIFNIENS | INIT+9*, INIT+27, DISP3649~, DISP3649+9, DISP3649+72, DISP3649+86, SETLINE~, SETLINE+4, SUBFILE+76, SUBFILE+93 , SUBFILE+108, SUBFILE+121, SECTIONHDR+20, FAILLINE+12 |
| IBLN | INIT+2~, INIT+31*, INIT+32, INIT+36*, INIT+37, INIT+40*, INIT+41, INIT+44*, INIT+45, INIT+47 |
| IBPARENT | EN+2~* |
| >> IBSORTOR("N" | HDR+6 |
| INDENT | DISP3649+2~, DISP3649+16*, DISP3649+17, DISP3649+19*, SUBFILE+4~, SUBFILE+29*, SECTIONHDR~, SECTIONHDR+5*, SECTIONHDR+12, SECTIONHDR+13 |
| INDENTPAD | DISP3649+2~, DISP3649+68*, DISP3649+69*, DISP3649+70, DISP3649+80*, DISP3649+81*, DISP3649+82, SUBFILE+4~, SUBFILE+71*, SUBFILE+72* , SUBFILE+73, SUBFILE+102*, SUBFILE+103, SUBFILE+115*, SUBFILE+116*, SUBFILE+117 |
| IOM | SECTIONHDR+12, FAILLINE+9 |
| >> IORVOFF | SECTIONHDR+22 |
| >> IORVON | SECTIONHDR+22 |
| LEN | TITLE+2~, TITLE+3*, TITLE+4 |
| LENGTH | DISP3649+2~, DISP3649+29*, DISP3649+46, SUBFILE+4~ |
| LINE | DISP3649+2~, DISP3649+11*, SUBFILE+4~, SUBFILE+14*, SUBFILE+16, SUBFILE+17, SUBFILE+18, SUBFILE+19, SUBFILE+20, SUBFILE+21 , SUBFILE+22, SUBFILE+23, SUBFILE+24, SUBFILE+25, SUBFILE+26, SUBFILE+27, SUBFILE+28 |
| LINEHPOS | DISP3649+2~, DISP3649+5*, DISP3649+56, DISP3649+57, DISP3649+59*, DISP3649+63* |
| LINELENGTH | DISP3649+2~, DISP3649+45*, SUBFILE+4~, SUBFILE+47* |
| LINENUM | SUBFILE+4~, SUBFILE+36*, SUBFILE+37*, SUBFILE+39, SUBFILE+41, SUBFILE+42, SUBFILE+44, SUBFILE+46, SUBFILE+48, SUBFILE+49 , SUBFILE+51, SUBFILE+58, SUBFILE+59, SUBFILE+65, SUBFILE+67, SUBFILE+79, SUBFILE+80, SUBFILE+82, SUBFILE+111, SUBFILE+113 |
| NOINDEX | INIT+5*, SET~, SET+8 |
| OPTION | HDR+2~, HDR+5* |
| PARAM | DISP3649+2~, DISP3649+14*, DISP3649+17 |
| PIECE | DISP3649+2~, TITLE+2~, TITLE+4*, TITLE+5, SUBFILE+4~ |
| POSTRETURN | DISP3649+2~, DISP3649+24*, DISP3649+73 |
| POSTSTR | DISP3649+2~, DISP3649+32*, DISP3649+47, SUBFILE+4~ |
| PRESTR | DISP3649+2~, DISP3649+31*, DISP3649+47, SUBFILE+4~ |
| PREVVALMAR | EN~ |
| PTR | SUBFILE+54~, SUBFILE+57*, SUBFILE+59 |
| PTRDATA | SUBFILE+2~, SUBFILE+59*, SUBFILE+61, SUBFILE+62*, SUBFILE+65 |
| PTRERR | SUBFILE+2~ |
| PTRFILE | SUBFILE+54~, SUBFILE+58*, SUBFILE+59 |
| RECORD | INIT+2~, DISP3649+66, DISP3649+71*, DISP3649+72, DISP3649+83*, DISP3649+85*, DISP3649+86, SETLINE+1*, SETLINE+3*, SETLINE+4 , SUBFILE+75*, SUBFILE+76, SUBFILE+90*, SUBFILE+92*, SUBFILE+93, SUBFILE+105*, SUBFILE+107*, SUBFILE+108, SUBFILE+118*, SUBFILE+120* , SUBFILE+121, SECTIONHDR+7*, SECTIONHDR+18*, SECTIONHDR+20, FAILLINE+4*, FAILLINE+11*, FAILLINE+12 |
| RECORDNUM | INIT+25*, INIT+27, INIT+29, INIT+31, INIT+34, INIT+39, INIT+43, DISP3649~, DISP3649+7, DISP3649+9 , DISP3649+17, DISP3649+35, DISP3649+66, DISP3649+67*, DISP3649+72, DISP3649+73, DISP3649+84*, DISP3649+86, SETLINE~, SETLINE+2* , SETLINE+4, SUBFILE~, SUBFILE+10, SUBFILE+12, SUBFILE+67, SUBFILE+69*, SUBFILE+76, SUBFILE+89, SUBFILE+91*, SUBFILE+93 , SUBFILE+106*, SUBFILE+108, SUBFILE+119*, SUBFILE+121, SECTIONHDR~, SECTIONHDR+9*, SECTIONHDR+10, SECTIONHDR+17*, SECTIONHDR+20, SECTIONHDR+24* , SECTIONHDR+25, EMPTYLINE~, EMPTYLINE+8*, EMPTYLINE+9, FAILLINE~, FAILLINE+6*, FAILLINE+7, FAILLINE+10*, FAILLINE+12, FAILLINE+14* , FAILLINE+15, SET~, SET+8 |
| RET | SUBFILE+54~, SUBFILE+56 |
| RETURN | DISP3649+2~, DISP3649+23*, DISP3649+24, DISP3649+25, DISP3649+26, DISP3649+27*, DISP3649+28*, DISP3649+37, DISP3649+66, SUBFILE+4~ , EMPTYLINE~, EMPTYLINE+2, EMPTYLINE+4 |
| RETURNS | EMPTYLINE+3~, EMPTYLINE+4*, EMPTYLINE+5, EMPTYLINE+7 |
| REVERSE | SECTIONHDR~ |
| SECTNAME | SECTIONHDR~, SECTIONHDR+3 |
| SET | SET~, SET+2 |
| SORTORDER | HDR+2~, HDR+6* |
| STR | TITLE~, TITLE+3, TITLE+5*, TITLE+7 |
| SUBFILE | DISP3649+2~, DISP3649+30*, DISP3649+35, SUBFILE~ |
| SUBFILENM | SUBFILE+2~ |
| SUBIENS | SUBFILE+2~, SUBFILE+33*, SUBFILE+34*, SUBFILE+48, SUBFILE+49, SUBFILE+51, SUBFILE+57, SUBFILE+88, SUBFILE+98, SUBFILE+99 , SUBFILE+111 |
| SUBORDER | SUBFILE+2~, SUBFILE+6* |
| SUBRECORD | SUBFILE+2~, SUBFILE+34*, SUBFILE+67 |
| TEXT | FAILLINE~, FAILLINE+3 |
| TITLE | DISP3649+2~, DISP3649+26*, DISP3649+43, SUBFILE+85 |
| U | HDR+5, INIT+4, SUBFILE+24, SUBFILE+25, SECTIONHDR+22 |
| UNSCORELINE | HDR+2~, HDR+4* |
| >> USERGROUP | EN+4 |
| >> VALMAR | INIT+3, SET+7, SET+8, SET+9, SET+10, NODATA+2 |
| VALMCNT | INIT+24*, INIT+29, INIT+32, INIT+37, INIT+41, INIT+45, INIT+47, DISP3649+66, DISP3649+72, DISP3649+73 , DISP3649+86, SETLINE+4, SUBFILE+67, SUBFILE+76, SUBFILE+89, SUBFILE+93, SUBFILE+108, SUBFILE+121, SECTIONHDR+10, SECTIONHDR+20 , SECTIONHDR+22, SECTIONHDR+25, EMPTYLINE~, EMPTYLINE+9, FAILLINE+7, FAILLINE+12, FAILLINE+15, SET~, SET+5*, SET+7 , SET+8 |
| VALMQUIT | EXIT+2*, NODATA~, NODATA+2* |
| >> VALMSG | HDR+10* |
| WIDTH | SECTIONHDR+1~, SECTIONHDR+15*, SECTIONHDR+16, SECTIONHDR+22 |
| WPIEN | SUBFILE+2~, SUBFILE+97*, SUBFILE+98*, SUBFILE+99 |
| X | SET~, SET+3, SET+7 |
| >> XQY0 | HDR+5, INIT+4, SECTIONHDR+22 |
| Name | Field # of Occurrence |
|---|---|
| $T(@SUBORDER | SUBFILE+12 |
| $T(@SUBORDER+LINE | SUBFILE+14 |
| $T(ORDER3649+LINE | DISP3649+11 |