PowerHouse activity
James B. Byrne
byrnejb at harte-lyne.ca
Tue Aug 10 13:12:23 CDT 2021
I am revisiting some very old Quick code and I have a question every now and
then which I hope to bounce off someone else; who knows PowerHouse.
PowerHouse here is 8.39 running on MPE/iX 7.5pp5+?? and using Image plus a few
KSAM files.
In one of the older programs I am looking at I see this construct
ROCEDURE UPDATE
BEGIN
STARTLOG TRANSACTIONS
LOCK TRANSACTIONS FILE, TRANACCT FILE, TRANDETL FILE, &
WORK-ACCT FILE, DISBURSEMENT FILE, ITEM-DISB FILE, ITEMS FILE,&
DISB-ACCT FILE, ACCOUNTS FILE, REVENUE FILE
PUT NOTDELETED TRANSACTIONS
. . .
In another I see this:
PROCEDURE UPDATE
BEGIN
LOCK ACCOUNTS FILE , GL-ACRU FILE , REQUISITIONS FILE , &
REVENUE FILE , TRANACCT-IN FILE , TRANDETL FILE , &
TRANSACTIONS-IN FILE
;# Fetch and calculate accrued work-in-progress update immediately before PUT.
DO INTERNAL ACCRUED-COST
;# Despite its name STARTLOG actually begins a transaction block.
STARTLOG ACCOUNTS
. . .
Is there any significance in having the STARTLOG occur before the LOCK?
--
*** e-Mail is NOT a SECURE channel ***
Do NOT transmit sensitive data via e-Mail
Unencrypted messages have no legal claim to privacy
Do NOT open attachments nor follow links sent by e-Mail
James B. Byrne mailto:ByrneJB at Harte-Lyne.ca
Harte & Lyne Limited http://www.harte-lyne.ca
9 Brockley Drive vox: +1 905 561 1241
Hamilton, Ontario fax: +1 905 561 0757
Canada L8E 3C3
More information about the powerh-l
mailing list