RAIPS160 ;HISC/GJC-postinit 160 ; Aug 18, 2020@09:28:10
Source file <RAIPS160.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN1 | ;Fix the ^RADPT(,"DT",0) if necessary for every
|
|
| TSK1 | ;Rebuild the REGISTERED EXAM sub-file zero node.
|
|
| EN2 | ;reindex the "AR" & "B" xrefs on the EXAM DATE (#70.02) .01 field.
|
|
| TSK2 | ;reindex the "AR" & "B" cross reference on the EXAM DATE (#70.02)
|
|
| EN3 | ;mass override to complete from the beginning
|
|
| TSK3 | ;mass override to complete from the beginning
|
|
| ACTIVE(Y) | ; is the study canceled or complete?
; input Y: ptr to file 72 ; return: 0 if canceled or complete; else 1 |
|
| RA7005(RAY) | ; (#75) EXAM STATUS TIMES
|
|
| RA7007(RAY) | ; (#100) ACTIVITY LOG
|
|
| RA751 | ;update the radiology and CPRS orders to 'complete'
|
|
| QDT(DAY,HOUR) | ;date/time to queue a task for 160
; DAY - the # of day(s) to queue the task in the future |
|
| XIT | ;kill vars, task... then quit
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | EN1+6, EN2+5, EN3+6 |
| $$S^%ZTLOAD | TSK3+25 |
| FILE^DIE | TSK3+31 |
| UPDATE^DIE | RA7005+8, RA7007+10 |
| ENALL^DIK | TSK2+9 |
| ^RAORDU | RA751+19 |
| $$FMADD^XLFDT | QDT+5, QDT+6 |
| $$FMTH^XLFDT | QDT+7 |
| $$NOW^XLFDT | EN1+5, RA7005+5, RA7007+5, QDT+5 |
| $$NEWCP^XPDUTL | RAIPS160+17, RAIPS160+18, RAIPS160+19 |
| BMES^XPDUTL | EN1+7, EN2+6, EN3+7 |
| DUZ^XUP | TSK3+7, TSK3+43 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^RA(72 - [#72] | TSK3+18, ACTIVE+3 |
| ^RA(79.2 - [#79.2] | TSK3+16 |
| ^RADPT - [#70] | TSK1+5, TSK1+6, TSK1+10, TSK1+11*, TSK2+5, TSK2+8!, TSK3+14, TSK3+21, TSK3+22, TSK3+29 , TSK3+34 |
| ^RADPT("AR" | TSK2+3!, TSK3+3 |
| ^RAO(75.1 - [#75.1] | RA751+9, RA751+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | TSK2+2~, TSK2+9! |
| DA(1 | TSK2+7*, TSK2+8 |
| DAY | QDT~, QDT+5 |
| DIC | TSK2+2~, TSK2+9! |
| DIK | TSK2+2~, TSK2+6*, TSK2+9! |
| DIK(1 | TSK2+7* |
| DUZ | TSK3+7 |
| HOUR | QDT~, QDT+5 |
| RAARX | TSK3+3*, TSK3+9, TSK3+11, TSK3+13, XIT+2! |
| RAC | XIT+2! |
| RACHX1 | RAIPS160+17~* |
| RACHX2 | RAIPS160+18~* |
| RACHX3 | RAIPS160+19~* |
| RACMP | TSK3+18*, TSK3+20, TSK3+28, RA7005+6, XIT+2! |
| RACNI | TSK3+20*, TSK3+21*, TSK3+22, TSK3+27, TSK3+29, TSK3+34, XIT+2! |
| RADD | TSK1+4~*, TSK1+11 |
| RADFN | TSK1+4~*, TSK1+5*, TSK1+6, TSK1+10, TSK1+11, TSK2+2~, TSK2+4*, TSK2+5*, TSK2+6, TSK2+7 , TSK3+10*, TSK3+11*, TSK3+13, TSK3+14, TSK3+21, TSK3+22, TSK3+27, TSK3+29, TSK3+34, RA751+16 , XIT+2! |
| RADIV | XIT+2! |
| RADTE | TSK3+3*, TSK3+9*, TSK3+11, TSK3+13, XIT+2! |
| RADTI | TSK1+4~, TSK1+10*, TSK1+11, TSK3+12*, TSK3+13*, TSK3+14, TSK3+21, TSK3+22, TSK3+27, TSK3+29 , TSK3+34, XIT+2! |
| RADUZ160 | TSK3+7~*, TSK3+43 |
| RAEND | TSK3+3*, TSK3+9, XIT+2! |
| RAFDA | RA7005+2~, RA7007+2~, XIT+2! |
| RAFDA( | TSK3+28*, RA7005+3, RA7007+3 |
| RAIENS | TSK3+27*, TSK3+28, TSK3+32, TSK3+33, XIT+2! |
| RAITYP | TSK3+15*, TSK3+16, XIT+3! |
| RAITYPE | TSK3+16*, TSK3+17, TSK3+18, XIT+3! |
| RAOIFN | RA751+7~*, RA751+9, RA751+12 |
| RAOIFN(0 | RA751+12*, RA751+16 |
| RAOSTS | RA751+17~, RA751+18* |
| RAQDT | QDT+4~, QDT+5*, QDT+6*, QDT+7 |
| RAR | RA7005+2~, RA7005+3*, RA7005+5, RA7005+6, RA7005+7, RA7007+2~, RA7007+3*, RA7007+5, RA7007+6, RA7007+7 , RA7007+8, RA7007+9, XIT+3! |
| RASAVDR | TSK3+4*, XIT+3! |
| RASTOP | TSK3+3*, TSK3+9, TSK3+11, TSK3+13, TSK3+21, TSK3+25*, XIT+3! |
| RATXT | EN1+2~, EN1+7, EN2+1~, EN2+6, EN3+2~, EN3+7 |
| RATXT(1 | EN1+3*, EN2+2*, EN3+3* |
| RATXT(2 | EN1+4*, EN2+3*, EN3+4* |
| RATXT(3 | EN1+6*, EN2+5*, EN3+6* |
| RAX | ACTIVE+3~*, ACTIVE+4, XIT+3! |
| RAY | RA7005~, RA7005+3, RA7007~, RA7007+3, XIT+3! |
| RAY2 | TSK3+14*, TSK3+15, XIT+3! |
| RAY3 | TSK3+22*, TSK3+23, RA751+7, XIT+3! |
| U | TSK1+11, TSK3+15, TSK3+16, TSK3+23, ACTIVE+4, RA751+7, RA751+16 |
| X | TSK2+2~, TSK2+9!, ACTIVE+3~, ACTIVE+4*, ACTIVE+7, XIT+3! |
| Y | ACTIVE~, ACTIVE+3, XIT+3! |
| ZTDESC | EN1+2~, EN1+4*, EN2+1~, EN2+3*, EN3+2~, EN3+4* |
| ZTDTH | EN1+2~, EN1+5*, EN2+1~, EN2+4*, EN3+2~, EN3+5* |
| ZTIO | EN1+2~, EN1+3*, EN2+1~, EN2+2*, EN3+2~, EN3+3* |
| >> ZTQUEUED | XIT+1 |
| >> ZTREQ | XIT+1* |
| ZTRTN | EN1+2~, EN1+3*, EN2+1~, EN2+2*, EN3+2~, EN3+3* |
| >> ZTSK | EN1+6, EN2+5, EN3+6 |
| >> ZTSTOP | TSK3+25* |
