用DSPJRN恢復出來的數據怎么讓他正常顯示呢？

ujsxb

我用DSPJRN命令把journal恢復到一個file里，但是JOESD字段都是亂碼，怎么讓他恢復到原來的file并正常顯示呢？
我按照網上的方法，用CPYF OUTFILEV1   ORIGFILE   MBROPT(*ADD)  FMTOPT(*NOCHK)命令copy到ORIGFILE后，所有的字段還是亂碼。

franliu

先建一個輸出文件前面部分和原來的輸出文件一樣把最后面一個很長的字段換成原來被 JOURNAL 的所有字段， 再編譯好。

重新輸出 JOURNAL 到新的輸出文件變可以了。

記得只能選擇 UP, PT, PX DL 記錄類性。

qingzhou

剛測試了一下，  ===> DSPJRN JRN(QSYS/QAUDJRN) OUTPUT(*OUTFILE) OUTFILFMT(*TYPE5) OUTFILE(QTEMP/QAUDJRN) ，然后查詢了結果，SPECIFIC DATA（ JOESD字段）可以正常顯示。   

                                 Display Report                                 
                                              Report width . . . . . :     879  
Position to line  . . . . .              Shift to column  . . . . . .         
Line   .78....+...79....+...80....+...81....+...82....+...83....+...84....+...8
          SPECIFIC                                                              
          DATA                                                                  
                                                                                
000001   AUDRCV0096QGPL                                                        
000002   MXSD SWTDG FOR DATAGROUP:                         DG_A      PRLS    AL
000003   GQZSOSIGN  QUSER     635914QUSER     QUSER                           
000004   HGONGYD                                                               
000005   CGONGYD    QSYS      *USRPRF   "                                      
000006   HQUSER                                                               
000007   GQZDASOINITQUSER     635905QUSER     QUSER                           
000008   HGONGYD                                                               
000009   FZRGONGYD       * * **CHKUSAGE                                       
000010   MM   *                                                               
000011   ZM   *                                                               
000012   HQUSER                                                               
000013   HQUSER                                                               
000014   CQ04079N004QSPL      *FILE             Q721500094QPDZDTALOG0004PRT01  
                                                                      More...   
F3=Exit      F12=Cancel      F19=Left      F20=Right      F21=Split            
Cannot show this data at the display station.                                                                                                        

franliu

通常從journal找數據庫文件更新的歷史需要制定文件名。這樣輸出的文件系統(tǒng)會輸出一個文件，包括以下的字段：

JOENTL            Length of entry                  
JOSEQN            Sequence number                  
JOCODE            Journal Code                     
JOENTT            Entry Type                        
JODATE            Date of entry: Job date format   
JOTIME            Time of entry: hour/minute/second
JOJOB             Name of Job                       
JOUSER            Name of User                     
JONBR             Number of Job                     
JOPGM             Name of Program                  
JOOBJ             Name of Object                    
JOLIB             Objects Library                  
JOMBR             Name of Member                        
JOCTRR            Count or relative record number changed
JOFLAG            Flag: 1 or 0                           
JOCCID            Commit cycle identifier               
JOINCDAT          Incomplete Data: 1 or 0               
JOMINESD          Minimized ESD: 1 or 0                  

最后還有一個很長的字段捕捉了被修改記錄的全部dump出來的內容。

我們需要做的能看清楚 dump出來內容的每一個字段的值

ujsxb

找到方法了：
1，import the the data from journal
DSPJRN JRN(KENT/ECLJRN) FILE((BPCSF/ECL)) RCVRNG(KENT/ECLJRN0041)
FROMTIME('19/12/13' 010101) TOTIME('19/12/13' 010101) ENTTYP(UP UB)
OUTPUT(*OUTFILE) OUTFILFMT(*TYPE4) OUTFILE(KENT/AAA) ENTDTALEN(881)        
2, copy the orignal file
CPYF FROMFILE(BPCSF/ECL) TOFILE(KENT/BBB) CRTFILE(*YES) TORCD(1)
3, clear the copied file
delete from kent/bbb
4, create a view
CREATE VIEW kent/ccc AS                                
SELECT JOESD FROM kent/aaa
5, copy the data from the view to the copied file
CPYF FROMFILE(KENT/CCC) TOFILE(KENT/BBB) MBROPT(*ADD) FMTOPT(*NOCHK)