can somebody add color to parent name (red) ledger (blue) in TRIAL BALNCE

;;code ;------------------------
[#Part : GRP Explosion]
Lines : DSP AccLine
Repeat : DSP AccLine : GroupLedgerChildOfGroupName
Scroll:Vertical

Local:LineSP AccLineelete:Explode

Local:LineSP AccLine:Add:Explode:GRP Explosion: $$IsGroup AND (@@IsWkgCapItem OR @@GrpExplodableJeno)

Local:LineSP AccLineelete:space Top



[System : Formula]
GrpExplodableJeno : $$KeyExplode OR ##ExplodeFlag

;;

can somebody add color to parent name (red) ledger (blue) in TRIAL BALANCE

 

Code:

;;Try this

[#Part : GRP Explosion]
    Lines : DSP AccLine
    Repeat : DSP AccLine : GroupLedgerChildOfGroupName
    Scroll:Vertical
   
    Local: Line: DSP AccLine: Delete: Explode
    Local: Line: DSP AccLine: Add: Explode: GRP Explosion: $$IsGroup AND (@@IsWkgCapItem OR @@GrpExplodableJeno)
    Local: Line: DSP AccLine: Delete: space Top
    Local: Line: DSP AccLine: Border: Thin Bottom
   

[System : Formula]
    GrpExplodableJeno : $$KeyExplode OR ##ExplodeFlag
   
;;--------------------------   

[#Field: DSP DispName]
    Option:DSP DispNameOpt:##IsTrialBalance
   
    [!Field: DSP DispNameOpt]       
    Color: If $$IsLedger Then "Red" else If NOT $$IsEmpty:$ScrStyle then @@SV_VCHTYPE else +
                      If $$IsEmpty:$$ExplodeLevel then "Blue" else "Leaf Green"
                     
[#Field: DSP ClDrAmtA]   
    Option:DSP ClDrAmtAOpt:##IsTrialBalance
   
    [!Field: DSP ClDrAmtAOpt]
    Color: If $$IsLedger Then "Red" else If NOT $$IsEmpty:$ScrStyle then @@SV_VCHTYPE else +
                      If $$IsEmpty:$$ExplodeLevel then "Blue" else "Leaf Green"
                     
[#Field: DSP ClCrAmtA]   
    Option:DSP ClCrAmtAOpt:##IsTrialBalance
   
    [!Field: DSP ClCrAmtAOpt]
    Color: If $$IsLedger Then "Red" else If NOT $$IsEmpty:$ScrStyle then @@SV_VCHTYPE else +
                      If $$IsEmpty:$$ExplodeLevel then "Blue" else "Leaf Green"

 

yes !! thanks Sir