Mainframe Template Example - Documentation for Bmc Helix Discovery

tpl 1.16 module Mainframe.Examples;

metadata
  origin := "ONLINE_DOCS";
end metadata;

from SupportingFiles.Mainframe.Support import MainframeModel 3.0;


pattern Mainframe_TapeDrive 1.0



  overview
    tags IBM, TapeDrive;
  end overview;

  constants
    filter := "";
  end constants;

  triggers
    on result_list := DiscoveredMainframeViewResultList
                      where discovery_method = "getTapeDrive";
  end triggers;

  body
    MainframeModel.createTapeStorage(result_list, filter);
  end body;

end pattern;


pattern Mainframe_DASD 1.0



  overview
    tags IBM, DASD;
  end overview;

  constants
    filter := "^AL";
  end constants;
  
  triggers
    on result_list := DiscoveredMainframeViewResultList
                      where discovery_method = "getDiskDrive";
  end triggers;
  
  body
    MainframeModel.createDiskStorage(result_list, filter);
  end body;

end pattern;


pattern Mainframe_Transaction 1.0



  overview
    tags IBM, Transaction;
  end overview;

  constants
    filter := "^CICSTRAN-C";
    create_programs := false;
  end constants;
  
  triggers
    on result_list := DiscoveredMainframeViewResultList
                      where discovery_method in ["getCICSTransaction",
                                                 ];
  end triggers;
  
  body
    MainframeModel.createTransactions(result_list, filter, create_programs);
  end body;

end pattern;


pattern Mainframe_MQ 1.0



  overview
    tags IBM, MQ;
  end overview;
  
  constants
    filter := "^MQCHNL-";
  end constants;

  triggers
    on result_list := DiscoveredMainframeViewResultList
                      where discovery_method in ["getMQQueue",
                                                 "getMQChannel",
                                                 "getMQListener"];
  end triggers;
  
  body
    MainframeModel.createMQDetails(result_list, filter);
  end body;

end pattern;