Quintiq file version 2.0 
 | 
#parent: pIDS/bIDS 
 | 
Response OnClick () id:Response_pIDS_bIDS_OnClick 
 | 
{ 
 | 
  #keys: '[413988.0.1185074879]' 
 | 
  CanBindMultiple: false 
 | 
  DefinitionID: 'Responsedef_WebButton_OnClick' 
 | 
  QuillAction 
 | 
  { 
 | 
    Body: 
 | 
    [* 
 | 
      try { 
 | 
        uploadJsonString := Application.GetFile(); 
 | 
        if ( uploadJsonString <> "" and not uploadJsonString.Regex( "IDS" ) ) { 
 | 
          WebMessageBox::Error( "文件名不匹配" ); 
 | 
        } else if ( uploadJsonString <> "" ) { 
 | 
          uploadJson := JSON::Parse( uploadJsonString ); 
 | 
          Archive::VerifyTheFileName( uploadJson ); 
 | 
           
 | 
          fileName := uploadJson.Get( "name" ).GetString(); 
 | 
          base64String := uploadJson.Get( "data" ).GetString(); 
 | 
               
 | 
          webFileBinaryData := BinaryData::FromBase64EncodedString( base64String ); 
 | 
           
 | 
          efIDS.Text( fileName ); 
 | 
          dhBinaryDataIDS.Data( &webFileBinaryData ); 
 | 
          dhOriginalFileNameIDS.Data( fileName ); 
 | 
        } 
 | 
      } onerror { 
 | 
        WebMessageBox::Error( e.GeneralInformation() ); 
 | 
      } 
 | 
    *] 
 | 
    GroupServerCalls: false 
 | 
  } 
 | 
} 
 |