IBY221P ;ALB/ARH/MAF - OCCURRENCE CODES: FILE IN 399.1 - POST INIT ; 5/1/97
Source file <IBY221P.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| OC | ; Add Occurrence Codes to 399.1 (#.11 - p4)
|
|
| BSQ | ||
| MCCRUTL(X,P) | ; returns IFN of item in 399.1 if Code is found and piece P is true
|
|
| SET | ; SET IBA() FOR DISPLAY
|
|
| OCF | ; occurrence codes (399.1) CODE^CODE NAME^SPAN^10 HCFA^OSC
|
| FileNo | Call Tags |
|---|---|
| ^DGCR(399.1 - [#399.1] | Classic Fileman Calls |