[FogBugz #152] Pour ajuster la date de réadhésion #214

Open
opened 2023-07-03 23:44:40 +02:00 by fbenoist68 · 5 comments

Assigned To: Frederik Benoist
Project: CAISSE
Area: awcaisse
Category: Fonctionnalité
Priority: A fixer impérativement

Assigned To: Frederik Benoist Project: CAISSE Area: awcaisse Category: Fonctionnalité Priority: A fixer impérativement
Poster
Owner

Event ID: 709
Date: 2013-10-01T16:08:33Z
Person: Frederik Benoist
Description: Modifié par Frederik Benoist

Ajout de mois_avant_fin_adhesion dans carte_fidelite_type

Event ID: 709 Date: 2013-10-01T16:08:33Z Person: Frederik Benoist Description: Modifié par Frederik Benoist <p> Ajout de mois_avant_fin_adhesion dans carte_fidelite_type</p>
Poster
Owner

Event ID: 708
Date: 2013-10-01T15:07:13Z
Person: Frederik Benoist
Description: Modifié par Frederik Benoist

 

L'ancienne date de réadhésion est dans

vTicketEntete.pCarteFideliteChoisie.pDateFinAdhesion

Event ID: 708 Date: 2013-10-01T15:07:13Z Person: Frederik Benoist Description: Modifié par Frederik Benoist <p> &nbsp;</p> <p> L&#39;ancienne date de r&eacute;adh&eacute;sion est dans</p> <p> vTicketEntete.pCarteFideliteChoisie.pDateFinAdhesion</p>
Poster
Owner

Event ID: 707
Date: 2013-10-01T15:06:35Z
Person: Frederik Benoist
Description: Modifié par Frederik Benoist

C:\projets\DotSoft\CaisseAuto\bImpression\cGenereXml.vb

 

Atr = Me.vXml.CreateAttribute("validitecarte")

If Me.vTicketLignes.pHasProduitAdhesion(Me.vTicketEntete.pCarteFideliteTypeChoisi) Then

Dim dateFinAdhesion As Date = bApplication.cApplication.pDateOuvertureCaisse.AddDays(-bApplication.cApplication.pDateOuvertureCaisse.Day + 1).AddMonths(Me.vTicketEntete.pCarteFideliteChoisie.pDureeAdhesion + 1).AddDays(-1).Date

Atr.Value = cLangueService.pCaisse.mLireLibelle("cGenereXml", "validite", "*Valable jusqu'au ") & dateFinAdhesion

Else

Atr.Value = cLangueService.pCaisse.mLireLibelle("cGenereXml", "validite", "*Valable jusqu'au ") & Me.vTicketEntete.pCarteFideliteChoisie.pDateFinAdhesion.Date

End If

Xmle.Attributes.Append(Atr)

Event ID: 707 Date: 2013-10-01T15:06:35Z Person: Frederik Benoist Description: Modifié par Frederik Benoist <p> C:\projets\DotSoft\CaisseAuto\bImpression\cGenereXml.vb</p> <p> &nbsp;</p> <p> Atr = Me.vXml.CreateAttribute(&quot;validitecarte&quot;)</p> <p> If Me.vTicketLignes.pHasProduitAdhesion(Me.vTicketEntete.pCarteFideliteTypeChoisi) Then</p> <p> Dim dateFinAdhesion As Date = bApplication.cApplication.pDateOuvertureCaisse.AddDays(-bApplication.cApplication.pDateOuvertureCaisse.Day + 1).AddMonths(Me.vTicketEntete.pCarteFideliteChoisie.pDureeAdhesion + 1).AddDays(-1).Date</p> <p> Atr.Value = cLangueService.pCaisse.mLireLibelle(&quot;cGenereXml&quot;, &quot;validite&quot;, &quot;*Valable jusqu&#39;au &quot;) &amp; dateFinAdhesion</p> <p> Else</p> <p> Atr.Value = cLangueService.pCaisse.mLireLibelle(&quot;cGenereXml&quot;, &quot;validite&quot;, &quot;*Valable jusqu&#39;au &quot;) &amp; Me.vTicketEntete.pCarteFideliteChoisie.pDateFinAdhesion.Date</p> <p> End If</p> <p> Xmle.Attributes.Append(Atr)</p>
Poster
Owner

Event ID: 706
Date: 2013-10-01T15:06:00Z
Person: Frederik Benoist
Description: Attribué à Frederik Benoist par Frederik Benoist

Event ID: 706 Date: 2013-10-01T15:06:00Z Person: Frederik Benoist Description: Attribué à Frederik Benoist par Frederik Benoist
Poster
Owner

Event ID: 705
Date: 2013-10-01T15:06:00Z
Person: Frederik Benoist
Description: Ouvert par Frederik Benoist

Event ID: 705 Date: 2013-10-01T15:06:00Z Person: Frederik Benoist Description: Ouvert par Frederik Benoist
Sign in to join this conversation.
No Label
No Milestone
No project
No Assignees
1 Participants
Notifications
Due Date
The due date is invalid or out of range. Please use the format 'yyyy-mm-dd'.

No due date set.

Dependencies

No dependencies set.

Reference: fbenoist68/mobileportal#214
There is no content yet.