csv-maker

My Computer Programs 2014/11/18 23:30

Converts text file to CSV file.

 

Arc:

 

(prn "CSV maker")
(pr "File name (.txt): ")
(= in-file-name (readline))
(= out-file-name (string in-file-name ".csv"))
(= in-file (infile in-file-name))
(= out-file (outfile out-file-name))

(= separate-after '(3 5)) ; edit this line

(while (= s (readline in-file))
 (= l (len s))
 (= str "")
 (for i 0 l
     (= str (string str (newstring 1 (s i))))
  (if (find i separate-after) (= str (string str ","))))
 (disp str out-file)
 (writeb 10 out-file))

(close out-file)
(close in-file)
(prn "Wrote " out-file-name)

 

 

Posted by steloflute

To start the mode automatically in `foo-mode', add the following to your init file:

(add-hook 'foo-mode-hook #'rainbow-delimiters-mode)

To start the mode automatically in most programming modes (Emacs 24 and above):

(add-hook 'prog-mode-hook #'rainbow-delimiters-mode)
Posted by steloflute

http://kin.naver.com/open100/detail.nhn?d1id=4&dirId=403&docId=1270403&qb=7Iug7KO8IOuwnO2WiSDtmozqs4Qg7LKY66as&enc=utf8&section=kin&rank=1&search_sort=0&spq=0

 

주식회사가 회사의 설립 시 또는 설립 후 필요에 따라서 주식을 발행하여 자기자본을 조달 한다.

주식의 발행 방법에는 평가발행, 할인발행, 할증발행이 있으며,

주금의 납입 방법에 따라 현금발행, 청약에 의한 발행, 현물출자 등 다양한 방법이 있다.

1. 개념정의

평가발행: 주식의 발행시 액면금으로 발행하는 방법

② 할증발행: 주식의 발생시 액면금액을 초과하여 발행하는 방법

③ 할인발행: 주식발행시 액면가액 이하로 발행하는 방법.

④ 주식의 액면의 의미: 기업의 법정자본금을 의미할 뿐이지

주식의 시장가격이나 주주가 실제 불입하는 금액을 나타내는 것은 아니다.

2. 주식의 현금발행

주식의 발행가액

즉, 주금을 현금으로 바로 입금하고 즉시 주식을 발행하는 방법

[회계처리]

1. 액면발행(액면가 1,000, 보통주식 1,000주 발행)의 회계처리 * 신주발행비 무시

현 금

1,000,000

자본금

1,000,000

2. 할증발행(액면가 1,000, 보통주식 1,000주를 1,200원으로 할증발행)의 회계처리

현 금

1,200,000

자본금
주식발행초과금

1,000,000
200,000

3. 할인발행(액면가 1,000, 보통주식 1,000주를 800원에 할인발행)의 회계처리

현 금
주식할인발행차금

800,000
200,000

자본금

1,000,000

3 현물출자

일반적으로 주식 발행 시 그 대금을 현금으로 납입하는 것이 원칙이나

예외적으로 현금 이외의 자산으로 납입하는 경우가 있는데, 이를 현물출자라고 한다.

현물출자의 경우 출자 받은 현물과 주식의 평가문제가 발생하는데, 이때 평가는 현물출자로 취득한 자산의 가액은 공정가액을 취득원가로 하여 회계 처리한다.

[회계처리]

액면가 1,000, 보통주식 1,000주를 발행하고 주금은 공정가치는 1,200,000 토지로 현물출자 받다

토지

1,200,000

자본금
주식발행초과금

1,000,000
200,000

4. 일반공모로 청약에 의한 주식발행

청약에 의한 주식발행이란 주식 청약 시에 계약금만 지급하고 잔액은 미래에 일정시점까지 지불할 것을 서명날인하고 청약가격이 완전히 납입된 후에 주식이 발행되는 것을 말한다.

[회계처리]

액면가 1,000, 보통주식 1,000주를 1,200발행하기로 하고 증거금으로 발행가액의 10%를 받다.

①. 주식청약일

현 금

120,000

신주청약증거금

120,000

②. 잔금납입 및 주식발행일

현금
신주청약증거금

1,080,000
120,000

자본금
주식발행초과금

1,000,000
200,000

5 신주발행비의 회계처리

신주발행비란

주식의 발행과 관련하여 직접적으로 발생한 비용으로서 주주모집을 위한 광고비, 증권인쇄비, 증권회사수수료 등이 여기에 해당된다.

이러한 신주발행비는 주식의 발행가액에서 차감하여 처리한다.

[회계처리]

①. 할증발행 시 신주발행비의 회계처리

주식발행초과금

1,000

현금

1,000

②. 액면발행, 할인발행 시 신주발행비의 회계처리

주식할인발행차금

1,000

현금

1,000

6 주식할인발행 차금과 주식발행초과금의 처리

①. 주식발행초과금: 주주의 액면을 초과 납부한 자본으로 자본잉여금을 구성하며,

자본전입 또는 결손보전등으로 사용이 가능하다.

②. 주식할인발행차금: 주주의 액면을 미달하여 납부한 자본금의 부족분으로 자본조정사항을 구성하며,

3년내 균등액 이상으로 상각하고

"주할인발행차금상각"은 잉여금처분사항으로 처리한다.

단, 결손에 의한 처분가능한 이익이 없는 경우는 차기이후에 상각 할 수 있으며,

차기이후의 상각시에는 전기상각 부족분과 당기상각분을 합하여 상각한다.

[회계처리]

주식할인발행차금

상각

333

주식할인발행차금

333

 

 

Posted by steloflute


Generate bitcoin for me

What's this?

티스토리 툴바