List of commits:
Subject Hash Author Date (UTC)
Update tpl library for EFT Bank File Creation with workaround for amounts 91dab2d3618b99b8758bf65d58cd8facc6df08ff gbg 2014-03-03 07:29:21
d2561 a3d2e47f82c1e0d9b245391d8e9cebec9a900afd gbg 2014-02-21 04:33:43
d2561 46df2f4ab87f400e7d20dfb31faf448d396f04fa gbg 2014-02-21 03:35:00
d2561 5614d485d8c4bcfd6402d6df9f1edbd4d8371305 gbg 2014-02-21 03:23:35
d2561 732b3761194e0c0783b9f31ae2df7541bdcd598f gbg 2014-02-21 01:12:15
d2561 b4b13a6ba9792b545ab63e8dfd600253e321c163 gbg 2014-02-21 00:51:11
d2561 df49e7e8ba5529218cb6c78a3bcaa11b6810830e gbg 2014-02-21 00:44:04
d2561 1ea4b24c354f3797da29ffba02870e0ff674a4d8 gbg 2014-02-21 00:28:48
d2561 377b24a944d64666775de8306b607fb8c9e524ae gbg 2014-02-21 00:00:44
d2561 ddcc8ed0c739b426768a8caf646260bfb008a1d9 gbg 2014-02-20 15:01:12
update 3cb83d589cf9081322366ee4eb38c0df910837f2 gbg 2013-12-20 08:35:41
Initial Load for Buderim Ginger e79fcfa36e7a9a80e19b84d121e99b53397dd5ba gbg 2013-12-18 03:24:58
Commit 91dab2d3618b99b8758bf65d58cd8facc6df08ff - Update tpl library for EFT Bank File Creation with workaround for amounts
Author: gbg
Author date (UTC): 2014-03-03 07:29
Committer name: gbg
Committer date (UTC): 2014-03-03 07:29
Parent(s): a3d2e47f82c1e0d9b245391d8e9cebec9a900afd
Signer:
Signing key:
Signing status: N
Tree: 69d9534bd86a61a90fe0b57d6918f65f696ae7d3
File Lines added Lines deleted
mfg/2013/base/src/dollartocent 42 0
mfg/2013/base/src/soiv1002.p 1 1
File mfg/2013/base/src/dollartocent added (mode: 100644) (index 0000000..2335c57)
1 define output parameter o_result_value as character.
2 define shared variable global_domain as character.
3 define shared variable ecom_domain as character.
4
5 define variable result_value as character.
6
7 define shared temp-table tt_params no-undo
8 field tt_pm_seq as integer
9 field tt_pm_param_value as character
10 index tt_pm_seq is primary unique
11 tt_pm_seq.
12
13 define shared temp-table tt_ht no-undo
14 field tt_ht_f1 as character
15 field tt_ht_f2 as character
16 field tt_ht_f3 as character
17 field tt_ht_f4 as character
18 field tt_ht_f5 as character
19 field tt_ht_f6 as character
20 field tt_ht_f7 as character
21 field tt_ht_f8 as character
22 field tt_ht_f9 as character
23 field tt_ht_f10 as character
24 field tt_ht_seq as int64
25 field tt_loop_stack as character
26 field tt_curr_loop_level as integer
27 index tt_ht_idx1 is unique primary
28 tt_ht_f1 tt_ht_f2 tt_ht_f3 tt_ht_f4 tt_ht_f5
29 tt_ht_f6 tt_ht_f7 tt_ht_f8 tt_ht_f9 tt_ht_f10.
30
31 define shared variable trgt_domain like global_domain no-undo.
32
33 define variable camount as character.
34 for first tt_params where tt_params.tt_pm_seq = 1 no-lock: end.
35 camount = string(tt_params.tt_pm_param_value).
36
37
38 result_value = trim(string(round(100 * decimal(camount), 0), "9999999999")).
39
40
41
42 o_result_value = string(result_value).
File mfg/2013/base/src/soiv1002.p changed (mode: 100644) (index a3effe3..6dad54f)
... ... do:
757 757 hdr_call to 64 no-label hdr_call to 64 no-label
758 758 getTermLabelRtColon("REMARKS",15) format "x(15)" to 15 getTermLabelRtColon("REMARKS",15) format "x(15)" to 15
759 759 ih_rmks ih_rmks
760 " Sold-To Email:" format "x(15)" to 15
760 " Sold-To Email:" /* format "x(15)" */ to 15
761 761 vemail vemail
762 762 skip(1) skip(1)
763 763 with frame phead2 width 90. with frame phead2 width 90.
Hints:
Before first commit, do not forget to setup your git environment:
git config --global user.name "your_name_here"
git config --global user.email "your@email_here"

Clone this repository using HTTP(S):
git clone https://rocketgit.com/user/gbfg55/gbg-20-git

Clone this repository using ssh (do not forget to upload a key first):
git clone ssh://rocketgit@ssh.rocketgit.com/user/gbfg55/gbg-20-git

Clone this repository using git:
git clone git://git.rocketgit.com/user/gbfg55/gbg-20-git

You are allowed to anonymously push to this repository.
This means that your pushed commits will automatically be transformed into a merge request:
... clone the repository ...
... make some changes and some commits ...
git push origin main