IBY608PO ;ALB/KDM - POST-INSTALL FOR IB*2.0*608 ;13-DEC-2017
Source file <IBY608PO.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
RPT | ; Get all Insurance companies that have the 3.01- transmit electronically field blank or set to No.
|
|
; Send an email message to eBiz Rapid Response group with the report.
|
||
EMAILX | ;
|
|
UNSPACE(FLDX) | ; Eliminate spaces at the end of the field.
|
|
CMNCPT | ;Set CMN CPT CODES in IB System Parameters
|
|
CPTCD | ;
|
Name | Field # of Occurrence |
---|---|
$$FIND1^DIC | CMNCPT+6 |
UPDATE^DIE | CMNCPT+10 |
CLEAN^DILF | EMAILX+2 |
$$GET1^DIQ | RPT+7, RPT+10, RPT+11, RPT+12, RPT+13, RPT+14 |
$$SITE^VASITE | EMAIL+8 |
$$FMTE^XLFDT | EMAIL+15 |
$$NOW^XLFDT | EMAIL+15 |
SENDMSG^XMXAPI | EMAIL+48 |
BMES^XPDUTL | EMAIL+3 |
MES^XPDUTL | IBY608PO+10, IBY608PO+11, IBY608PO+13, IBY608PO+16, EMAIL+4, EMAIL+5, EMAILX+1, CMNCPT+1, CMNCPT+11 |
$$PROD^XUPROD | IBY608PO+15 |
FileNo | Call Tags |
---|---|
^DIC(36 - [#36] | GET1^DIQ |
^DIC(5 - [#5] | GET1^DIQ |
^ICPT - [#81] | FIND1^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(36 - [#36] | RPT+4, RPT+6 |
^IBE(350.9 - [#350.9] | CMNCPT+7 |
^TMP( | IBY608PO+9!, RPT+16*, EMAIL+21, EMAIL+23, EMAIL+24 |
^XMB("NETNAME" | EMAIL+14 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADDRESS | EMAIL+1~, EMAIL+26*, EMAIL+27, EMAIL+28 |
CITY | EMAIL+1~, EMAIL+26*, EMAIL+27, EMAIL+28 |
CODES | CMNCPT+2~, CMNCPT+3*, CMNCPT+4*, CMNCPT+5 |
CPTCD | CMNCPT+2~, CMNCPT+5*, CMNCPT+6 |
CPTIEN | CMNCPT+2~, CMNCPT+6*, CMNCPT+7, CMNCPT+9 |
CPTS | CMNCPT+2~, CMNCPT+4* |
DA | CMNCPT+2~ |
DATA | EMAIL+1~, EMAIL+24*, EMAIL+26, EMAIL+29, EMAIL+30 |
DIC | CMNCPT+2~ |
DIE | CMNCPT+2~ |
DR | CMNCPT+2~ |
DUZ | EMAIL+48 |
ERRMSG | CMNCPT+2~, CMNCPT+8! |
FDA | CMNCPT+2~, CMNCPT+8! |
FDA( | CMNCPT+9* |
FLDX | UNSPACE~, UNSPACE+2*, UNSPACE+3 |
FULLADD | EMAIL+1~, EMAIL+27*, EMAIL+28*, EMAIL+31 |
I | UNSPACE+1~, UNSPACE+2*, CMNCPT+2~, CMNCPT+4*, CMNCPT+5* |
IBA | IBY608PO+7~, IBY608PO+10!, IBY608PO+16! |
IBA(1 | IBY608PO+10*, IBY608PO+16* |
IBA(2 | IBY608PO+10*, IBY608PO+16* |
IBA(3 | IBY608PO+10*, IBY608PO+16* |
IBADDRESS | RPT+2~, RPT+9*, RPT+10*, RPT+16 |
IBCITY | RPT+2~, RPT+9*, RPT+11*, RPT+16 |
IBNAME | RPT+2~, RPT+3*, RPT+4*, RPT+6, RPT+16, EMAIL+1~, EMAIL+20*, EMAIL+21*, EMAIL+23, EMAIL+24 , EMAIL+25 |
IBNAMEX | EMAIL+1~, EMAIL+25*, EMAIL+31 |
IBPIEN | RPT+2~, RPT+5*, RPT+6*, RPT+7, RPT+10, RPT+11, RPT+12, RPT+14, RPT+16, EMAIL+1~ , EMAIL+22*, EMAIL+23*, EMAIL+24 |
IBSTATE | RPT+2~, RPT+9*, RPT+12*, RPT+13 |
INACTFLG | RPT+2~, RPT+9*, RPT+14*, RPT+15*, RPT+16, EMAIL+1~, EMAIL+29*, EMAIL+32 |
LN | EMAIL+1~, EMAIL+20*, EMAIL+31*, EMAIL+32, EMAIL+34*, EMAIL+35*, EMAIL+36*, EMAIL+37* |
MSG | EMAIL+1~ |
MSG( | EMAIL+31*, EMAIL+32*, EMAIL+34*, EMAIL+35*, EMAIL+36*, EMAIL+37* |
MSG(1 | EMAIL+11* |
MSG(2 | EMAIL+12* |
MSG(3 | EMAIL+13* |
MSG(4 | EMAIL+14* |
MSG(5 | EMAIL+15* |
MSG(6 | EMAIL+16* |
MSG(7 | EMAIL+17* |
MSG(8 | EMAIL+18* |
MSG(9 | EMAIL+19* |
RETIEN | CMNCPT+2~, CMNCPT+8! |
RNAME | IBY608PO+7~, IBY608PO+8*, IBY608PO+9, RPT+16, EMAIL+21, EMAIL+23, EMAIL+24 |
SITE | EMAIL+2~, EMAIL+8*, EMAIL+9 |
SITENAME | EMAIL+2~, EMAIL+8*, EMAIL+13 |
SITENO | EMAIL+2~, EMAIL+8*, EMAIL+13 |
SPACES | EMAIL+2~, EMAIL+7*, EMAIL+31, EMAIL+32 |
STATE | RPT+2~, RPT+9*, RPT+13*, RPT+16, EMAIL+2~, EMAIL+26*, EMAIL+27, EMAIL+28 |
STATION | EMAIL+2~, EMAIL+8*, EMAIL+13 |
SUBJ | EMAIL+2~, EMAIL+9*, EMAIL+10*, EMAIL+48 |
TOTAL | EMAIL+2~, EMAIL+20*, EMAIL+33*, EMAIL+35 |
TRANS | EMAIL+2~, EMAIL+30*, EMAIL+32 |
TRANSCD | EMAIL+2~ |
TRANSMIT | RPT+2~, RPT+7*, RPT+8, RPT+16 |
U | RPT+16, EMAIL+8, EMAIL+9, EMAIL+26, EMAIL+29, EMAIL+30, CMNCPT+4, CMNCPT+5 |
XMINSTR | EMAIL+2~, EMAIL+48 |
XMINSTR("FROM" | EMAIL+47* |
XMTO | EMAIL+2~, EMAIL+48 |
XMTO("VHAeBillingRR@domain.ext" | EMAIL+45* |
Name | Field # of Occurrence |
---|---|
$T(CPTCD+I | CMNCPT+4 |