I have a spreadsheet in the following format

JV DATE: 01/11/08 ACCT PRD: 7/8 BUDGET FY: 8 COMMENTS: CCIS FEES Dec-07

DEBIT DOC TOTAL: $ 33,432.00 CREDIT DOC TOTAL: $ 33,432.00

AC BS
TP FND AGY ORG DEBIT BK CREDIT ACCT
AMOUNT CD AMOUNT

01 737 098 A812 1001
X6
$ 1,404.00

02 737 098 A812 2521
$ 1,404.00

01 737 098 B822 1001
X6
$ 2,568.00

02 737 098 B822 2522
$ 2,568.00


I want to scrape these data to a mainframe screen look like the following:

,FUNCTION:, ,DOCID: ,JV,098,97000022262, ,01/29/08, ,01:44:48
PM,
,STATUS:,PEND2, ,BATID: , , , ,,ORG:, , ,001-002 OF
042
,H- ,JOURNAL VOUCHER INPUT FORM
,JV DATE: ACCTG PRD:, ,BUDGET FY:, ,,REVERSAL DATE:, ,
, ,
,ACTION:, , ,BUDGET OVERRIDE IND:, , ,COMMENTS:,DIRDEP1/9 ,
,DEBIT DOC TOTAL:, , ,CREDIT DOC TOTAL:, ,
,CALC DEBIT TOTAL:, , ,CALC CREDIT TOTAL:, ,
,AC ,SUB APPR ACTI OBJ SUB ,BS
,TP FND AGY ORG ORG UNIT VITY REV O/R ACCT
,-- --- --- ---- -- ---- ---- ---- -- ----
,JOB ,REPT I/G REF ,DEBIT ,BK ,VENDOR / PROVIDER
,NUMBER ,CATG FND AGY ,AMOUNT ,CD CODE ,NAME
,-------- ---- --- --- ------------- ,-- -------------------------------
,DESCRIPTION ,CREDIT AMOUNT
,------------------------- --------------
,01-,02,740,098,A814, , ,, , , ,2521,
, , , , , 79,160.61,, , , , ,
, , ,
,02-,01,740,098,A814, , ,, , , ,1001,
, , , , , ,,ZX, , , ,
, , 79,160.61,


I know that I need to use DDEPoke command. I already counted the position,
and field length of the numbers and strings. But as far as coding concern, I
am not so sure.
Any help is greately appreciated.