CL操作QUERY

备忘

OVRDBF     FILE(SWNITRP)  SHARE(*YES)                

OPNQRYF    FILE((SWNITRP)) QRYSLT('TNCOCD *NE " "') +

             KEYFLD((TNITCD) (TNCOCD))               

CALL       PGM(CHK070)                               

CLOF       OPNID(SWNITRP)                            

DLTOVR     FILE(SWNITRP)                             

运行已完成的QUERY,并允许修改"WHERE"的查询条件

RUNQRY     QRY(NFTLIB/SIN5170Q1) RCDSLT(*YES)