| Ach :: Builder. ACH (Automated Clearing House) ÆÄÀÏ ºôµù ¿ë µµ±¸ |
Áö±Ý ´Ù¿î·Îµå |
Ach :: Builder. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~tkeefer/
Ach :: Builder. ű×
Ach :: Builder. ¼³¸í
ACH (Automated Clearing House) ÆÄÀÏ ºôµù ¿ë µµ±¸ ACH :: Builder´Â ´ëºÎºÐÀÇ ÀºÇà¿¡ ÀÇÇØ ÀÚµ¿Àû ÀÎ ³Êºñ Æ÷¸Ë µÈ ÆÄÀÏ ÀÎ ACH ÆÄÀÏÀ» ±¸¼ºÇÏ´Â µ¥ µµ¿òÀ̵Ǵ Perl ¸ðµâÀÔ´Ï´Ù. ACH (Automated Clearing House)´Â ¹Ì±¹ÀÇ ÀüÀÚ ¹ðÅ· ³×Æ®¿öÅ© ¿î¿µ üÁ¦ÀÔ´Ï´Ù. ACH´Â ¹èÄ¡·Î ½ÃÀ۵Ǵ ũ·¹µ÷ ¹× Á÷ºÒ Æ®·£Àè¼ÇÀÇ ¸¹Àº ¾çÀ» ó¸®ÇÕ´Ï´Ù. ACH ³×Æ®¿öÅ©¸¦ °ü¸®ÇÏ´Â ±ÔÄ¢ ¹× ±ÔÁ¤Àº NACHA (National Automated Clearing House Association) ¹× ¿¬¹æ Áغñ ¿¹ºñ (Fed) .ACH Å©·¹µ÷ ¼Û±ÝÀ¸·Î ÀÎÇØ Á÷Á¢ ÀÔ±Ý ±Þ¿© ÁöºÒ ¹× °è¾àÀÚ ¹× °ø±Þ ¾÷ü¿¡ ÁöºÒÇÕ´Ï´Ù. ACH Á÷ºÒ Ä«µå´Â º¸Çè·á, ¸ð±âÁö ´ëÃâ ¹× ±âŸ Á¾·ùÀÇ Ã»±¸¼¿¡ ´ëÇÑ ¼ÒºñÀÚ ÁöºÒÀÌ Æ÷ÇԵ˴ϴ٠.Synopsis Ach :: Builder; My $ ACH = ACH :: Builder-> New ({# (Çʼö) ȸ»ç ½Äº°, Fed Tax ID company_id => '11-111111 ', # (Çʼö) ¼ö½ÅÀÚÀÇ ÀºÇà °èÁ ¸í¼¼¼ _name =>'³» ȸ»ç¿¡ ³ªÅ¸³³´Ï´Ù. ', # (Çʼö) # (Çʼö) # ÁöºÒÀÇ ¼º°Ý¿¡ ´ëÇÑ °£·«ÇÑ ¼³¸í ÀÌ°ÍÀº ¼ö½ÅÀÚÀÇ ÀºÇà ¸í¼¼¼¿¡ APPER°¡ µÉ °ÍÀÔ´Ï´Ù. DETRING_DESCRIPTION =>'TV-TELCOM ', # (Çʼö) ¸ñÀûÁö =>'123123123 ', destination_name =>'Commerce Bank ' ', # (Çʼö) Origin =>'12312311 ', origin_name =>'mycompany ', # (¼±ÅÃÀû) Company_Note =>'Bill ', # (¼±Åà »çÇ×) yymmdd',}}; # @samples = $ ACH-> sample_detail_records () ¸î °¡Áö »ùÇà ¼¼ºÎ Á¤º¸ ·¹Äڵ带 Æ÷ÇÔÇß½À´Ï´Ù. # ºôµå ÆÄÀÏ ¸Ó¸®±Û ·¹ÄÚµå $ ACH-> make_file_header_record (); # À¥ Ç׸ñ¿¡ ´ëÇÑ ¹èÄ¡ ºôµå $ ACH-> set_entry_class_code ( 'À¥'); $ ach-> make_batch (@samples); # $ ACH-> SET_ENTRY_CLASS_CODE ( 'TEL')¿¡ ´ëÇÑ ÀüÈ Ç׸ñ¿¡ ´ëÇÑ ¹èÄ¡ ºôµå $ ach-> make_batch (@samples); # ºôµå ÆÄÀÏ Á¦¾î ·¹ÄÚµå $ ACH-> make_file_control_record (); $ ACH-> TO_STRING Àμâ; ¿ä±¸ »çÇ× : ¡¤ Perl. Á¦ÇÑ »çÇ× : ¡¤ ACH Çü½Ä ¸¸ Áö¿øÇÕ´Ï´Ù.
Ach :: Builder. °ü·Ã ¼ÒÇÁÆ®¿þ¾î