TIUCNFIX ; SLC/MAM - Resolve Upload Filing Errors for Consults ;05/06/02
Source file <TIUCNFIX.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETCNSLT(SUCCESS,TIUTYPE,TIUFLDS,CHANGEPT,TIUCNNBR) | ; Get consult
|
|
| PAT | ||
| CNFIX | ; Consults Filing Error Resolution Code
; Requires: TIUEVNT - 8925.4 Upload Log Event IEN ; Requires: TIUTYPE - IEN of Docmt Def whose Filing Error ; Resolution Code is being invoked. ; Taken from alert or filing error. |
|
| CNFIXX | ||
| GETCHECK(SUCCESS,TIUTYPE,TIUFLDS,DFN,TITLDA,TIU) | ; Get and check data
; Get from user: Patient, Visit, Document Title, Consult |
| Name | Field # of Occurrence |
|---|---|
| ^DIE | CNFIXX+7 |
| $$CHEKPN^TIUCHLP | PAT+6 |
| $$CLASS^TIUCNSLT | CNFIX+31 |
| $$GETCNSLT^TIUCNSLT | GETCNSLT+5 |
| $$ASKCHNG^TIUFIX | GETCNSLT+14, GETCNSLT+18 |
| GETTITLE^TIUFIX | CNFIX+33, PAT+12 |
| MAKE^TIUFIX1 | CNFIX+38 |
| $$BUFFER^TIUFIX2 | CNFIX+11 |
| LOADHDR^TIUFIX2 | CNFIX+14 |
| $$PATIENT^TIULA | PAT |
| SETPARM^TIULE | CNFIX+12 |
| $$TRNSFRM^TIUPEFIX | PAT+25 |
| $$READ^TIUU | GETCNSLT+10 |
| ENPN^TIUVSIT | PAT+4 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TIU(8925.1 - [#8925.1] | CNFIX+9 |
| ^TIU(8925.4 - [#8925.4] | CNFIX+10 |
| Name | Line Occurrences |
|---|---|
| CNFIXX | CNFIX+9, CNFIX+10, CNFIX+11, CNFIX+21, CNFIX+25 |
| GETCHECK | CNFIX+18 |
| GETCNSLT | PAT+18 |
| PAT | PAT+19 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ASK | CNFIX+31*, CNFIX+33, PAT+1~, PAT+11*, PAT+12 |
| BADTYPES | CNFIX+31*, CNFIX+33, PAT+1~, PAT+11*, PAT+12 |
| CHANGEPT | PAT+1~, PAT+18, PAT+19, GETCNSLT~, GETCNSLT+11* |
| CLINPROC | GETCNSLT+2~, GETCNSLT+4*, GETCNSLT+5 |
| DA | CNFIXX+4~, CNFIXX+6* |
| DFN | CNFIX+7~, CNFIX+18, CNFIX+38, GETCHECK~, PAT*, PAT+3, PAT+4, GETCNSLT+5 |
| DIE | CNFIXX+4~, CNFIXX+6* |
| >> DIRUT | GETCNSLT+12 |
| DOCNUM | GETCNSLT+2~, GETCNSLT+4*, GETCNSLT+5 |
| DR | CNFIXX+4~, CNFIXX+6* |
| OLDTYPE | CNFIX+7~, CNFIX+17*, CNFIX+21, CNFIX+25, CNFIXX+3 |
| SUCCESS | CNFIX+7~, CNFIX+8*, CNFIX+9*, CNFIX+10*, CNFIX+11*, CNFIX+18, CNFIX+21, CNFIX+25, CNFIX+33, CNFIX+38 , CNFIXX, CNFIXX+10, GETCHECK~, PAT+2*, PAT+12, PAT+18, PAT+26*, GETCNSLT~, GETCNSLT+3* |
| TITLDA | CNFIX+7~, CNFIX+18, CNFIX+33, CNFIX+38, GETCHECK~, PAT+12, PAT+15 |
| TIU | CNFIX+7~, CNFIX+18, CNFIX+38, GETCHECK~, PAT+4, PAT+5, PAT+6! |
| TIUBUF | CNFIX+7~, CNFIX+11*, CNFIX+14, CNFIX+38 |
| TIUCNNBR | PAT+1~, PAT+18, PAT+20, PAT+24*, PAT+25, GETCNSLT~, GETCNSLT+5*, GETCNSLT+7, GETCNSLT+16 |
| >> TIUDONE | CNFIXX*, CNFIXX+3, CNFIXX+8 |
| >> TIUEVNT | CNFIX+10, CNFIX+11, CNFIX+38, CNFIXX+6 |
| TIUFLDS | CNFIX+7~, CNFIX+14, CNFIX+18, CNFIX+33, CNFIX+38, GETCHECK~, PAT+12, PAT+18, GETCNSLT~ |
| TIUFLDS(1405 | CNFIX+26!, PAT+25* |
| TIUOVR | GETCNSLT+2~, GETCNSLT+4*, GETCNSLT+5 |
| >> TIUPRM0 | CNFIX+12, CNFIX+14, CNFIX+38 |
| TIUTYPE | CNFIX+9, CNFIX+14, CNFIX+17, CNFIX+18, CNFIX+21, CNFIX+25, CNFIX+33, CNFIX+38, CNFIXX+3, GETCHECK~ , PAT+12, PAT+16, PAT+18, PAT+25, GETCNSLT~, GETCNSLT+14, GETCNSLT+18 |
| TYPE | CNFIXX+4~, CNFIXX+5*, CNFIXX+6 |
| U | CNFIXX+10 |
| Y | GETCNSLT+2~, GETCNSLT+10*, GETCNSLT+11, GETCNSLT+14*, GETCNSLT+18* |