Variable Set Integer N1 to 0
Repeat Until N1 = 1
Variable Set String T1 from prompt - Ares ID
Variable Set String T2 from prompt - Item Barcode..
Window Activate: "Ares"
Delay 1.00 Seconds
Alt Key Down
Delay 0.05 Seconds
Text Type: s
Delay 0.05 Seconds
Alt Key Up
Delay 1.00 Seconds
Text Type: %T1%<ENTER>
Delay 2.00 Seconds
Shift Key Down
Text Type: <TAB><TAB><TAB><TAB><TAB>
<TAB><TAB><TAB><TAB><TAB>
Shift Key Up
Text Type %T2%
Shift Key Down
Text Type: <TAB><TAB><TAB><TAB><TAB>
<TAB><TAB><TAB><TAB><TAB><TAB>
Shift Key Up
Clipboard Empty
Clipboard Copy
Delay 0.50 Seconds
Variable Set String T99 from clipboard
Marco Run: Set Reserve types
Alt Key Down
Delay 0.50 Seconds
Text Type: s
Alt Key Up
Window Active: "Voyager Circulation"
Alt Key Down
Text Type: fc
Alt Key Up
Text Type: <ESC><ESC>
Control Key Down
Text Type: i
Control Key Up
Delay 0.50 Seconds
Text Type: %T2%<ENTER>
Delay 0.50 Seconds
Control Key Down
Text Type: e
Control Key Up
Delay 0.05 Seconds
Alt Key Down
Text Type: e
Alt Key Up
Delay 0.50 Seconds
Alt Key Down
Text Type: i
Alt Key Up
Text Type: <TAB><TAB><DELETE>%T60%
<TAB><TAB><DELETE>%T96%
Delay 0.50 Seconds
Alt Key Down
Text Type: o
Alt Key Up
Window Active: "Item ["
Macro Run: Change to Avl - Item Screen
Delay 3.00 Seconds
Window Close - Window Title: Item [ItemID
Delay 0.50 Seconds
Window close - Window Title: General Search
If Message
Caption - Add Another Item
Message - Would you like to check in another item?
Buttons to Use - Yes and No
Else
Variable Set Integer N1 to 1
End If
Repeat End