亚洲av成人无遮挡网站在线观看,少妇性bbb搡bbb爽爽爽,亚洲av日韩精品久久久久久,兔费看少妇性l交大片免费,无码少妇一区二区三区

Chinaunix

}: ن}~~ [ӡ]

: ̖ɫ    rg: 2008-07-30 13:08
}: ن}~~
ҬF(xin)ڌһεСbatch  rpgle  g  Y(ji)Ҳ debugĕr һMȥ һF10I  Ƴ @ʲôԭ
: pantierui    rg: 2008-07-30 13:15
updatewritestrdbgUPDPROD(sh)Ҫ*yes磺
STRDBG PGM(YOURLIB/TEST) UPDPROD(*YES)
: ̖ɫ    rg: 2008-07-30 13:17
֪ô  ھ
: ̖ɫ    rg: 2008-07-30 13:19
@Ҷyes  ߀DzҪ
: pantierui    rg: 2008-07-30 13:20
ǰe`N
: ̖ɫ    rg: 2008-07-30 13:21
]κe`Ϣ @Ǻ^ʹ
: magicdandan    rg: 2008-07-30 13:22
}: ؏ #2 pantierui
Wˣ߀](jng)^debug{(dio)
: magicdandan    rg: 2008-07-30 13:22
}: ؏ #7 magicdandan
֪]Oc Ҿ֪@
: ̖ɫ    rg: 2008-07-30 13:24
Ñ ҲǰςӸVҵ÷õ     gҲ]І} ѥ`・ץ ̎ ҽo *nodebugio    ǥХååӥ`  ̎Ҍ *all  Ҳ܈(zh)  Dzdebug
: ̖ɫ    rg: 2008-07-30 13:24
f6 OÔcô
: magicdandan    rg: 2008-07-30 13:25
}: ؏ #10 ̖ɫ
e ҵģҲ׵
: pantierui    rg: 2008-07-30 13:26
ǥХååӥ`  . . . . . . .   *LIST   
@ͿDEBUGeIJ׃

[ pantierui 2008-7-30 13:29 ݋ ]
: ̖ɫ    rg: 2008-07-30 13:28
Ǻ  OÔcĆ}  } debugĕr  һf10  Ƴ ߀] κe`Ϣ
: ̖ɫ    rg: 2008-07-30 13:28
ԭ pantierui 2008-7-30 01:26 PM l(f)
@܆ᣡ

Ҳ
: ̖ɫ    rg: 2008-07-30 13:29
ԭ pantierui 2008-7-30 01:26 PM l(f)
ǥХååӥ`  . . . . . . .   *LIST   
@ͿDEBUGeIJ׃

Ǻ Ҳԇ
: pantierui    rg: 2008-07-30 13:30
ܰҶôõİ
N
: ̖ɫ    rg: 2008-07-30 13:34
ȵ
: ̖ɫ    rg: 2008-07-30 13:36
FMYLF01    IF A E           K DISK                                    
I*****************************************************************   
C*                                                                    
C                   Z-ADD     52            EPF01                     
C     EPF01         CHAIN     PFREC                              90   
C     *IN90         IFEQ      *ON                                    
C*    *IN90         IFEQ      '1'                                    
C                   MOVEL     '    '    EPF02                     
C                   MOVEL     'MAN'         EPF03                     
C                   MOVEL     '  |  '    EPF04                     
C                   Z-ADD     100           EPF05                     
C                   MOVEL     *BLANK        EPF06                     
C*                                                                    
C                   WRITE     PFREC                                   
C*                                                                    
C                   ENDIF                                             
C*                                                                    
C                   MOVE      '1'           *INLR                     
C*                                                                    
C*                              
C                   RETURN
: pantierui    rg: 2008-07-30 13:39
MYLF01 ҲN?
: ̖ɫ    rg: 2008-07-30 13:41
PF
A*                                                            
A          R PFREC                      TEXT('TEST ONLY')     
A*                                                            
A            EPF01          2S 0       COLHDG('NO')           
A            EPF02          8O         COLHDG(' ǰ ')      
A            EPF03          5A         COLHDG('SEX')         
A            EPF04         18O         COLHDG(' WУ  ')      
A            EPF05          4S 1       COLHDG(' ɿ  ')      
A*                                                            
A            EPF06          1A         COLHDG(' ` ')

====================================
LF
A                                      UNIQUE            
A          R PFREC                     PFILE(MYPF)        
A          K EPF01                                       
A          S EPF06                     COMP(NE '1')
: pantierui    rg: 2008-07-30 13:48
g
CRTBNDRPG PGM(ZYF/TEST3) SRCFILE(ZYF/QRPGSRC) SRCMBR(TEST3) DBGVIEW(*LIST)
DEBUG:
STRDBG PGM(ZYF/TEST3) UPDPROD(*YES)
OÔcF3Ƴ
(zh):
CALL ZYF/TEST3MDEBUG.
: pantierui    rg: 2008-07-30 13:50
DEBUGDzOcF10˳DzDEBUG.
: ̖ɫ    rg: 2008-07-30 13:54
O õ ԇԇ
: ̖ɫ    rg: 2008-07-30 14:02
fָx l(f)ԃ(ni)ĵ




gӭR Chinaunix (http://72891.cn/) Powered by Discuz! X3.2