35 lines
1.0 KiB
Plaintext
35 lines
1.0 KiB
Plaintext
PALEBI_ServiceOperationCost soc;
|
|
|
|
ttsBegin;
|
|
while select forUpdate soc
|
|
where soc.PALEBI_ServiceOperationId == 'SO25-00012'
|
|
&& soc.TransDate >= mkDate(30, 7, 2025)
|
|
{
|
|
info(soc.PALEBI_ServiceOperationId);
|
|
|
|
soc.PALEBI_ServiceOperationId = 'SO25-00508';
|
|
soc.doUpdate();
|
|
}
|
|
ttsCommit;
|
|
|
|
PALEBI_ServiceOperationJournalDay sojd;
|
|
PALEBI_ServiceOperationJournalActivity soja;
|
|
|
|
ttsBegin;
|
|
while select forUpdate sojd
|
|
where sojd.PALEBI_ServiceOperationId == 'SO25-00012'
|
|
&& sojd.ServiceOperationJournalWeekRefRecId == 5637506838
|
|
{
|
|
while select forUpdate soja
|
|
where soja.ServiceOperationJournalDayRefRecId == sojd.RecId
|
|
{
|
|
soja.PALEBI_ServiceOperationId = 'SO25-00508';
|
|
soja.doUpdate();
|
|
}
|
|
|
|
sojd.PALEBI_ServiceOperationId = 'SO25-00508';
|
|
sojd.ServiceOperationJournalWeekRefRecId = 5637511336;
|
|
|
|
sojd.doUpdate();
|
|
}
|
|
ttsCommit; |