| DFN | 
Input | 
Pointer to entry in the Patient (#2) file (required)
 
 | 
ARRAY | 
Input | 
ARRAY("SexOr",n) = code^status^note
n      - counter for list of sexual orientation(s) traits
code (required) - will be filed in the SEXUAL ORIENTATION (#.01) field of the
SEXUAL ORIENTATION (#.025) multiple of the PATIENT (#2) file.  It corresponds
to the TYPE CODE (#1) field of the SEXUAL ORIENTATION TYPES. (#47.77) file
status (required) - will be filed in the STATUS (#.02) field of the SEXUAL
ORIENTATION (#.025) multiple of the PATIENT (#2) file and currently defined as
'A' (Active), 'I' (Inactive), 'E' (Entered in Error).
note (optional) - ien from the TIU DOCUMENT (#8925) file.
ARRAY("SexOrDes") (optional) - will be filed in the SEXUAL ORIENTATION
DESCRIPTION (#.0251) field of the PATIENT (#2) file and describes the 'Other'
sexual orientation.
 | 
UPDATE | 
Input | 
1 - Sexual Orientation components are filed, otherwise only data validation
is performed (optional)
 
 | 
RET | 
Output | 
0 - if update is successful
-1^error message - if unsuccessful
 
 |