IBCU7C ;EDE/WCJ - LINE LEVEL MODIFIER SELECTION ;10-NOV-2022
Source file <IBCU7C.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| AWAY | ||
| EN(IBPROCP) | ;
|
|
| AGAIN | ||
| GETXIST(IBPROCP,MODARR,DA) | ; check to see if this code has already been entered as a modifier for this procedure.
; IN ; IBPROCP - conatins subfile IEN of which procedure we are working with ; OUT ; MODARR - an array with modifier information for this procedure |
|
| TEST | ; amusing myself with alternate methods
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| 399.30416 | FIND^DIC, LIST^DIC |
| ^DIC(81.3 - [#81.3] | GET1^DIQ |
