private void WriteRegistroI155(TRegistroI150 RegI150) { int intFor; if (Assigned(RegI150.RegistroI155)) { for (intFor = 0; intFor <= RegI150.RegistroI155.Count - 1; intFor++) { using (RegI150.RegistroI155.Items[intFor]){ Check(((IND_DC_INI == "D") || (IND_DC_INI == "C") || (IND_DC_INI == "")), "(I-I155) No Indicador da situa??o do saldo inicial, deve ser informado: D ou C ou nulo!"); Check(((IND_DC_FIN == "D") || (IND_DC_FIN == "C") || (IND_DC_FIN == "")), "(I-I155) No Indicador da situa??o do saldo inicial, deve ser informado: D ou C ou nulo!"); // / AppendText(LFill("I155") + LFill(COD_CTA) + LFill(COD_CCUS) + LFill(VL_SLD_INI, 19, 2) + LFill(IND_DC_INI, 0) + LFill(VL_DEB, 19, 2) + LFill(VL_CRED, 19, 2) + LFill(VL_SLD_FIN, 19, 2) + LFill(IND_DC_FIN, 0) ); } FRegistroI990.QTD_LIN_I = FRegistroI990.QTD_LIN_I + 1; } FRegistroI155Count = FRegistroI155Count + RegI150.RegistroI155.Count; } }
private void WriteRegistroI151(TRegistroI150 RegI150) { int intFor; if (Assigned(RegI150.RegistroI151)) { for (intFor = 0; intFor <= RegI150.RegistroI151.Count - 1; intFor++) { using (RegI150.RegistroI151.Items[intFor]){ // / AppendText(LFill("I151") + LFill(ASSIM_DIG) ); } FRegistroI990.QTD_LIN_I = FRegistroI990.QTD_LIN_I + 1; } FRegistroI151Count = FRegistroI151Count + RegI150.RegistroI151.Count; } }