Credit Limit Alert

static void testalertx(Args _args)
{
    EventNotificationSource _source;
    EventNotification       event = EventNotification::construct(EventNotificationSource::Sync);
    custtable             custtable;
    ;

    //inventTable = InventTable::find('B-R14');  // sample record for which alert is shown
    select firstonly custtable;


    event.parmRecord(custtable);
    event.parmUserId(curuserid());      // user for which this alert to be shown
    event.parmDataSourceName('Custtable');  //form datasource
    event.parmMenuFunction(new MenuFunction('custtable', MenuItemtype::Display));
    event.parmSubject('credit limit goes down below 80%');
    event.parmMessage('credit limit alert');
    event.create();

    info("done");
}