1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
|
USE dtnmp;
-- Create Report #1
-- Get MIDs
SET @MID1 := (SELECT ID FROM dbtMIDs WHERE ID = 2);
SET @MID2 := (SELECT ID FROM dbtMIDs WHERE ID = 3);
SET @MID3 := (SELECT ID FROM dbtMIDs WHERE ID = 4);
-- Create Report MID
INSERT INTO dbtMIDs (Attributes,Type,Category,IssuerFlag,TagFlag,OIDType,IssuerID,OIDValue,TagValue) VALUES (2,b'10',b'10',b'0',b'0',b'00',0,'082b0601020303010d',0);
SET @DefineCustomReportMIDIDValue = LAST_INSERT_ID();
-- Create MID Collection ID
INSERT INTO dbtMIDCollections (Comment) VALUES ('R1');
SET @MIDCollectionID = LAST_INSERT_ID();
-- Create MID Collection
INSERT INTO dbtMIDCollection (CollectionID,MIDID,MIDOrder) VALUES (@MIDCollectionID,@MID1,1);
INSERT INTO dbtMIDCollection (CollectionID,MIDID,MIDOrder) VALUES (@MIDCollectionID,@MID2,2);
INSERT INTO dbtMIDCollection (CollectionID,MIDID,MIDOrder) VALUES (@MIDCollectionID,@MID3,3);
-- Create Definition for Define Custom Report
INSERT INTO dbtMessagesDefinitions (DefinitionType,DefinitionID,DefinitionMC) VALUES (1,@DefineCustomReportMIDIDValue,@MIDCollectionID);
-- Define a Control
INSERT INTO dbtMessagesControls(Type,Start,Periods,Predicate,Count,Collection) VALUES(1,0,1,0,1,@MIDCollectionID);
-- Register an agent
INSERT INTO dbtRegisteredAgents(AgentID) VALUES('ipn:21404.1');
-- Create an outgoing Message Group with the Control from above
INSERT INTO dbtOutgoing(CreatedTS,ModifiedTS,State) VALUES(NOW(),NOW(),0);
SET @v1 = LAST_INSERT_ID();
SELECT @v2 := ID FROM lvtMessageTablesList WHERE TableName='dbtMessagesControls';
SELECT @v3 := MAX(ID) FROM dbtMessagesControls;
INSERT INTO dbtOutgoingMessages(OutgoingID,MessagesTableID,MessagesTableRowID) VALUES(@v1,@v2,@v3);
-- Retrieve unprocessed (READY) Outgoing Messages
SELECT @MessageGroupID := dbtOutgoing.ID, @TableName := lvtMessageTablesList.TableName, @TableRowID := dbtOutgoingMessages.MessagesTableRowID FROM dbtOutgoing, dbtOutgoingMessages, lvtMessageTablesList WHERE dbtOutgoing.State=0 AND dbtOutgoing.ID=dbtOutgoingMessages.OutgoingID AND lvtMessageTablesList.ID=dbtOutgoingMessages.MessagesTableID;
-- Give a sender for the (READY) Outgoing Messages
SELECT @sender := ID FROM dbtOutgoing WHERE dbtOutgoing.State=0;
INSERT INTO dbtOutgoingRecipients(OutgoingID,AgentID) VALUES(@sender,1);
-- Retrieve the contents of the table listed as an Outgoing Message
SET @s = CONCAT('select * from ', @TableName, ' where ID = ', @TableRowID);
PREPARE stmt1 FROM @s;
EXECUTE stmt1;
DEALLOCATE PREPARE stmt1;
-- Tell Manager we are ready to process.
UPDATE dbtOutgoing SET State = State + 1 WHERE ID = @v1;
PREPARE stmt1 FROM @s;
EXECUTE stmt1;
DEALLOCATE PREPARE stmt1;
|
