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* |