![[Next]](802503c4.gif){kind=small}
![[Up]](80000658.gif){kind=small}
![[Back]](8016546c.gif){kind=small}
![[Previous]](ff57198c.gif){kind=small}
![[Contents]](a5f4558b.gif){kind=small}
Calling sequence : CALL DIRHC (VARREC, NVCOMP, COMP, IEXIT, IUNT)
Purpose : To enter definitions of result record variants.
Parameters :
| In | |||
| VARREC | Record variant identification number (Integer) | ||
| NVCOMP | Number of components in record variant (Integer) | ||
| COMP | List of positions of components, which are in this variant, in attribute definition (Integer array of size NVCOMP) | ||
| IUNT | Temporary file channel number (Integer) | ||
| Out | |||
| IEXIT | Error condition (Integer) | ||
Use: This routine is used to enter variant result records if there are any (see DIRHA). If it is used, it must follow routine DIRHB. This routine is called once to enter one variant result record. The number of variant result records must be consistent with the input to routine DIRHA.
Errors : The error condition is indicated by the value of IEXIT.
| IEXIT | Meaning |
| 0 | Successful call | |
| 32 | Current error must be cleared up first | |
| 129 | Error in writing to temporary file on unit (iunt) | |
| 163 | Component definitions not completed | |
| 164 | No more attribute variants expected | |
| 192 | Too many components in attribute variant | |
| 211 | Invalid temporary file unit number (iunt) |