Hitachi

EUR 帳票出力 リファレンス EUR Server編(UNIX(R)用)


GetSpoolFileメソッド

指定したジョブIDのスプールデータに格納されている印刷データを,指定したパスにファイルで取得します。

OutputFileKindプロパティで取得ファイル形式にEPF形式を指定している場合,またはOutputFileKindプロパティの指定を省略している場合は,印刷データをEPF形式ファイルで取得します。

OutputFileKindプロパティで取得ファイル形式にPDF形式を指定している場合は,印刷データをPDF形式ファイルで取得します。

取得後のファイルは,OutputFileNameプロパティで指定したファイル名になります。

指定したパスに同一名のファイルがある場合は,上書きされます。スプールデータの取得については,マニュアル「EUR 帳票出力 機能解説 EUR Server編」を参照してください。

〈このページの構成〉

形式

GetSpoolFile ()

パラメタ

なし

解説

GetSpoolFileメソッドは,スプールサーバ上のスプールデータ内の印刷データをOutputFilePathプロパティで指定されたフォルダにファイル出力が終了した時点で呼び出し元に制御が戻ります。

取得ファイル形式はOutputFileKindプロパティで指定します。

実行時にエラーが発生した場合,Err.Numberプロパティに終了コード,Err.Descriptionプロパティにメッセージが設定されます。

戻り値

なし

データ型

Empty

呼び出し例

' GetSpoolFile実行
Private Sub SUB_GetSpoolFile()
    Err.Clear
    On Error GoTo Err_Trap
    List5.Clear
  
    Dim objEURPMLS
        
    Set objEURPMLS = CreateObject("EURPMLS.Exec")
    
    objEURPMLS.ServerAddress = "255.255.***.***"
    objEURPMLS.SearchJobID = "E00200605291252462630000001******007"
    ''取得フォルダの設定
    objEURPMLS.OutputFilePath = "c:\\tmp"
    ''取得実行
    Call objEURPMLS.GetSpoolFile
  
Err_Trap:
    List5.AddItem "GetAttr Err.Number=(" & Err.Number & ")"
    List5.AddItem "GetAttr Err.Description=(" & Err.Description & ")"
    
    Set objEURPMLS = Nothing
   
End Sub