| | |
|---|
| | | String filePath |
|---|
| | | ) |
|---|
| | | { |
|---|
| | | TextBody: |
|---|
| | | [* |
|---|
| | | // 请求参数 |
|---|
| | | pathPP := filePath + ppFileName; |
|---|
| | | isArchive := ifexpr( isPPArchive, "true", "false" ); |
|---|
| | | minorKey := [String]macroPlan.MDSID().MinorKey(); |
|---|
| | | json := JSON::Object() |
|---|
| | | .Add( "path", pathPP ) |
|---|
| | | .Add( "isArchive", isArchive ) |
|---|
| | | .Add( "minorKey", minorKey ).Build().AsString(); |
|---|
| | | |
|---|
| | | // 写入临时文件 |
|---|
| | | Archive::WriteTempFile( pathPP, ppBinaryValue ); |
|---|
| | | |
|---|
| | | info( json ); |
|---|
| | | |
|---|
| | | // 调用接口 |
|---|
| | | //url := "/PR/Import"; |
|---|
| | | //i := HTTPInterface::Create( archive.JavaInterfaceAddress(), archive.JavaInterfacePort() ); |
|---|
| | | //i.URL( url ); |
|---|
| | | //i.PostMethod( true ); |
|---|
| | | // |
|---|
| | | //try { |
|---|
| | | // i.Call( json ); |
|---|
| | | // |
|---|
| | | // htmlresult := i.Result(); |
|---|
| | | //} onerror { |
|---|
| | | // |
|---|
| | | //} |
|---|
| | | *] |
|---|
| | | } |
|---|
