i recorded a macro to copy orders but it does not run , I get automation error.  the 'actions' don't work

same problem on different version of Sage 30

Anybody know why

OEORD2header.Init
OEORDC1Fields("FRCUST").Value = "1100"                                ' From Customer Number
OEORD2header.Init
OEORDC1Fields("TOCUST").Value = "1100"                                ' To Customer Number
OEORD2header.Init
OEORDC1Fields("FRORDER").Value = "ORD000000000007"                    ' From Order Number
OEORD2header.Init
OEORDC1Fields("TOORDER").Value = "ORD000000000007"                    ' To Order Number
OEORD2header.Init
OEORDC1Fields("ACTION").Value = "1"                                   ' Action Performed
OEORDC1.Process
OEORD2headerFields("PROCESSCMD").PutWithoutVerification ("1")         ' Process OIP Command
OEORD2header.Process
OEORD2detail1Fields("LINENUM").PutWithoutVerification ("-1")          ' Line Number

OEORD2detail1Fields("LINENUM").PutWithoutVerification ("-1")          ' Line Number

OEORD2detail1.Read
OEORDC1Fields("ACTION").Value = "3"                                   ' Action Performed
OEORDC1.Process