0

次のコードがあります。プログラムは終了するだけで、呼び出しから値は返されません。何か案は?

AS400System system = new AS400System();
system.Define(ConfigurationManager.AppSettings["AS400Server"]);
system.UserID = ConfigurationManager.AppSettings["AS400User"];
system.Password = ConfigurationManager.AppSettings["AS400Password"];
system.IPAddress = "10.98.1.21";
system.Connect(cwbcoServiceEnum.cwbcoServiceRemoteCmd);



if(system.IsConnected(cwbcoServiceEnum.cwbcoServiceRemoteCmd) == 1) {
    Program program = new Program();
    program.LibraryName = "P2PTST";
    program.ProgramName = "AUI0XFR";
    program.system = system;
    program.system.Signon();

    string paramStatus = "A";
    Int64 paramStockItem = Int64.Parse(t.EtagNumber);
    Guid paramGuid = Guid.NewGuid();
    string paramReturn;

    StringConverter stringConverter = new StringConverter();
    ProgramParameters parameters = new ProgramParameters();
    parameters.Append("ApiIGuid", cwbrcParameterTypeEnum.cwbrcInout, 38);
    parameters.Append("StockItemNumber", cwbrcParameterTypeEnum.cwbrcInout, 20);
    parameters.Append("ItemStatus", cwbrcParameterTypeEnum.cwbrcInout, 1);
    parameters.Append("ReturnCode", cwbrcParameterTypeEnum.cwbrcInout, 7);

    parameters["ApiIGuid"].Value = stringConverter.ToBytes(paramGuid.ToString().PadRight(38, ' '));
    parameters["StockItemNumber"].Value = stringConverter.ToBytes(paramStockItem.ToString().PadRight(20, ' '));
    parameters["ItemStatus"].Value = stringConverter.ToBytes(paramStatus.ToString());

    try{
        program.Call(parameters);
        paramReturn = stringConverter.FromBytes(parameters["ReturnCode"].Value);

        system.Disconnect(cwbcoServiceEnum.cwbcoServiceAll);
    }
    catch (Exception ex)
    {
       Console.WriteLine(ex);
    }
}

4

1 に答える 1