Google
¥ª¥Õ¥³¥óÎý½¬Ä¢Æâ¤ò¸¡º÷
¥¤¥ó¥¿¡¼¥Í¥Ã¥ÈÁ´ÂΤò¸¡º÷

NEC¥ª¥Õ¥³¥ó´ØÏ¢
¥ª¥Õ¥³¥ó°ìÈÌ
¾ðÊó

[·Ç¼¨ÈĤËÌá¤ë]


12 Re: AT¡¡END¤ÏÀµ¤·¤¯Æ°¤¤¤Æ¤¤¤ë¤Î¤Ç¤Ï¡©
gai 2015-7-23 15:07  [ÊÖ¿®] [ÊÔ½¸]

ÀâÌÀ¤ï¤«¤ê¤Å¤é¤¯¤Æ¤¹¤ß¤Þ¤»¤ó¡£

¾Êά¤·¤Æ¥·¥ó¥×¥ë¤Ë½ñ¤­¤¹¤®¤¿¤Î¤È¡¢
¾ðÊ󳫼¨¤ÎÌäÂê¤ÇÂçÊѤ狼¤ê¤Å¤é¤¯¤Ê¤Ã¤Æ¤·¤Þ¤¤¤Þ¤·¤¿¡£

³¬Áع½Â¤¤Ë¤Ê¤Ã¤Æ¤ª¤ê¡¢­¡¿Æ¡¡­¢»Ò¡¡­£Â¹

¤È¤Ê¤Ã¤Æ¤ª¤ê¤Þ¤¹¡£

¤¿¤À¤·¡¢¤³¤ì¤Ç¤â¤µ¤é¤Ë¾å°Ì³¬ÁؤΥ롼¥Á¥ó¤¬¤¢¤ê¤Þ¤¹¡£
¤½¤³¤Þ¤Çµ¿¤¦¤È¥­¥ê¤¬¤¢¤ê¤Þ¤»¤ó¤·
¥Õ¥¡¥¤¥ë¥ì¥¤¥¢¥¦¥È¤¬¤É¤¦¤Ê¤Ã¤Æ¤ë¤ó¤À¤È¤«¡¢
£Ä£Â¤Î¾ÜºÙ¤Ï¤É¤¦¤À¤È¤«¤¤¤¦Ïäˤâ¤Ê¤Ã¤Æ¤·¤Þ¤¤¤Þ¤¹¤Î¤Ç¡¢
¤¢¤­¤é¤á¤Þ¤¹¡£
¤Ç¤â¤º¤¤¤Ö¤ó¥¹¥Ã¥­¥ê¤·¤Þ¤·¤¿¡£

¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤·¤¿¡ª



***********************************************************
­¡¡¡PERFORM DELETE-PROC UNTIL WK-DNO NOT = XXXX-DNO.
***********************************************************



­¢
***********************************************************
DELETE-PROC SECTION.
KK-010.
DELETE XXXX-F INVALID KEY
MOVE MSG-ABC TO KB-MSG1
MOVE XX-KEY TO KB-MSG2
PERFORM MSG-RTN THRU MSG-EXT.
PERFORM READ-PROC.
KK-DELETE-EXIT.
EXIT.
***********************************************************


­£
***********************************************************
READ-PROC SECTION.
K-010.
READ XXXX-F NEXT
AT END MOVE HIGH-VALUE TO XXXX-KEY2.
READ-EXIT.
EXIT.
***********************************************************

¡¡XXXX-KEY2 ¤Ï¿ô»ú¹àÌÜ¡¡½¸ÃĹàÌÜ

¡¡XXXX-DNO 9(06)
¡¡XXXX-KNO 9(02)

WK-DNO¡¡9(06) ¤Ï¥Ö¥ì¡¼¥¯¤·¤¿¤È¤­XXXX-DNO¤òÂàÈò¤¹¤ë¥ï¡¼¥¯¹àÌÜ


AT¡¡END¡¡¤¬Ìµ»ë¤µ¤ì¤Æ¡¢ºÆÅÙ¡¢DELETE½è... GAI 2015-7-14 16:12
Re: AT¡¡END¡¡¤¬Ìµ»ë¤µ¤ì¤Æ¡¢ºÆÅÙ¡¢DELE... ²¹Àô¹¥¤­¤Î¤¦¤µ¤® 2015-7-14 18:57
Re: AT¡¡END¡¡¤¬Ìµ»ë¤µ¤ì¤Æ¡¢ºÆÅÙ¡¢DELE... ¥¿¡¼¥é¥ä¥ó 2015-7-15 0:52
Re: AT¡¡END¡¡¤¬Ìµ»ë¤µ¤ì¤Æ¡¢ºÆÅÙ¡¢DELE... gai 2015-7-17 11:53
Re: AT¡¡END¡¡¤¬Ìµ»ë¤µ¤ì¤Æ¡¢ºÆÅÙ¡¢DELE... GAI 2015-7-17 11:24
Re: µ×¡¹£Ã£Ï£Â£Ï£Ì£¸£µ¤ò¸«¤Þ¤·¤¿¡£¡ÊA... ¹¾¿ÜÀð 2015-7-16 11:02
Re: µ×¡¹£Ã£Ï£Â£Ï£Ì£¸£µ¤ò¸«¤Þ¤·¤¿¡£¡ÊA... gai 2015-7-17 13:14
Re: AT¡¡END¡¡¤¬Ìµ»ë¤µ¤ì¤Æ¡¢ºÆÅÙ¡¢DELE... gai 2015-7-17 14:09
Re: AT¡¡END¡¡¤¬Ìµ»ë¤µ¤ì¤Æ¡¢ºÆÅÙ¡¢DELE... GAI 2015-7-17 15:57
Re: AT¡¡END¡¡¤¬Ìµ»ë¤µ¤ì¤Æ¡¢ºÆÅÙ¡¢DELE... £Å£Ø£Ã£È£Á£Î£Ç£Å 2015-7-19 16:24
Re: AT¡¡END¡¡¤¬Ìµ»ë¤µ¤ì¤Æ¡¢ºÆÅÙ¡¢DELE... MAKI 2015-8-4 14:53
AT¡¡END¤ÏÀµ¤·¤¯Æ°¤¤¤Æ¤¤¤ë¤Î¤Ç¤Ï¡© ¥¿¡¼¥é¥ä¥ó 2015-7-22 0:23
Re: AT¡¡END¤ÏÀµ¤·¤¯Æ°¤¤¤Æ¤¤¤ë¤Î¤Ç¤Ï¡© gai 2015-7-23 15:07 ¢«¤¤¤Þ¤³¤³¡Á
BluesBB ©Sting_Band