ordered asm and asm+ reactors
This commit is contained in:
@ -95,9 +95,14 @@ $Insert PS_EQUATES
|
||||
Main:
|
||||
* Messaging_Services('SendMessage', 'RunProcedure', 'Request', '', 'All', 'RTP27,REACTOR_SERVICES', '', '', '')
|
||||
debug
|
||||
ASMList = Reactor_Services('GetReactorNumbers', 'ASM')
|
||||
ASMList := @FM : Reactor_Services('GetReactorNumbers', 'ASM+')
|
||||
|
||||
ASMList = SRP_Array('SortSimpleList', ASMList, 'AscendingNumbers', @FM)
|
||||
|
||||
* LoadInstAckReq = Xlate('RDS', 646209, 'LOAD_INST_ACK_REQ', 'X')
|
||||
DefPrinter = Get_Printer( "CURRENTDEVICE")
|
||||
Printers = Get_Printer( "DEVICES" )
|
||||
* DefPrinter = Get_Printer( "CURRENTDEVICE")
|
||||
* Printers = Get_Printer( "DEVICES" )
|
||||
* SelPrinter = Printer_Select()
|
||||
|
||||
* Stage = Rds_Services('GetCurrentStage', 646209)
|
||||
@ -4300,3 +4305,4 @@ return
|
||||
* return
|
||||
*
|
||||
|
||||
|
||||
|
Reference in New Issue
Block a user