©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
ICPTCR ;ALB/ABR - MUMPS CROSS REFERENCE ROUTINE ; 3/10/97
Source file <ICPTCR.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CATEG | ; For CATEGORY x-refs (file 81.1, fields 4-BEGIN CPT RANGE, and
; 5-END CPT RANGE) ; CAT = category type; used to determine x-ref "M" or "R" ; where "M" is used only for Major categories, and ; "R" is used for all others (not major) categories. |
|
| CVAR | ; set begin range x-ref variables.
; ICPTX = end range |
|
| CKIL(DA,CAT) | ; x-ref kill on END range
|
|
| MXKIL | ; kill modifier x-ref
|
|
| CXKIL | ; kill of category x-ref
|
|
| CBSET(DA,ICPTA) | ; x-ref on begin range for categories
|
|
| MXMKIL | ; kill full file x-ref on range
|
|
| MKIL(DA,ICPTX,M) | ; x-ref kill on end range
|
|
| MBSET(DA,ICPTA,M) | ; modifier begin range x-ref
|
|
| MBKIL(DA,ICPTA,M) | ; modifier begin range x-ref kill
|
|
| MXMSET | ; set full file x-ref on range
|
|
| CBKIL(DA,ICPTA) | ; x-ref kill on begin range for categories
|
|
| MSET(DA,ICPTX,M) | ; x-ref on end range
|
|
| MODIFIER | ; Mod x-refs
; ICPTA = begin range ; ICPTX = end range ; M = If $G(M), do whole file x-ref, ; else, just x-ref within multiple |
|
| MXSET | ; set modifier x-ref
|
|
| CSET(DA,ICPTX,CAT) | ; category range x-ref on END range
|
|
| CXSET | ; set of category x-ref
|
| Name | Field # of Occurrence |
|---|---|
| $$NUM^ICPTAPIU | CSET+2, CSET+3, CKIL+2, CBSET+4, CBKIL+3, MSET+2, MSET+3, MKIL+2, MKIL+3, MBSET+2 , MBSET+3, MBKIL+2, MBKIL+3 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(81.1 - [#81.1] | CSET+2, CKIL+2, CVAR+3, CXSET+1*, CXKIL+1! |
| ^DIC(81.3 - [#81.3] | MSET+2, MKIL+2, MBSET+2, MBKIL+2, MXSET+1*, MXKIL+1!, MXMSET+1*, MXMKIL+1! |
| Name | Line Occurrences |
|---|---|
| CVAR | CBSET+3, CBKIL+2 |
| CXKIL | CKIL+4, CBKIL+4 |
| CXSET | CSET+4, CBSET+5 |
| MXKIL | MKIL+5, MBKIL+5 |
| MXMKIL | MKIL+4, MBKIL+4 |
| MXMSET | MSET+4, MBSET+4 |
| MXSET | MSET+5, MBSET+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CAT | CSET~, CKIL~, CBSET+2~, CBKIL+1~, CVAR+3*, CXSET+1, CXKIL+1 |
| DA | CSET~, CSET+2, CKIL~, CKIL+2, CBSET~, CBKIL~, CVAR+3, CXSET+1, CXKIL+1, MSET~ , MSET+2, MKIL~, MKIL+2, MBSET~, MBSET+2, MBKIL~, MBKIL+2, MXMSET+1 |
| DA(1 | MSET+2, MKIL+2, MBSET+2, MBKIL+2, MXSET+1, MXKIL+1, MXMSET+1, MXMKIL+1 |
| ICPTA | CSET+1~, CSET+2*, CKIL+1~, CKIL+2*, CKIL+3, CBSET~, CBSET+4*, CBKIL~, CBKIL+3*, CXSET+1 , CXKIL+1, MSET+1~, MSET+2*, MKIL+1~, MKIL+2*, MBSET~, MBSET+3*, MBKIL~, MBKIL+3*, MXSET+1 , MXKIL+1, MXMSET+1, MXMKIL+1 |
| ICPTSTR | CVAR+2~, CVAR+3* |
| ICPTX | CSET~, CSET+3*, CBSET+2~, CBSET+4*, CBKIL+1~, CVAR+3*, CXSET+1, MSET~, MSET+3*, MKIL~ , MKIL+3*, MBSET+1~, MBSET+2*, MBKIL+1~, MBKIL+2*, MXSET+1, MXMSET+1, MXMKIL+1 |
| M | MSET~, MSET+4, MKIL~, MKIL+4, MBSET~, MBSET+4, MBKIL~, MBKIL+4 |
| U | CSET+2, CKIL+2, CVAR+3, MSET+2, MKIL+2, MBSET+2, MBKIL+2 |