xp_comm_proj/rdmovbyu/rdmovoff.c
/*--------------------------------------------------------------------
 *      OM module Entry Point, Resolve Parameters
 *--------------------------------------------------------------------*/
OM module Entry Point, Resolve Parameters
OM module Entry Point Resolve Parameters
int read_off_update(OMobj_id elem_id, OMevent_mask event_mask, int seq_num)
{
    OMobj_id filename, out, size, index;
    char *str;
    int num;
    int Result;
    str = NULL;
    filename = OMfind_subobj(elem_id, OMstr_to_name("filename"),
			      OM_OBJ_RD);
    OMget_str_val(filename, &str, 0);
    out = OMfind_subobj(elem_id, OMstr_to_name("out"), OM_OBJ_RW);
    size = OMfind_str_subobj(elem_id, "size", OM_OBJ_RD);
    if (OMis_null_obj(size)) {
      ERR_RETURN("Error searching for size");
    }
    Result = FUNCread_off(str, out, size);
    if (str) free(str);
    return(Result);
}
int read_off_update ( OMobj_id elem_id , OMevent_mask event_mask , int seq_num ) { OMobj_id filename , out , size , index ; char * str ; int num ; int Result ; str = NULL ; filename = OMfind_subobj ( elem_id , OMstr_to_name ( " " ) , OM_OBJ_RD ) ; OMget_str_val ( filename , & str , 0 ) ; out = OMfind_subobj ( elem_id , OMstr_to_name ( " " ) , OM_OBJ_RW ) ; size = OMfind_str_subobj ( elem_id , " " , OM_OBJ_RD ) ; if ( OMis_null_obj ( size ) ) { ERR_RETURN ( " " ) ; } Result = FUNCread_off ( str , out , size ) ; if ( str ) free ( str ) ; return ( Result ) ; }
OM module Entry Point, Resolve Parameters
OM module Entry Point Resolve Parameters
/*char buffer[50];*/ /*index = OMfind_subobj(elem_id, OMstr_to_name("index"),
               OM_OBJ_RD);
    OMget_int_val(index, &num);
    sprintf(buffer, "Index Value: %d\n", num );
    ERRverror("",ERR_NO_HEADER | ERR_PRINT, buffer);*/