2021-07-03 05:07:57 +01:00
<!DOCTYPE HTML>
< html >
< head >
< meta http-equiv = "Content-Type" content = "text/html;charset=US-ASCII" >
2021-12-11 11:10:58 +00:00
< meta name = "generator" content = "ZealOS V1.07" >
2021-07-03 05:07:57 +01:00
< style type = "text/css" >
2021-10-08 07:06:11 +01:00
body {background-color:#1f1f1f;}
.cF0{color:#e3e3e3;background-color:#1f1f1f;}
.cF1{color:#4f84a6;background-color:#1f1f1f;}
.cF2{color:#73a255;background-color:#1f1f1f;}
.cF3{color:#297582;background-color:#1f1f1f;}
.cF4{color:#b34f4b;background-color:#1f1f1f;}
.cF5{color:#8a52c3;background-color:#1f1f1f;}
.cF6{color:#b7822f;background-color:#1f1f1f;}
.cF7{color:#444444;background-color:#1f1f1f;}
.cF8{color:#6d6d6d;background-color:#1f1f1f;}
.cF9{color:#94bfde;background-color:#1f1f1f;}
.cFA{color:#a1ce97;background-color:#1f1f1f;}
.cFB{color:#6db4be;background-color:#1f1f1f;}
.cFC{color:#e88e88;background-color:#1f1f1f;}
.cFD{color:#ca94e8;background-color:#1f1f1f;}
.cFE{color:#d4b475;background-color:#1f1f1f;}
.cFF{color:#1f1f1f;background-color:#1f1f1f;}
2021-07-03 05:07:57 +01:00
< / style >
< / head >
< body >
2021-07-05 01:12:38 +01:00
< pre style = "font-family:monospace;font-size:12pt" >
2021-07-03 05:07:57 +01:00
< a name = "l1" > < / a > < span class = cF1 > U8< / span > < span class = cF0 > *bgt_string_file;
< a name = "l2" > < / a > < / span > < span class = cF1 > U8< / span > < span class = cF0 > *bgt_accts_file;
< a name = "l3" > < / a > < / span > < span class = cF1 > U8< / span > < span class = cF0 > *bgt_data_file;
< a name = "l4" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l5" > < / a > #< / span > < span class = cF1 > define< / span > < span class = cF0 > BE_NORMAL < / span > < span class = cFE > 0< / span > < span class = cF0 >
< a name = "l6" > < / a > #< / span > < span class = cF1 > define< / span > < span class = cF0 > BE_GAS < / span > < span class = cFE > 1< / span > < span class = cF0 >
< a name = "l7" > < / a > #< / span > < span class = cF1 > define< / span > < span class = cF0 > BE_ANNIVERSARY < / span > < span class = cFE > 2< / span > < span class = cF0 >
< a name = "l8" > < / a > #< / span > < span class = cF1 > define< / span > < span class = cF0 > BE_PRICE < / span > < span class = cFE > 3< / span > < span class = cF0 >
< a name = "l9" > < / a > #< / span > < span class = cF1 > define< / span > < span class = cF0 > BE_TEMPLATE_COPY < / span > < span class = cFE > 4< / span > < span class = cF0 >
2021-07-03 05:07:57 +01:00
< a name = "l10" > < / a >
< a name = "l11" > < / a > < / span > < span class = cF1 > extern< / span > < span class = cF0 > < / span > < span class = cF1 > class< / span > < span class = cF0 > CBgtTemplate;
< a name = "l12" > < / a >
< a name = "l13" > < / a > < / span > < span class = cF1 > class< / span > < span class = cF0 > CBgtEntry
< a name = "l14" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l15" > < / a > CBgtEntry *next, *last;
2021-07-03 05:07:57 +01:00
< a name = "l16" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l17" > < / a > < / span > < span class = cF1 > U0< / span > < span class = cF0 > < / span > < span class = cF1 > start< / span > < span class = cF0 > ;
< a name = "l18" > < / a > < / span > < span class = cF9 > CDate< / span > < span class = cF0 > date;
< a name = "l19" > < / a > < / span > < span class = cF9 > U16< / span > < span class = cF0 > type, flags;
< a name = "l20" > < / a > < / span > < span class = cF9 > U32< / span > < span class = cF0 > credit_idx, debit_idx, desc_idx;
< a name = "l21" > < / a > < / span > < span class = cF1 > F64< / span > < span class = cF0 > amount;
< a name = "l22" > < / a > < / span > < span class = cF1 > U0< / span > < span class = cF0 > < / span > < span class = cF1 > end< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l23" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l24" > < / a > < / span > < span class = cF1 > U8< / span > < span class = cF0 > *credit, *debit, *desc;
< a name = "l25" > < / a > CBgtTemplate *template;
< a name = "l26" > < / a > < / span > < span class = cF9 > CDocEntry< / span > < span class = cF0 > *doc_e;
2021-07-03 05:07:57 +01:00
< a name = "l27" > < / a >
< a name = "l28" > < / a > } b_head;
< a name = "l29" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l30" > < / a > #< / span > < span class = cF1 > define< / span > < span class = cF0 > BE_SIZE (< / span > < span class = cF1 > offset< / span > < span class = cF7 > (< / span > < span class = cF0 > CBgtEntry.< / span > < span class = cF1 > end< / span > < span class = cF7 > )< / span > < span class = cF0 > - < / span > < span class = cF1 > offset< / span > < span class = cF7 > (< / span > < span class = cF0 > CBgtEntry.< / span > < span class = cF1 > start< / span > < span class = cF7 > )< / span > < span class = cF0 > )
2021-07-03 05:07:57 +01:00
< a name = "l31" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l32" > < / a > #< / span > < span class = cF1 > define< / span > < span class = cF0 > BT_NULL < / span > < span class = cFE > 0< / span > < span class = cF0 >
< a name = "l33" > < / a > #< / span > < span class = cF1 > define< / span > < span class = cF0 > BT_INTERVAL < / span > < span class = cFE > 1< / span > < span class = cF0 >
< a name = "l34" > < / a > #< / span > < span class = cF1 > define< / span > < span class = cF0 > BT_MONTHLY < / span > < span class = cFE > 2< / span > < span class = cF0 >
2021-07-03 05:07:57 +01:00
< a name = "l35" > < / a > #< / span > < span class = cF1 > define< / span > < span class = cF0 > BT_BIMONTHLY < / span > < span class = cFE > 3< / span > < span class = cF0 >
< a name = "l36" > < / a > #< / span > < span class = cF1 > define< / span > < span class = cF0 > BT_SEMIANNUAL < / span > < span class = cFE > 4< / span > < span class = cF0 >
2021-07-04 23:11:34 +01:00
< a name = "l37" > < / a > #< / span > < span class = cF1 > define< / span > < span class = cF0 > BT_ANNUAL < / span > < span class = cFE > 5< / span > < span class = cF0 >
2021-07-03 05:07:57 +01:00
< a name = "l38" > < / a >
< a name = "l39" > < / a > < / span > < span class = cF5 > DefineListLoad< / span > < span class = cF0 > (< / span > < span class = cF6 > " ST_BGT_TEMPLATE_TYPES" < / span > < span class = cF0 > , < / span > < span class = cF6 > " Null\0Interval\0Monthly\0Bimonthly\0Semiannual\0Annual\0" < / span > < span class = cF0 > );
< a name = "l40" > < / a >
< a name = "l41" > < / a > < / span > < span class = cF1 > class< / span > < span class = cF0 > CBgtTemplate
< a name = "l42" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l43" > < / a > CBgtTemplate *next, *last;
2021-07-03 05:07:57 +01:00
< a name = "l44" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l45" > < / a > < / span > < span class = cF1 > U0< / span > < span class = cF0 > < / span > < span class = cF1 > start< / span > < span class = cF0 > ;
< a name = "l46" > < / a > < / span > < span class = cF9 > U16< / span > < span class = cF0 > type format < / span > < span class = cF6 > " $LS,D=\" ST_BGT_TEMPLATE_TYPES\" $\n" < / span > < span class = cF0 > ;
< a name = "l47" > < / a > < / span > < span class = cF9 > U16< / span > < span class = cF0 > flags;
< a name = "l48" > < / a > < / span > < span class = cF1 > U8< / span > < span class = cF0 > start_date[< / span > < span class = cFE > 16< / span > < span class = cF0 > ] format < / span > < span class = cF6 > " $DA-P,A=\" Start Date:%s\" $\n" < / span > < span class = cF0 > ;
< a name = "l49" > < / a > < / span > < span class = cF1 > U8< / span > < span class = cF0 > end_date[< / span > < span class = cFE > 16< / span > < span class = cF0 > ] format < / span > < span class = cF6 > " $DA-P,A=\" End Date :%s\" $\n" < / span > < span class = cF0 > ;
< a name = "l50" > < / a > < / span > < span class = cF1 > F64< / span > < span class = cF0 > period format < / span > < span class = cF6 > " $DA,A=\" Period :%8.2f\" $\n" < / span > < span class = cF0 > ;
< a name = "l51" > < / a > < / span > < span class = cF1 > U0< / span > < span class = cF0 > < / span > < span class = cF1 > end< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l52" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l53" > < / a > CBgtEntry b;
2021-07-03 05:07:57 +01:00
< a name = "l54" > < / a >
< a name = "l55" > < / a > } t_head;
< a name = "l56" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l57" > < / a > #< / span > < span class = cF1 > define< / span > < span class = cF0 > BT_SIZE (< / span > < span class = cF1 > offset< / span > < span class = cF7 > (< / span > < span class = cF0 > CBgtTemplate.< / span > < span class = cF1 > end< / span > < span class = cF7 > )< / span > < span class = cF0 > - < / span > < span class = cF1 > offset< / span > < span class = cF7 > (< / span > < span class = cF0 > CBgtTemplate.< / span > < span class = cF1 > start< / span > < span class = cF7 > )< / span > < span class = cF0 > )
2021-07-03 05:07:57 +01:00
< a name = "l58" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l59" > < / a > < / span > < span class = cF1 > U8< / span > < span class = cF0 > view_acct[< / span > < span class = cFE > 512< / span > < span class = cF0 > ];
< a name = "l60" > < / a > < / span > < span class = cF9 > CHashTable< / span > < span class = cF0 > *accts_table = < / span > < span class = cF3 > NULL< / span > < span class = cF0 > ;
< a name = "l61" > < / a > < / span > < span class = cF9 > I64< / span > < span class = cF0 > accts_table_strs = < / span > < span class = cFE > 0< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l62" > < / a >
< a name = "l63" > < / a > < / span > < span class = cF9 > CDate< / span > < span class = cF0 > MyStr2Date(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *st)
< a name = "l64" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l65" > < / a > < / span > < span class = cF9 > CDateStruct< / span > < span class = cF0 > ds;
< a name = "l66" > < / a > < / span > < span class = cF9 > CDate< / span > < span class = cF0 > res;
2021-07-03 05:07:57 +01:00
< a name = "l67" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l68" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (st & & *st)
< a name = "l69" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l70" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (< / span > < span class = cF5 > StrOcc< / span > < span class = cF7 > (< / span > < span class = cF0 > st, < / span > < span class = cF6 > '['< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l71" > < / a > res = b_head.next-> date;
< a name = "l72" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 > < / span > < span class = cF1 > if< / span > < span class = cF0 > (< / span > < span class = cF5 > StrOcc< / span > < span class = cF7 > (< / span > < span class = cF0 > st, < / span > < span class = cF6 > ']'< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l73" > < / a > res = b_head.last-> date;
< a name = "l74" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l75" > < / a > res = < / span > < span class = cF5 > Str2Date< / span > < span class = cF0 > (st);
< a name = "l76" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l77" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l78" > < / a > res = < / span > < span class = cF5 > Now< / span > < span class = cF0 > ;
< a name = "l79" > < / a > < / span > < span class = cF5 > Date2Struct< / span > < span class = cF0 > (& ds, res);
< a name = "l80" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (ds.year > < / span > < span class = cFE > 2050< / span > < span class = cF0 > )
< a name = "l81" > < / a > ds.year -= < / span > < span class = cFE > 100< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l82" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l83" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF5 > Struct2Date< / span > < span class = cF0 > (& ds);
2021-07-03 05:07:57 +01:00
< a name = "l84" > < / a > }
< / span > < / pre > < / body >
< / html >
