RPG·¡¡¤«¤ó¤¿¤ó¤ÊCRUD¤Î¥µ¥ó¥×¥ë¤Ç»ÈÍѤ·¤¿ÊªÍý¥Õ¥¡¥¤¥ë¤ÎÆâÍƤò°õºþ¤¹¤ë¥×¥í¥°¥é¥à¤Ç¤¹¡£
RPGÆâ¤ÎO»ÅÍͽñ¤òÍѤ¤¤Æ°õºþ¤¹¤ë¥µ¥ó¥×¥ë¤Ç¤¹¡£
RPGÆâ¤ÎO»ÅÍͽñ¤òÍѤ¤¤Æ°õºþ¤¹¤ë¥µ¥ó¥×¥ë¤Ç¤¹¡£
H Y/ 1 FEX0020P IF E K DISK FQPRINT O F 132 OF LPRINTER LQPRINT 66FL 50OL C* C SETON OF C Z-ADD*ZERO TTLCNT 40 ·ï¿ô C Z-ADD*ZERO TTL030 190 ¹ç·×¶â³Û C* C DO *HIVAL C READ EX2R 99 C 99 LEAVE C OF EXCPTHDR ¸«½Ð¤·°õºþ C OF SETOF OF C EXCPTDTL ÌÀºÙ°õºþ C ADD 1 TTLCNT ·ï¿ô¥«¥¦¥ó¥È C ADD EX2030 TTL030 ¶â³Û²Ã»» C ENDDO C EXCPTTTL ¹ç·×°õºþ C* C SETON LR C RETRN OQPRINT E 2 HDR O UDATE Y 8 O 60 'EX0020P¥ê¥¹¥È' O 128 'PAGE.' O PAGE 131 O E 2 HDR O 9 '¥³¡¼¥É' O 20 '̾¾Î' O 46 '²Á³Ê' O E 1 HDR O 6 '---' O 28 '--------------------' O 50 '--------------------' O 55 '-----' O E 1 DTL O EX2010 6 O EX2020 28 O EX2030J 56 O E 1 TTL O 6 '---' O 28 '--------------------' O 50 '--------------------' O 55 '-----' O E 2 TTL O 10 '¹ç·×' O TTLCNTJ 22 O 26 '·ï' O TTL030J 56
¤³¤Î¥Ú¡¼¥¸¤Ø¤Î¥³¥á¥ó¥È
dTSTnY Hey, thanks for the blog post.Thanks Again. Cool.