IBY778PR ;AITC/CKB PRE-Installation for IB patch 778; MAR 18, 2024
Source file <IBY778PR.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRE | ; pre-install
|
|
| PREX | ;
|
|
| TQTIMING(IBXPD) | ; Update the entries in the TQ file #365.1 where the TRANSMISSION STATUS (#.04)
; is set to (2)'Transmitted' with the GROUP NUMBER from the Patient record (#2.312) |
|
| UPDTQ(IBXPD) | ; Update the entries in the TQ file #365.1 to include the GROUP NUMBER #1.03
; get the GROUP NUMBER from the corresponding Buffer #355.33 entry when possible |
|
| CHKPAT | ; Check the Patient Record for existence of a Group Number
|
|
| ADDGRP | ;Add GROUP NUMBER (#1.03) to the entry in the TQ file (#365.1)
|
| Name | Field # of Occurrence |
|---|---|
| ^DIE | ADDGRP+3 |
| $$GET1^DIQ | TQTIMING+13, TQTIMING+15, UPDTQ+20, UPDTQ+23, UPDTQ+25, UPDTQ+37, UPDTQ+44, UPDTQ+47, CHKPAT+2, CHKPAT+8 , CHKPAT+17, CHKPAT+23 |
| $$SITE^VASITE | PRE+6 |
| BMES^XPDUTL | PRE+10, PRE+19, TQTIMING+5, TQTIMING+7, TQTIMING+24, TQTIMING+25, UPDTQ+8, UPDTQ+10, UPDTQ+60, UPDTQ+61 |
| MES^XPDUTL | PRE+8, PRE+20, TQTIMING+6, TQTIMING+8, TQTIMING+26, UPDTQ+9, UPDTQ+11, UPDTQ+62 |
| FileNo | Call Tags |
|---|---|
| 2.312 | GET1^DIQ |
| ^IBA(355.3 - [#355.3] | GET1^DIQ |
| ^IBA(355.33 - [#355.33] | GET1^DIQ |
| ^IBCN(365 - [#365] | GET1^DIQ |
| ^IBCN(365.1 - [#365.1] | Classic Fileman Calls, GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | CHKPAT+13 |
| ^IBA(355.33 - [#355.33] | UPDTQ+14, UPDTQ+15, UPDTQ+17 |
| ^IBCN(365 - [#365] | UPDTQ+29, UPDTQ+32 |
| ^IBCN(365.1 - [#365.1] | TQTIMING+11 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | ADDGRP+1~, ADDGRP+3* |
| DIE | ADDGRP+1~, ADDGRP+3* |
| DR | ADDGRP+1~, ADDGRP+2* |
| IBBUFDA | UPDTQ+6~, UPDTQ+15*, UPDTQ+17, UPDTQ+20, UPDTQ+23, UPDTQ+25, UPDTQ+29, UPDTQ+32 |
| IBCNDT | UPDTQ+6~, UPDTQ+14*, UPDTQ+15 |
| IBCT | PRE+2~, UPDTQ+13*, UPDTQ+56*, UPDTQ+60 |
| IBERR | TQTIMING+3~, TQTIMING+10*, TQTIMING+19, UPDTQ+6~, UPDTQ+13*, UPDTQ+53, CHKPAT+4*, CHKPAT+10*, CHKPAT+13*, CHKPAT+19* |
| IBGPIEN | TQTIMING+3~, UPDTQ+6~, CHKPAT+17*, CHKPAT+19, CHKPAT+23 |
| IBGRPNUM | TQTIMING+3~, UPDTQ+6~, UPDTQ+25*, CHKPAT+23*, ADDGRP+2 |
| IBINSIEN | TQTIMING+3~, UPDTQ+6~, CHKPAT+8*, CHKPAT+10, CHKPAT+13, CHKPAT+17 |
| IBPAT | TQTIMING+3~, UPDTQ+6~, CHKPAT+2*, CHKPAT+4, CHKPAT+13, CHKPAT+17 |
| IBRESDA | UPDTQ+6~, UPDTQ+32*, UPDTQ+34, UPDTQ+37 |
| IBTCT | PRE+2~, TQTIMING+3~, TQTIMING+10*, TQTIMING+22*, TQTIMING+24 |
| IBTQDA | TQTIMING+3~, TQTIMING+11*, TQTIMING+13, TQTIMING+15, UPDTQ+6~, UPDTQ+37*, UPDTQ+39, UPDTQ+44, UPDTQ+47, CHKPAT+2 , CHKPAT+8, ADDGRP+3 |
| IBXPD | PRE+2~, TQTIMING~, TQTIMING+4*, TQTIMING+5, TQTIMING+25, UPDTQ~, UPDTQ+7*, UPDTQ+8, UPDTQ+61 |
| SITE | PRE+2~, PRE+6* |
| SITENAME | PRE+2~, PRE+6*, PRE+10, PRE+19 |
| SITENUM | PRE+2~, PRE+6*, PRE+10, PRE+19 |
| U | PRE+6 |
| XPDIDTOT | PRE+2~, PRE+4*, TQTIMING+4*, TQTIMING+5, TQTIMING+25, UPDTQ+7*, UPDTQ+8, UPDTQ+61 |
