IBTREC ;BAH/MBS - Claims Tracking Comment Editor ; Nov 04, 2024@13:01
Source file <IBTREC.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 |
| Package | Total | Caller Graph |
|---|---|---|
| Integrated Billing | 6 | IBT BILLING INFO IBT CLAIMS TRACKING CMT EDITOR IBTREC ADD COMMENT IBTREC DEL COMMENT IBTREC EDIT COMMENT ^IBT(356 |
| Kernel | 1 | ^ORD(101 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(CTIEN,DFN) | ; -- main entry point for IBT CLAIMS TRACKING CMT EDITOR
|
|
| HDR | ; -- header code
|
|
| INIT | ; -- init variables and list array
|
|
| BLD | ; -- Build list of comments
|
|
| BLDONEC(VALMCNT,COMCNT) | ; -- Build one item
|
|
| WRAP(TEXT,LENGTH) | ;
|
|
| GETCMTS(CTIEN) | ; -- Get Comment details
|
|
| GETONE(CTIEN,CMTIEN,CNT) | ; -- Get one comment details
|
|
| SETL(LINE,DATA,LABEL,COL,LNG) | ; Creates a line of data to be set into the body
; of the worklist - copied from IBCNCH2 ; Input: LINE - Current line being created ; DATA - Information to be added to the end of the current line ; LABEL - Label to describe the information being added ; COL - Column position in line to add information add ; LNG - Maximum length of data information to include on the line ; Returns: Line updated with added information |
|
| HELP | ; -- help code
|
|
| EXIT | ; -- exit code
|
|
| EXPND | ; -- expand code
|
|
| ADDCOM | ; Add Comment Logic
|
|
| EDCOM | ; Edit Comment Logic
|
|
| DELCOM | ; Delete Comment Logic
|
|
| EXSCN | ; Exit Screen
|
|
| SELCOM(FULL,PROMPT,COMCNT,WLIST) | ||
| SELENTRY(PROMPT,START,END) | ||
| TRIGGER | ; Trigger to create new comment when old Additional Comment field was edited
|
| Name | Field # of Occurrence |
|---|---|
| FILE^DIE | EDCOM+16, DELCOM+19 |
| UPDATE^DIE | EN+30, ADDCOM+15, TRIGGER+6 |
| $$GET1^DIQ | EN+9, HDR+4, HDR+6, GETONE+4, GETONE+5, GETONE+7, GETONE+8, EDCOM+9, EDCOM+13, DELCOM+8 |
| ^DIR | EN+22, EN+36, ADDCOM+8, ADDCOM+12, EDCOM+9, EDCOM+13, DELCOM+10, SELENTRY+9 |
| $$PT^IBEFUNC | HDR+3 |
| PID^VADPT | HDR+1 |
| EN^VALM | EN+38 |
| FULL^VALM1 | EXIT+2, ADDCOM+2, EDCOM+3, DELCOM+3, SELCOM+13 |
| PAUSE^VALM1 | EN+6, EN+45, DELCOM+18, DELCOM+21, EXSCN+3, SELCOM+20, SELCOM+26, SELCOM+34 |
| CLEAN^VALM10 | EXIT+2 |
| SET^VALM10 | BLD+8, BLD+15, BLDONEC+6, BLDONEC+9, BLDONEC+12, BLDONEC+18 |
| $$FMTE^XLFDT | EN+25, GETONE+6 |
| DISP^XQORM1 | HELP+1 |
| 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 |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^IBT(356 - [#356] | GET1^DIQ |
| 356.04 | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | HDR+3 |
| ^IBE(356.8 - [#356.8] | EN+10, EN+31 |
| ^IBT(356 - [#356] | EN+8, EN+39, EN+41, EN+42, GETCMTS+3, GETONE+2, DELCOM+14, DELCOM+15 |
| ^TMP($J | INIT+1!, BLD+5, BLDONEC+3, GETONE+9*, EXIT+1!, SELCOM+12, SELCOM+22, SELCOM+30 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | EN+11~ |
| CMTIEN | GETCMTS+1~, GETCMTS+2*, GETCMTS+3*, GETCMTS+5, GETONE~, GETONE+2, GETONE+3, GETONE+9 |
| CNT | BLD+1~, BLD+3*, BLD+5*, BLD+6, BLD+11, GETCMTS+1~, GETCMTS+2*, GETCMTS+4*, GETCMTS+5, GETONE~ , GETONE+9 |
| COL | SETL~, SETL+8 |
| COMCNT | BLDONEC~, BLDONEC+2, BLDONEC+3, EDCOM+1~, EDCOM+4, DELCOM+1~, DELCOM+4, SELCOM~, SELCOM+14*, SELCOM+15* , SELCOM+17, SELCOM+28*, SELCOM+29, SELCOM+30 |
| COMIEN | EDCOM+1~, EDCOM+4*, EDCOM+5, EDCOM+6, DELCOM+1~, DELCOM+4*, DELCOM+5, DELCOM+6, DELCOM+15, SELCOM+10~ , SELCOM+30*, SELCOM+31, SELCOM+35 |
| COMMENT | GETONE+1~, GETONE+4*, GETONE+9 |
| CTIEN | EN~, EN+4, EN+8, EN+9, EN+26, EN+39, EN+41, EN+42, HDR+6, BLD+2 , GETCMTS~, GETCMTS+3, GETCMTS+5, GETONE~, GETONE+2, GETONE+3, ADDCOM+4, EDCOM+6, DELCOM+6, DELCOM+14 , DELCOM+15 |
| DA | ADDCOM+1~, TRIGGER+2 |
| DATA | SETL~, SETL+8 |
| DATALN | BLDONEC+1~, BLDONEC+3*, BLDONEC+4, BLDONEC+7, BLDONEC+10, BLDONEC+14 |
| DFN | EN~, EN+7, EN+8*, HDR+3, HDR+4 |
| DIR | EN+2~, EN+45!, ADDCOM+1~, EDCOM+1~, DELCOM+1~, DELCOM+11!, DELCOM+18!, SELCOM+19!, SELCOM+25!, SELCOM+33! , SELENTRY+6~, SELENTRY+9! |
| DIR("?" | EN+16*, EN+17*, EN+18*, EN+19*, EN+20*, EN+21* |
| DIR("A" | EN+15*, EN+36*, DELCOM+10*, SELENTRY+8* |
| DIR("B" | EN+36*, EDCOM+9*, EDCOM+13*, DELCOM+10* |
| DIR(0 | EN+15*, EN+36*, ADDCOM+8*, ADDCOM+12*, EDCOM+9*, EDCOM+13*, DELCOM+10*, SELENTRY+7* |
| DIROUT | SELCOM+10~, SELENTRY+6~ |
| DIRUT | ADDCOM+9, ADDCOM+13, EDCOM+10, EDCOM+14, SELCOM+10~, SELENTRY+6~ |
| DLINE | SELCOM+10~ |
| DPT | GETONE+1~, GETONE+8*, GETONE+9 |
| DT | EN+27, ADDCOM+5, TRIGGER+3 |
| DTENT | GETONE+1~, GETONE+5*, GETONE+6*, GETONE+9 |
| DTOUT | SELCOM+10~, SELENTRY+6~ |
| DUOUT | EN+23, EN+37, SELCOM+10~, SELENTRY+6~ |
| DUZ | EN+28, ADDCOM+6, EDCOM+7, TRIGGER+4 |
| END | SELCOM+10~, SELCOM+12*, SELCOM+28, SELENTRY~, SELENTRY+7 |
| FULL | SELCOM~, SELCOM+13 |
| I | EN+41*, EN+42, BLDONEC+1~, BLDONEC+16*, BLDONEC+18, DELCOM+1~, DELCOM+9*, DELCOM+14*, DELCOM+15 |
| IBERR | DELCOM+1~ |
| IBFASTXT | EN+2~, EN+38* |
| IBFDA | EN+11~, ADDCOM+1~, EDCOM+1~, DELCOM+1~, TRIGGER+1~ |
| IBFDA( | EN+27*, EN+28*, EN+29*, ADDCOM+5*, ADDCOM+6*, ADDCOM+10*, ADDCOM+14*, EDCOM+7*, EDCOM+11*, EDCOM+15* , DELCOM+19*, TRIGGER+3*, TRIGGER+4*, TRIGGER+5* |
| IBFT1 | WRAP+4~, WRAP+10*, WRAP+12 |
| IBFT2 | WRAP+4~, WRAP+11*, WRAP+12 |
| IBI | WRAP+4~, WRAP+7*, WRAP+8, WRAP+12, WRAP+14*, WRAP+15, WRAP+16 |
| IBOKAY | EN+2~, EN+3*, EN+34, EN+35*, EN+41*, EN+42*, EN+43, DELCOM+1~, DELCOM+13*, DELCOM+14 , DELCOM+15*, DELCOM+16 |
| IBREENT | EN+2~, EN+3*, EN+36, EN+38*, EN+45, EN+46 |
| IBRGENS | EN+2~, EN+3*, EN+12* |
| IBRNB | EN+2~, EN+9*, EN+10, EN+31 |
| IBROTH | EN+2~, EN+3*, EN+32*, EN+40, BLD+16, DELCOM+13 |
| IBTMP | BLDONEC+1~, WRAP+8*, WRAP+9, WRAP+10, WRAP+11, DELCOM+1~ |
| IBTMP( | BLDONEC+16, BLDONEC+18, WRAP+13*, WRAP+15, WRAP+16*, DELCOM+9 |
| >> IBUP | EN+3*, EN+10, EN+23*, EN+34, EN+37* |
| IBX | EN+11~, EN+23*, EN+24, EN+25*, EN+29 |
| IBXR | HDR+1~ |
| IBY | WRAP+4~, WRAP+15*, WRAP+16* |
| IENS | EN+11~, EN+26*, EN+27, EN+28, EN+29, GETONE+1~, GETONE+3*, GETONE+4, GETONE+5, GETONE+7 , GETONE+8, ADDCOM+1~, ADDCOM+4*, ADDCOM+5, ADDCOM+6, ADDCOM+10, ADDCOM+14, EDCOM+6*, EDCOM+7, EDCOM+9 , EDCOM+11, EDCOM+13, EDCOM+15, DELCOM+6*, DELCOM+8, DELCOM+19, TRIGGER+2*, TRIGGER+3, TRIGGER+4, TRIGGER+5 |
| LABEL | SETL~, SETL+8 |
| LENGTH | WRAP~, WRAP+9, WRAP+10, WRAP+11, WRAP+15 |
| LINE | BLD+1~, BLD+3*, BLDONEC+1~, BLDONEC+2*, BLDONEC+5*, BLDONEC+6, BLDONEC+8*, BLDONEC+9, BLDONEC+11*, BLDONEC+12 , SETL~, SETL+8*, SETL+9 |
| LINENO | WRAP+4~, WRAP+6*, WRAP+13, WRAP+15*, WRAP+16 |
| LN | BLD+1~ |
| LNG | SETL~, SETL+8 |
| PROMPT | SELCOM~, SELCOM+23, SELCOM+28, SELENTRY~, SELENTRY+8 |
| START | SELCOM+10~, SELCOM+12*, SELCOM+28, SELENTRY~, SELENTRY+7 |
| TEXT | WRAP~, WRAP+5, WRAP+7, WRAP+8, WRAP+12*, WRAP+13, WRAP+14, WRAP+15, WRAP+16 |
| U | EN+8, EN+42, GETONE+9, DELCOM+15 |
| USR | GETONE+1~, GETONE+7*, GETONE+9 |
| >> VALMBCK | ADDCOM+3*, EDCOM+2*, DELCOM+2*, EXSCN+1* |
| VALMCNT | BLD+3*, BLD+7*, BLD+8, BLD+10*, BLD+11, BLD+13, BLD+14*, BLD+15, BLDONEC~, BLDONEC+6 , BLDONEC+9, BLDONEC+12, BLDONEC+17*, BLDONEC+18 |
| >> VALMHDR(1 | HDR+5* |
| >> VALMHDR(2 | HDR+6* |
| >> VALMSG | BLD+16* |
| WLIST | SELCOM~, SELCOM+11*, SELCOM+12, SELCOM+22, SELCOM+30 |
| X | EN+2~, EN+11~, HELP+1*, ADDCOM+1~, DELCOM+1~, SELCOM+10~, SELCOM+23*, SELCOM+24, SELENTRY+6~, SELENTRY+10 , TRIGGER+5 |
| >> XQORNOD(0 | SELCOM+14 |
| XX | HDR+3*, HDR+4*, HDR+5, BLD+1~, BLD+14*, BLD+15, BLDONEC+4*, BLDONEC+5, BLDONEC+7*, BLDONEC+8 , BLDONEC+10*, BLDONEC+11, BLDONEC+14*, BLDONEC+15 |
| Y | EN+2~, EN+11~, EN+23, EN+38, ADDCOM+1~, ADDCOM+10, ADDCOM+13, ADDCOM+14, EDCOM+11, EDCOM+15 , DELCOM+1~, DELCOM+12, SELCOM+10~, SELENTRY+6~ |
| >> ZZ | HDR+4* |