Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^AUTNINS

Package: Utility Tables

Global: ^AUTNINS


Information

FileMan FileNo FileMan Filename Package
9999999.18 INSURER Utility Tables

Description

Directly Accessed By Routines, Total: 499

Package Total Routines
Third Party Billing 254 ABMAPAS1    ABMAPASS    ABMAROL1    ABMAROLL    ABMCHOUS    ABMCHRPT    ABMDBADD    ABMDBDIC
ABMDBETA    ABMDBLK    ABMDCCL1    ABMDCCL2    ABMDE0A    ABMDE0X    ABMDE2    ABMDE2A
ABMDE2P    ABMDE2X    ABMDE2X4    ABMDE3    ABMDE4A    ABMDE4X    ABMDE5X    ABMDE8G
ABMDE9X    ABMDEADD    ABMDEBIL    ABMDECHK    ABMDEDIC    ABMDEFIP    ABMDEOK    ABMDES1
ABMDES24    ABMDES3    ABMDES4    ABMDESEL    ABMDESM    ABMDESM1    ABMDESMC    ABMDESMR
ABMDEVAR    ABMDF1    ABMDF11    ABMDF11X    ABMDF12A    ABMDF14A    ABMDF14C    ABMDF14D
ABMDF14X    ABMDF18A    ABMDF1A    ABMDF1B    ABMDF1C    ABMDF24    ABMDF25A    ABMDF26A
ABMDF27A    ABMDF27C    ABMDF27D    ABMDF27E    ABMDF27X    ABMDF28    ABMDF28Q    ABMDF28R
ABMDF28S    ABMDF28T    ABMDF28W    ABMDF28X    ABMDF28Y    ABMDF28Z    ABMDF29A    ABMDF29B
ABMDF29X    ABMDF2A    ABMDF2C    ABMDF2X    ABMDF34A    ABMDF34B    ABMDF34X    ABMDF35A
ABMDF35C    ABMDF35D    ABMDF35E    ABMDF35X    ABMDF3A    ABMDF3C    ABMDF3D    ABMDF3X
ABMDF4A    ABMDF51    ABMDFRA    ABMDFUTL    ABMDIPS    ABMDLBL    ABMDLBL1    ABMDLCK
ABMDLCK1    ABMDLCK2    ABMDMDB2    ABMDMEDB    ABMDPAY    ABMDPAY1    ABMDPAY2    ABMDPAYV
ABMDPST1    ABMDPST3    ABMDRAGE    ABMDRAL    ABMDRAL1    ABMDRAL2    ABMDRAP1    ABMDRAPP
ABMDRBR1    ABMDRBR2    ABMDRCHK    ABMDREL1    ABMDREL2    ABMDRHD    ABMDRPOL    ABMDRPR
ABMDRPR1    ABMDRPR2    ABMDRPT    ABMDRPT1    ABMDRPT2    ABMDRRB    ABMDRSEL    ABMDRSU
ABMDRSU2    ABMDRTX1    ABMDRTX2    ABMDRUN1    ABMDRUN2    ABMDRXC1    ABMDRXC2    ABMDSS
ABMDTCOV    ABMDTIMR    ABMDTIN1    ABMDTIN2    ABMDTINS    ABMDTX    ABMDTX0    ABMDTX1
ABMDTX3    ABMDTXPT    ABMDVCK1    ABMDVCK2    ABMDVST    ABMDVST4    ABMDVST5    ABMDVST6
ABME3BA0    ABME3DA0    ABME3DA1    ABME520A    ABME5L12    ABME5L2    ABME5L7    ABME5L9
ABME5N3    ABME5N4    ABME5NM1    ABME5REF    ABME5SV3    ABME630    ABME630A    ABME8L12
ABME8L2    ABME8L6    ABME8L7    ABME8L9    ABME8N3    ABME8N4    ABME8NM1    ABME8REF
ABMEAUTO    ABMEBA0    ABMEBDSP    ABMECDS2    ABMECDSP    ABMECS2    ABMEF10    ABMEF13
ABMEF15    ABMEF16    ABMEF17    ABMEF19    ABMEF20    ABMEF21    ABMEF22    ABMEF23
ABMEF31    ABMEF32    ABMEF33    ABMEH10    ABMEH15    ABMEH30    ABMEH31    ABMEHGRV
ABMELGCK    ABMEMCRC    ABMER10    ABMER20A    ABMER30    ABMER30A    ABMER95    ABMER99
ABMERGRV    ABMERINS    ABMERSND    ABMERUTL    ABMESTAT    ABMKIDS    ABMM2PVP    ABMMUEL1
ABMMUFC5    ABMMUFC6    ABMPOST9    ABMPPAD1    ABMPPAD2    ABMPPADJ    ABMPSAPI    ABMPST10
ABMPT262    ABMPTSMT    ABMPUEXT    ABMRDNY1    ABMRDNY2    ABMRMCRD    ABMRSCIN    ABMRSPI1
ABMRSPIN    ABMRSTI3    ABMRSTIN    ABMRSUBN    ABMRSVIN    ABMTALLY    ABMTPYMT    ABMUBLST
ABMUCUTL    ABMUEAPI    ABMUITIN    ABMUPTIN    ABMURCON    ABMURHD    ABMURREC    ABMUTLF
ABMUTLN    ABMUTLP    ABMUTLP2    ABMUUTL    ABMZBDIC    ABMZIPS    
IHS Patient Registration 43 AG71A1    AG71A2    AG71A3    AG71A4    AG71A5    AGDATA    AGED4A    AGED4A1
AGED7B    AGEDCHEK    AGEDERR1    AGEDERR3    AGEDPRVB    AGEL    AGEL1    AGEL2
AGELA    AGEROVR    AGFACE5    AGFACE7    AGINS    AGINSUPD    AGMCDP    AGMCDPC
AGMCDPCM    AGMCDPN    AGMCRP4    AGMSP1    AGMSP2    AGMSP4    AGMSP5    AGMSP6
AGRPTINS    AGRPTPRV    AGTMIMRG    AGTMPC    AGTMPI    AGTMPMRG    AGTMPP    AGTMPPOL
AGTXALL    AGUPCHK    AGUTL    
Third Party Tracking 43 ABPAAGE1    ABPAAGE2    ABPAAGEL    ABPAAGS1    ABPAALK1    ABPAALK2    ABPACDF1    ABPACKLK
ABPACKS0    ABPACLG4    ABPACLG8    ABPACLG9    ABPADETC    ABPADIN    ABPAEEC0    ABPAEEC1
ABPALBII    ABPAMLBL    ABPAOCS0    ABPAOP0    ABPAOP1    ABPAOP2    ABPAOP5    ABPAPCLG
ABPAPCS1    ABPARPCL    ABPATINS    ABPAUPCK    ABPVCK0    ABPVCK1    ABPVDG03    ABPVDIN
ABPVEEC1    ABPVEEC2    ABPVEEC3    ABPVEEIN    ABPVOP03    ABPVPCC3    ABPVRX03    ABPVTINS
ABPVTX0    ABPVTX1    ABPVTX2    
Pharmacy Point of Sale 23 ABSPER10    ABSPER20    ABSPER30    ABSPER40    ABSPOS25    ABSPOS28    ABSPOS29    ABSPOS32
ABSPOS6B    ABSPOSB8    ABSPOSBF    ABSPOSF    ABSPOSFA    ABSPOSM2    ABSPOSMG    ABSPOSN3
ABSPOSP    ABSPOSQA    ABSPOSQQ    ABSPOSR5    ABSPOSR7    ABSPOSRU    ABSPOSRZ    
Contract Health Management Information System 20 ACHS3PPT    ACHSDAR    ACHSDAR3    ACHSDAR4    ACHSDAR5    ACHSDARR    ACHSDNL2    ACHSDNL3
ACHSDNL5    ACHSDNS    ACHSMD0A    ACHSPAZ    ACHSRP31    ACHSRP3D    ACHSRPFU    ACHSRPI
ACHSRPI1    ACHSRPIN    ACHSRPU    ACHSTX3C    
IHS Uniform Data System 17 BUD1RPC2    BUD2RPC2    BUD2RPC3    BUDARPC2    BUDARPC3    BUDBRPC2    BUDBRPC3    BUDCRPC2
BUDCRPC3    BUDDRPC2    BUDDRPC3    BUDERPC2    BUDERPC3    BUDEUPVL    BUDHRPC2    BUDHRPC3
BUDHUPVL    
IHS Accounts Receivable 11 BAR50P10    BARACSI    BARDMLP    BARDMLPR    BARDMRE    BAREDP10    BARRERL    BARRERL2
BARRPAY    BARRPAY2    BARRUTL    
Patient Care Component Reports 10 APCLBRH1    APCLBRH2    APCLBV11    APCLBV2    APCLOS21    APCLPS1    APCLPYR3    APCLPYR4
APCLVLU    APCLVLU1    
Portland Private Insurance package 10 AZP3APC    AZP3RP    CLINIC UNBILLABLE    DATE SPLIT BILLING REQ'D    LOCATIONS ASSIGNED W/ PROV #    MEDICAID FI    MEDICARE FI    PRIOR APPROVAL REQUIRED
START DATE    VISIT TYPE    
IHS GPRA Information System 6 BGP0CPU    BGP1CPU    BGP2CPU    BGP3CPU    BGP8CPU    BGP9CPU    
Referred Care Information System 5 BMCFAHC1    BMCFAHC2    BMCFAHC3    BMCFPRN1    BMCRLU1    
Utility Tables 5 AUTINS    AUTNKWII    AUTPOS3    ^AUTNINS    AUTCVIT    
IHS Changes To ADT 4 ADGCRB4    ADGDMM    ADGWMM1    ADGWMM2    
IHS Changes To Lab 4 BLRAG05C    BLRRLHL    BLRRLHL2    BLRSHPL2    
Local Area Programs 4 AZAXBILL    AZAXPTR    AZAXSND    AZHWTEST    
Mental Health Social Services 4 AMHRBV11    AMHRBV2    AMHRLU    AMHRLU1    
Phoenix Devel Center 4 AZX2RXP1    AZXBV2    AZXDF11X    AZXEINSF    
IHS Patient 3 AUPNELIG    AUPNPAT2    AUPNSEQ    
Patient Registration GUI 3 AGGINSUR    AGGUTB    AGGWTBLK    
Alcohol Chemical Dependency 2 ACDRLU    ACDRLU1    
Case Management System 2 ACMRLU    ACMRLU1    
Data Warehouse Export System 2 BDWDWPX    BDWIN1    
IHS Changes To Scheduling 2 ASDAIU    BSDAIU    
IHS Dental System 2 ADEATT    ADEATT4    
IHS Generic Interface System 2 IS00029B    IS00029D    
IHS RPMS CHR System 2 BCHRLU    BCHRLU1    
PCC New Encounter Form 2 VENPCC1C    VENPCCD1    
Women's Health 2 BWGRVLU    BWGRVLU1    
Clinical Scheduling for Windows 1 BSDX41B    
Electronic Dental Record 1 BADEHLI    
Health Summary Components 1 BHSINSUR    
IHS Changes To Pharmacy 1 APSQPINS    
Patient Care Component 1 APCHS5A    
Patient Chart 1 BPCRC8    

Accessed By FileMan Db Calls, Total: 180

Package Total Routines
Third Party Billing 113 ABMAPASS    ABMDBADD    ABMDBETA    ABMDE0X1    ABMDE2    ABMDE2A    ABMDE2E    ABMDE2X
ABMDE2X1    ABMDE2X3    ABMDE4X    ABMDE5    ABMDE5D    ABMDEADD    ABMDEBIL    ABMDEOK1
ABMDES3    ABMDESL1    ABMDESMH    ABMDEVAR    ABMDF12A    ABMDF1E    ABMDF27A    ABMDF27B
ABMDF27C    ABMDF28R    ABMDF28Y    ABMDF28Z    ABMDF29B    ABMDF2A    ABMDF2D    ABMDF34A
ABMDF34B    ABMDF35A    ABMDF35B    ABMDF35C    ABMDFOVR    ABMDFUTL    ABMDIPS    ABMDLBL
ABMDLCK2    ABMDLCK4    ABMDRCHK    ABMDREEX    ABMDRPOL    ABMDRSL1    ABMDTCOV    ABMDTIMR
ABMDTIN1    ABMDTINQ    ABMDTINS    ABMDVST    ABME5CLM    ABME5L10    ABME5L2    ABMECS
ABMEEPRV    ABMEF10    ABMEF13    ABMEF15    ABMEF16    ABMEF17    ABMEF19    ABMEF20
ABMEF21    ABMEF22    ABMEF23    ABMEF31    ABMEF32    ABMEF33    ABMEFOVR    ABMEHGRV
ABMEMCRC    ABMERGRV    ABMERINS    ABMERUTL    ABMESTAT    ABMEXLIP    ABMLABRQ    ABMM2P11
ABMM2PH3    ABMM2PV5    ABMM2PV6    ABMM2PV8    ABMM2PVP    ABMMUFC1    ABMMUFC2    ABMMUFC3
ABMMUFC4    ABMMUFC6    ABMMUPV1    ABMMUPVH    ABMNARRQ    ABMPPADJ    ABMPSAPI    ABMPT262
ABMPTPOP    ABMPTSMT    ABMRDNY1    ABMRDNY2    ABMRELG    ABMRMCRD    ABMRSCIN    ABMRSPIN
ABMTPYMT    ABMUBLST    ABMUCUTL    ABMUITIN    ABMUPTIN    ABMURCON    ABMUTLP    ABMUTLP2
ABMZIPS    
IHS Patient Registration 24 AG7    AG71A1    AG71A2    AG71A3    AG71A4    AG71A5    AGAGERP    AGAGERP2
AGAGERP3    AGED4A    AGEL    AGEVC    AGEVLM    AGEVLM0    AGMCDP    AGMCDPC
AGMCDPCM    AGMCDPN    AGTMCOV    AGTMIMRG    AGTMINQ    AGTMINS    AGTMPPOL    AGUPCHK
Third Party Tracking 8 ABPAAGEQ    ABPAAIL    ABPALBII    ABPAOP1    ABPATINS    ABPVEEIN    ABPVTINS    ABPVZILP
IHS Accounts Receivable 7 BAR18DSP    BARDMAN3    BARDMRE    BARDYSV1    BARDYSVZ    BARUFRP3    BARUTL    
Local Area Programs 6 AZAMED    AZAMED4    AZAMMED    AZANED    AZAXSND    AZHWTEST    
Utility Tables 4 AUT98P24    AUT98P28    AUTCVIT    AUTPOS3    
IHS Medicaid Eligibility Download 3 BME834    BMEMED    BMEMED4    
Pharmacy Point of Sale 3 ABSPOSC1    ABSPOSMH    ABSPOSS    
Outpatient Pharmacy 2 PSOORUT2    PSOPTPST    
Automated Lab Instruments 1 LA7VQINS    
Bemidji 1 BZDMCDAZ    
Electronic Dental Record 1 BADEHLI    
Health Summary Components 1 BHSINSUR    
IHS Changes To ADT 1 BDGF2    
IHS Dental System 1 ADEATT    
IHS Mods To Text Integration Utilities 1 BTIULO2    
Patient Care Component Reports 1 APCLPYR    
Patient Registration GUI 1 AGGPTDMG    
Phoenix Devel Center 1 AZXEINSF    

Pointed To By FileMan Files, Total: 48

Package Total FileMan Files
IHS Patient 13 POLICY HOLDER(#9000003.1)[.03]    PRIOR AUTHORIZATIONS(#9000046)[#9000046.11(.04)]    GUARANTOR(#9000043)[#9000043.0101(.01)]    CATEGORY PRIORITIZING(#9000035)[.03.12]    MEDICAID ELIGIBLE(#9000004)[.02.11]    MEDICARE ELIGIBLE(#9000003)[.02#9000003.11(.04)]    MSP PATIENT(#9000037)[.13.19.23.35.48.55]    PATIENT(#9000001)[.25]    PRIVATE INSURANCE ELIGIBLE(#9000006)[#9000006.11(.01)]    RAILROAD ELIGIBLE(#9000005)[.02#9000005.11(.04)]    THIRD PARTY LIABILITY(#9000041)[#9000041.0101(.02)]    VAMB ELIGIBLE(#9000006.02)[1]    WORKMAN'S COMPENSATION(#9000042)[#9000042.11(.11)]    
Third Party Billing 10 3P CANCELLED CLAIM DATA(#9002274.32)[.08]    3P BILL(#9002274.4)[.08#9002274.4013(.01)#9002274.4013(.011)]
3P CLAIM DATA(#9002274.3)[.08#9002274.3013(.01)#9002274.3013(.011)]
3P ERROR CODE(#9002274.04)[#9002274.411(.01)]    3P PARAMETERS(#9002274.5)[#9002274.519(.01)#9002274.56(.01)]    3P DENTAL RECODE(#9002274.1)[.01]    3P TX STATUS(#9002274.6)[.04]    3P EXP LOCAL MOD(#9002274.2)[.02]    3P INSURER(#9002274.09)[.01]    3P RECEIVER(#9002274.095)[#9002274.0951(.01)]    
Pharmacy Point of Sale 7 ABSP DATA INPUT(#9002313.51)[#9002313.512(7.01)#9002313.512(7.02)#9002313.512(7.03)#9002313.522(.03)]    ABSP PHARMACIES(#9002313.56)[#9002313.6(.01)]    ABSP SETUP(#9002313.99)[577.011960.01#9002313.9901(.01)#9002313.992279(.01)#9002313.992388(.01)]    ABSP COMBINED INSURANCE(#9002313.1)[#9002313.11(.01)]    ABSP INSURER(#9002313.4)[.01]    ABSP TRANSACTION(#9002313.59)[1.06701702703]    ABSP LOG OF TRANSACTIONS(#9002313.57)[1.06701702703]    
Third Party Tracking 5 AO PVT-INS CHECK LOG(#9002270.03)[#9002270.31(.01)]    AO PVT-INS MAILING LABELS(#9002270.05)[#9002270.511(.01)]    AO PVT-INS POSTING(#9002270.06)[#9002270.611(.01)]    AO PVT-INS ACCOUNT(#9002270.02)[#9002270.21(.06)]    PRIVATE INS FACILITY BILLING(#9002273.02)[7]    
Contract Health Management Information System 3 CHS ALTERNATE RESOURCES(#9002072.1)[7]    CHS DENIAL DATA(#9002071)[#9002071.08(.01)]    CHS FACILITY(#9002080)[#9002080.02(12)]    
Utility Tables 3 EMPLOYER(#9999999.75)[.08]    INSURER(#9999999.18)[.27#9999999.181201(.01)#9999999.1813(.02)#9999999.1813(.03)]    COVERAGE TYPE(#9999999.65)[.02]    
IHS Uniform Data System 2 UDS 17 SITE PARAMETERS(#90669.1)[#90669.11201(.01)]    UDS 18 SITE PARAMETERS(#90669.901)[#90669.9011201(.01)]    
IHS Accounts Receivable 1 A/R ACCOUNTS/IHS(#90050.02)[.01]    
IHS Immunizations Interface 1 IZ PARAMETERS(#90480)[999]    
IHS Patient Registration 1 AGEV INSURANCE ELIGIBILITY HOLDING(#9009066)[.02]    
Kernel 1 NEW PERSON(#200)[#200.918(.01)#200.9999918(.01)]    
Portland Private Insurance package 1 AZP PRV INS BILLS(#2001060.01)[106107]    

Pointer To FileMan Files, Total: 14

Package Total FileMan Files
Third Party Billing 5 3P CODES(#9002274.03)[#9999999.183901(.11)]    3P EXPORT MODE(#9002274.08)[#9999999.183901(.04)]    3P FEE TABLE(#9002274.01)[#9999999.183901(.05)]    3P VISIT TYPE(#9002274.8)[#9999999.183901(.01)]    3P ENVOY PAYER(#9002274.93)[.51.52.53]
Utility Tables 5 INSURER(#9999999.18)[.27#9999999.181201(.01)#9999999.1813(.02)#9999999.1813(.03)]    CLAIM FILING INDICATOR(#9999999.96)[.32]    INSURER TYPE(#9999999.181)[.211]    LOCATION(#9999999.06)[#9999999.181501(.01)]    REVENUE CODES(#9999999.72)[#9999999.183901(.03)]    
CPT Files 1 CPT(#81)[#9999999.183901(.16)]    
DRG Grouper 1 ICD OPERATION/PROCEDURE(#80.1)[#9999999.1843(.01)]    
Kernel 1 STATE(#5)[.04.164#9999999.1813(.01)]    
Scheduling 1 CLINIC STOP(#40.7)[#9999999.181701(.01)]    

Fields, Total: 57

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
  • LAST EDITED:  JUL 27, 2017
  • HELP-PROMPT:  ANSWER MUST BE 3-30 CHARACTERS IN LENGTH
  • DELETE TEST:  .01,0)= I 1
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9999999.18^B
    1)= S ^AUTNINS("B",$E(X,1,30),DA)=""
    2)= K ^AUTNINS("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  ^^TRIGGER^9999999.18^.41
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$S($D(^AUTNINS(D0,4)):^(4),1:"") S X=$P(Y(1),U,1)="" I X S X=DIV S Y(1)=$S($D(^AUTNINS(D0,4)):^(4),1:"") S X=$P(Y(1),U,1),X=X S DIU=X K Y S X=DIV S X=DIV X ^DD(9999999.18,.
    01,1,2,1.4)
    1.4)= S DIH=$S($D(^AUTNINS(DIV(0),4)):^(4),1:""),DIV=X S $P(^(4),U,1)=DIV,DIH=9999999.18,DIG=.41 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    CREATE CONDITION)= #.41=""
    CREATE VALUE)= #.01
    DELETE VALUE)= NO EFFECT
    FIELD)= #.41
  • CROSS-REFERENCE:  ^^TRIGGER^9999999.18^.17
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X X ^DD(9999999.18,.01,1,4,69.2) S X=X="" I X S X=DIV S Y(1)=$S($D(^AUTNINS(D0,1)):^(1),1:"") S X=$P(Y(1),U,7),X=X S DIU=X K Y S X=DIV S X=1 X ^DD(9999999.18,.01,1,4,1.4)
    1.4)= S DIH=$S($D(^AUTNINS(DIV(0),1)):^(1),1:""),DIV=X S $P(^(1),U,7)=DIV,DIH=9999999.18,DIG=.17 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    69.2)= S Y(2)=$C(59)_$S($D(^DD(9999999.18,.17,0)):$P(^(0),U,3),1:""),Y(1)=$S($D(^AUTNINS(D0,1)):^(1),1:"") S X=$P($P(Y(2),$C(59)_$P(Y(1),U,7)_":",2),$C(59),1)
    CREATE CONDITION)= #.17=""
    CREATE VALUE)= S X=1
    DELETE VALUE)= NO EFFECT
    FIELD)= #.17
.02 STREET 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  JUL 19, 1990
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
.03 CITY 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<3) X
  • LAST EDITED:  JUL 19, 1990
  • HELP-PROMPT:  Answer must be 3-15 characters in length.
.04 STATE 0;4 POINTER TO STATE FILE (#5) STATE(#5)

  • LAST EDITED:  MAR 04, 1991
.05 ZIP 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<5) X I $D(X)'=0 S:$L(X)=9 X=$E(X,1,5)_"-"_$E(X,6,9)
  • LAST EDITED:  MAY 20, 1994
  • HELP-PROMPT:  ANSWER MUST BE 5-10 CHARACTERS IN LENGTH.
  • EXECUTABLE HELP:  W ?5,"ANSWER MUST BE IN FORMAT: XXXXX OR XXXXXXXXX OR XXXXX-XXXX"
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.06 PHONE 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>13!($L(X)<8)!'(X?1"("3N1")"3N1"-"4N!(X?3N1"-"4N)) X
  • LAST EDITED:  SEP 25, 1989
  • HELP-PROMPT:  ANSWER MUST BE 8-13 CHARACTERS IN LENGTH
  • EXECUTABLE HELP:  W ?5,"ANSWER MUST BE IN FORMAT: XXX-XXXX OR (XXX)XXX-XXXX",!
.07 EIN NUMBER 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>11!($L(X)<3) X
  • LAST EDITED:  JUL 16, 1990
  • HELP-PROMPT:  Answer must be 3-11 characters in length.
.08 CONTROL NUMBER 0;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  OCT 14, 2003
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
  • TECHNICAL DESCR:  
    This field was modified by patch AUT*98.1*13 to change the length from 5 to 15 characters.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9999999.18^E
    1)= S ^AUTNINS("E",$E(X,1,30),DA)=""
    2)= K ^AUTNINS("E",$E(X,1,30),DA)
.09 CONTACT PERSON 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  SEP 22, 1989
  • HELP-PROMPT:  ANSWER MUST BE 3-30 CHARACTERS IN LENGTH
.11 FEDERAL TAX ID # 0;11 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<3) X
  • LAST EDITED:  SEP 03, 2003
  • HELP-PROMPT:  Answer must be 3-9 characters in length.
  • TECHNICAL DESCR:  This field is required on on the 835 Electronic Remittance and will be used to find insurer name. It could be used for many other purposes as well which is why it's on the 0 node and not with X12 messaging specific
    fields.   Field created 9/4/03.
    This field is introduced by patch AUT*98.1*13.
  • CROSS-REFERENCE:  9999999.18^H
    1)= S ^AUTNINS("H",$E(X,1,30),DA)=""
    2)= K ^AUTNINS("H",$E(X,1,30),DA)
.12 FAX NUMBER 0;12 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>13!($L(X)<8)!'(X?1"("3N1")"3N1"-"4N!(X?3N1"-"4N)) X
  • LAST EDITED:  JUL 29, 2010
  • HELP-PROMPT:  Answer must be 8-13 characters in length.
  • EXECUTABLE HELP:  W ?5,"ANSWER MUST BE IN FORMAT: XXX-XXXX OR (XXX)XXX-XXXX",!
.16 DOMICILE 1;6 POINTER TO STATE FILE (#5) STATE(#5)

  • LAST EDITED:  JAN 11, 1993
  • CROSS-REFERENCE:  9999999.18^D
    1)= S ^AUTNINS("D",$E(X,1,30),DA)=""
    2)= K ^AUTNINS("D",$E(X,1,30),DA)
.17 STATUS 1;7 SET
************************REQUIRED FIELD************************
  • '0' FOR UNSELECTABLE;
  • '1' FOR BILLABLE;
  • '2' FOR UNEDITABLE;
  • '3' FOR UNVERIFIED;
  • '4' FOR UNBILLABLE;

  • LAST EDITED:  SEP 20, 1991
  • SCREEN:  S DIC("S")="I ""014""[Y"
  • EXPLANATION:  Allow use of Codes 0,1 or 4 Only.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
    TRIGGERED by the NAME field of the INSURER File
  • CROSS-REFERENCE:  9999999.18^AS
    1)= S ^AUTNINS("AS",$E(X,1,30),DA)=""
    2)= K ^AUTNINS("AS",$E(X,1,30),DA)
.21 TYPE OF INSURER 2;1 SET
  • 'H' FOR HMO;
  • 'M' FOR MEDICARE SUPPL;
  • 'D' FOR MEDICAID FI;
  • 'R' FOR MEDICARE FI;
  • 'P' FOR PRIVATE;
  • 'W' FOR WORKMEN'S COMP;
  • 'C' FOR CHAMPUS;
  • 'F' FOR FRATERNAL ORG;
  • 'N' FOR NON-BEN (NON-INDIAN);
  • 'I' FOR INDIAN PATIENT;
  • 'K' FOR CHIP (KIDSCARE);
  • 'T' FOR 3P LIABILITY;
  • 'G' FOR GUARANTOR;
  • 'MD' FOR MCR PART D;
  • 'MH' FOR MEDICARE HMO;

  • LAST EDITED:  JUL 27, 2017
  • TECHNICAL DESCR:  "K" added to codeset for "CHIPS (KIDSCARE)" by AUT*98.1*10.
    "MC" added to codeset for "MCR PART C" by AUT*98.1*24.  "MMC" added to codeset for "MCR MANAGED CARE" by AUT*98.1*24.  "TSI" added to codeset for "TRIBAL SELF INSURED" by AUT*98.1*24.  "SEP" added to codeset for "STATE
    EXCHANGE PLAN" by AUT*98.1*24.  "FPL" added to codeset for "FPL 133 PERCENT" by AUT*98.1*24.
    Removed required flag and trigger with AUT*98.1*28.
.211 INSURER TYPE 3;1 POINTER TO INSURER TYPE FILE (#9999999.181) INSURER TYPE(#9999999.181)

  • LAST EDITED:  JUL 27, 2017
  • TECHNICAL DESCR:  9/15/2010 - field added to replace TYPE OF INSURER field (#.21) set of codes, as the necessity arose for more insurer types than the 16-value limit imposed by FileMan upon code sets. The TYPE OF INSURER field is now
    considered obsolete, and its use will be phased out over the next year or so.
    Entry to the field may be accomplished either through direct edit, or via trigger by entry in the soon-to-be-deprecated TYPE OF INSURER field.
    Phase out process implemented with AUT*98.1*28, AUPN*99.1*25, and AG*7.1*12.
.22 ALL INCLUSIVE BILLING (Y/N) 2;2 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  JUL 23, 1990
.23 RX BILLING STATUS 2;3 SET
************************REQUIRED FIELD************************
  • 'U' FOR UNBILLABLE;
  • 'O' FOR OUTPATIENT DRUGS ONLY;
  • 'P' FOR BILLED POINT OF SALE;

  • LAST EDITED:  FEB 19, 2010
  • HELP-PROMPT:  If applicable for this Insurer, select the code that describes if and how drugs are billed.
  • DESCRIPTION:  These codes identify how to process pharmacy charges for a payer.
    Code "U" means drugs are not billable.
    Code "O" means only outpatient drugs are billable.
    Code "P" means the drugs are billable through Point Of Sale.
  • TECHNICAL DESCR:  AUT 98.1 Patch 8 adds an additional choice to the RX BILLING STATUS field:
    P:BILLED POINT OF SALE
    The addition was done at the request of the 3rd Party Billing development, support, and maintenance team.
.24 BACKBILLING LIMIT (MONTHS) 2;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 03, 1990
  • HELP-PROMPT:  Type a Number between 0 and 99, 0 Decimal Digits to indicate the number of months allowable for backbilling.
.25 DENTAL BILLING STATUS 2;5 SET
  • 'U' FOR DENTAL VISITS ARE UNBILLABLE;
  • 'O' FOR ONLY DENTAL VISITS ARE BILLABLE;

  • LAST EDITED:  DEC 19, 1990
.26 OLD DFN 2;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 06, 1991
  • HELP-PROMPT:  Type a Number between 1 and 999999, 0 Decimal Digits
  • CROSS-REFERENCE:  9999999.18^AO
    1)= S ^AUTNINS("AO",$E(X,1,30),DA)=""
    2)= K ^AUTNINS("AO",$E(X,1,30),DA)
.27 MERGED TO DFN 2;7 POINTER TO INSURER FILE (#9999999.18) INSURER(#9999999.18)

  • LAST EDITED:  SEP 20, 1991
  • CROSS-REFERENCE:  9999999.18^AI
    1)= S ^AUTNINS("AI",$E(X,1,30),DA)=""
    2)= K ^AUTNINS("AI",$E(X,1,30),DA)
.28 EXTERNAL ID 1 2;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>6!($L(X)<2) X
  • LAST EDITED:  OCT 23, 2002
  • HELP-PROMPT:  Answer must be 2-6 characters in length.
  • DESCRIPTION:  
    This is the number of this Insurer that is from a system external to RPMS, and is kept here for accurate mapping of insurers from the external system to RPMS.
  • TECHNICAL DESCR:  This field added by AUT*98.1*11, but incorrectly, which overwrote a previously allocated field number and global location. AUT*98.1*12 corrected the overwrite with the correct definition.
    Creation of this field was at the request of a contract supporter of the Viking pharmacy system, and will be used to store the identification number kept in Viking's external system to identify this Insurer.  This will
    ensure a good map of Insurers between the two systems, and will help the business office and billers. [ Original, April 1999. ]
  • CROSS-REFERENCE:  9999999.18^F
    1)= S ^AUTNINS("F",$E(X,1,30),DA)=""
    2)= K ^AUTNINS("F",$E(X,1,30),DA)
    3)= This helps find the ID.
    This x-ref was added at the request of developers supporting Viking.  AUT*98.1*12.
.29 EXTERNAL ID 2 2;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<2) X I $G(X)]"",$D(^AUTNINS("G",X)) K X
  • LAST EDITED:  OCT 23, 2002
  • HELP-PROMPT:  Answer must be 2-10 characters in length.
  • DESCRIPTION:  
    Enter the external identification for this insurer
  • TECHNICAL DESCR:  This field added by AUT*98.1*12.
    This field is available for systems external to RPMS to store the identification number of this insurer, as created in the external system.  To eliminate possible collisions with any external systems, reservation of this
    field with the RPMS DBA is recommended. [ Original April 1999 ] NOTE:  Reserved for Viking.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9999999.18^G
    1)= S ^AUTNINS("G",$E(X,1,30),DA)=""
    2)= K ^AUTNINS("G",$E(X,1,30),DA)
    3)= Prevents duplicates.
.31 EXTERNAL GROUP NAME 2;10 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  OCT 17, 2002
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    Enter the name of this insurer that is in the external system.
  • TECHNICAL DESCR:  This field added by AUT*98.1*12.
    Creation of this field was at the request of a contract supporter of the Viking pharmacy system, and will be used to store the name of this insurer that is kept in Viking's external system to identify this Insurer.  This
    will ensure a good map of Insurers between the two systems, and will help the business office and billers.
.32 X12 CLAIM FILING INDICATOR 2;11 POINTER TO CLAIM FILING INDICATOR FILE (#9999999.96) CLAIM FILING INDICATOR(#9999999.96)

  • LAST EDITED:  SEP 20, 2002
  • HELP-PROMPT:  Select the Claim Filing Indicator for this Insurer.
  • DESCRIPTION:  
    This field is required by some HIPAA EDI transactions.
  • TECHNICAL DESCR:  
    This field added by AUT*98.1*12.  AUT*98.1*11 mistakenly overwrote a previously allocated field number .28, which is corrected with AUT*98.1*12.
.33 X12 TRADING PARTNER ID 2;12 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  SEP 04, 2003
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
  • TECHNICAL DESCR:  This field is used for both Sender and Reciever ID in X12 messaging.
    This field is introduced by patch AUT*98.1*13.
  • CROSS-REFERENCE:  9999999.18^I
    1)= S ^AUTNINS("I",$E(X,1,30),DA)=""
    2)= K ^AUTNINS("I",$E(X,1,30),DA)
.34 X12 TRADING PARTNER NAME 2;13 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  SEP 04, 2003
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • TECHNICAL DESCR:  This field is used for both Reciever and Sender Name in X12 Messaging.
    This field is introduced by patch AUT*98.1*13.
.35 MEDICAID COVERAGE REQUIRED 2;14 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  MAY 02, 2016
  • DESCRIPTION:  
    If this is a Medicaid insurer, is coverage required?
  • SCREEN:  S DIC("S")="I $$ITS^AUTINS(D0,""D^K"")"
  • EXPLANATION:  IF INSURER IS MEDICAID OR KIDSCARE UNDER A MEDICAID ENTRY
.36 MEDICAID RATE CODE REQUIRED 2;15 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  MAY 02, 2016
  • DESCRIPTION:  
    If this is a Medicaid insurer, is the rate code required?
  • SCREEN:  S DIC("S")="I $$ITS^AUTINS(D0,""D^K"")"
  • EXPLANATION:  IF INSURER IS MEDICAID OR KIDSCARE UNDER A MEDICAID ENTRY
.37 PLAN NAME REQUIRED 2;16 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  MAY 02, 2016
  • DESCRIPTION:  
    If the insurer is Railroad or Medicaid, is the plan name required?
  • SCREEN:  S DIC("S")="I $$ITS^AUTINS(D0,""D^K"")!($P(^AUTNINS(D0,0),U,1)=""RAILROAD RETIREMENT"")"
  • EXPLANATION:  IF MEDICAID,KIDSCARE, OR RAILROAD RETIREMENT
.38 SCREEN DISPLAY 2;17 SET
  • 'M' FOR MEDICAID;
  • 'P' FOR PRIVATE;

  • LAST EDITED:  MAY 24, 2004
  • DESCRIPTION:  
    Do you want the KIDSCARE entered as Medicaid or Private insurance?
  • SCREEN:  S DIC("S")="I $P(^AUTNINS(D0,0),U,1)=""KIDSCARE"""
  • EXPLANATION:  Allow KIDSCARE to be entered as Medicaid or Private insurer.
.39 NETWORK PROVIDER 2;18 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  APR 09, 2004
  • DESCRIPTION:  
    Is this insurer a network provider?
.41 LONG NAME 4;1 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>55!($L(X)<3) X
  • LAST EDITED:  JUL 22, 1990
  • HELP-PROMPT:  This field is used by the Keyword Lookup utility for searching for Insurer selections. The answer must be 3-55 characters in length.
  • NOTES:  TRIGGERED by the NAME field of the INSURER File
  • CROSS-REFERENCE:  9999999.18^C^KWIC
    1)= S %1=1 F %=1:1:$L(X)+1 S I=$E(X,%) I "(,.?! '-/&:;)"[I S I=$E($E(X,%1,%-1),1,30),%1=%+1 I $L(I)>2,^DD("KWIC")'[I S ^AUTNINS("C",I,DA)=""
    2)= S %1=1 F %=1:1:$L(X)+1 S I=$E(X,%) I "(,.?! '-/&:;)"[I S I=$E($E(X,%1,%-1),1,30),%1=%+1 I $L(I)>2 K ^AUTNINS("C",I,DA)
.51 ENVOY ID MEDICAL 5;1 POINTER TO 3P ENVOY PAYER FILE (#9002274.93) 3P ENVOY PAYER(#9002274.93)

  • LAST EDITED:  JUN 26, 2001
  • HELP-PROMPT:  Please enter the Envoy assigned Payer ID for medical claims (ie: professional charges, etc.
  • DESCRIPTION:  
    Envoy assigned Medical Payer ID
  • SCREEN:  S DIC("S")="I $P(^(0),""^"",3)=""M"""
  • EXPLANATION:  MEDICAL ONLY
.52 ENVOY ID HOSPITAL 5;2 POINTER TO 3P ENVOY PAYER FILE (#9002274.93) 3P ENVOY PAYER(#9002274.93)

  • LAST EDITED:  JUN 26, 2001
  • HELP-PROMPT:  Please enter the ENVOY assigned Payer ID number for Hospital Claims (ie: facility charges)
  • DESCRIPTION:  
    Envoy assigned Hospital Payer ID
  • SCREEN:  S DIC("S")="I $P(^(0),""^"",3)=""H"""
  • EXPLANATION:  HOSPITAL ONLY
.53 ENVOY ID DENTAL 5;3 POINTER TO 3P ENVOY PAYER FILE (#9002274.93) 3P ENVOY PAYER(#9002274.93)

  • LAST EDITED:  JUN 26, 2001
  • HELP-PROMPT:  Please enter ENVOY assigned Payer ID for dental claims.
  • DESCRIPTION:  
    ENVOY assigned Dental Payer ID
  • SCREEN:  S DIC("S")="I $P(^(0),""^"",3)=""D"""
  • EXPLANATION:  Select only Dental payers.
.61835 FILE FORMAT 6;1 SET
  • 'T' FOR UNWRAPPED;
  • 'P' FOR WRAPPED;
  • 'W' FOR COMPRESSED WRAPPED;

  • LAST EDITED:  SEP 03, 2003
  • HELP-PROMPT:  T=carriage return/line feed, P=continuous string, W=continuous string with each line = 80 characters
  • TECHNICAL DESCR:  Field required for Accounts Receivable when reading in an 835 Electronic Remittance Advice Flat File. AR needs to send GIS this flag when calling the sub-routine that allows GIS to read and parse incoming flat files.
    Field created 9/3/03
    This field is introduced by patch AUT*98.1*13.
.62277 FILE FORMAT 6;2 SET
  • 'T' FOR UNWRAPPED;
  • 'P' FOR WRAPPED;
  • 'W' FOR COMPRESSED WRAPPED;

  • LAST EDITED:  SEP 03, 2003
  • HELP-PROMPT:  T=carriage return/line feed, P=continuous string, W=continuous string with each line = 80 characters
  • TECHNICAL DESCR:  Field required for Accounts Receivable when reading in an 277 Claim Status Responce Flat File. AR needs to send GIS this flag when calling the sub-routine that allows GIS to read and parse incoming flat files. Field
    created 9/3/03
    This field is introduced by AUT*98.1*13.
.63271 FILE FORMAT 6;3 SET
  • 'T' FOR UNWRAPPED;
  • 'P' FOR WRAPPED;
  • 'W' FOR COMPRESSED WRAPPED;

  • LAST EDITED:  SEP 03, 2003
  • HELP-PROMPT:  T=carriage return/line feed, P=continuous string, W=continuous string with each line = 80 characters
  • TECHNICAL DESCR:  Field required for Patient Registration when reading in an 271 Eligibility Response Flat File. Pat Reg needs to send GIS this flag when calling the sub-routine that allows GIS to read and parse incoming flat files. Field
    created 9/3/03
    This field is introduced by AUT*98.1*13.
.64276 FILE FORMAT 6;4 SET
  • 'T' FOR UNWRAPPED;
  • 'P' FOR WRAPPED;
  • 'W' FOR COMPRESSED WRAPPED;

  • LAST EDITED:  SEP 03, 2003
  • HELP-PROMPT:  T=carriage return/line feed, P=continuous string, W=continuous string with each line = 80 characters
  • TECHNICAL DESCR:  Field possible required for Accounts Receivable when sending out a 276 Claim Status Request Flat File. AR may need to send GIS this flag when calling the sub-routine that allows GIS to create the flat file. Field created
    9/3/03
    This field is introduced by AUT*98.1*13.
.65270 FILE FORMAT 6;5 SET
  • 'T' FOR UNWRAPPED;
  • 'P' FOR WRAPPED;
  • 'W' FOR COMPRESSED WRAPPED;

  • LAST EDITED:  SEP 03, 2003
  • HELP-PROMPT:  T=carriage return/line feed, P=continuous string, W=continuous string with each line = 80 characters
  • TECHNICAL DESCR:  Field possibly required for Patient Registration when sending out a 270 Eligibility Request Flat File. Pat Reg may need to send GIS this flag when calling the sub-routine that allows GIS to create the flat file. Field
    created 9/3/03
    This field is introduced by AUT*98.1*13.
.66 EXTERNAL ID 3 (REF LAB) 2;19 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<2) X
  • LAST EDITED:  JUN 15, 2009
  • HELP-PROMPT:  This field is intended for Reference Lab use Answer must be 2-10 characters in length
1 BILLING OFFICE 1;1 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  SEP 18, 1990
  • HELP-PROMPT:  ANSWER MUST BE 3-30 CHARACTERS IN LENGTH
2 BILLING STREET 1;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  OCT 17, 1989
  • HELP-PROMPT:  ANSWER MUST BE 3-30 CHARACTERS IN LENGTH
3 BILLING CITY 1;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<3) X
  • LAST EDITED:  OCT 17, 1989
  • HELP-PROMPT:  ANSWER MUST BE 3-15 CHARACTERS IN LENGTH
4 BILLING STATE 1;4 POINTER TO STATE FILE (#5) STATE(#5)

  • LAST EDITED:  OCT 17, 1989
5 BILLING ZIP 1;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<5)!'((X?5N)!(X?9N)!(X?5N1"-"4N)!(X?1A1N1A1N1A1N)) X I $D(X)'=0 S:$L(X)=9 X=$E(X,1,5)_"-"_$E(X,6,9)
  • LAST EDITED:  FEB 06, 2009
  • HELP-PROMPT:  ANSWER MUST BE 5-10 CHARACTERS IN LENGTH
  • EXECUTABLE HELP:  W ?5,"ANSWER MUST BE IN FORMAT: XXXXX OR XXXXXXXXX OR XXXXX-XXXX OR IN THE CANADIAN FORMAT ANANAN"
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
1101 DENIAL CODES 11;0 Multiple #9999999.1811 9999999.1811
1201 MEDICARE FI 12;0 POINTER Multiple #9999999.181201 9999999.181201
1301 MEDICAID FI 13;0 POINTER Multiple #9999999.1813 9999999.1813
1501 LOCATIONS ASSIGNED W/ PROV # 15;0 POINTER Multiple #9999999.181501 9999999.181501

  • SCREEN:  S DIC("S")="I $D(^ABMDPARM(1,11,X,0))"
  • EXPLANATION:  FACILITY MUST BE FOR THOSE DESIGNATED AS BILLABLE ONLY
1701 CLINIC UNBILLABLE 17;0 POINTER Multiple #9999999.181701 9999999.181701
2101 COVERAGE 21;0 Multiple #9999999.1821 9999999.1821
3101 DATE SPLIT BILLING REQ'D 31;0 DATE Multiple #9999999.1831 9999999.1831
3901 VISIT TYPE 39;0 POINTER Multiple #9999999.183901 9999999.183901

  • SCREEN:  S DIC("S")="I $P(^(0),U,4)'=1,$P(^(0),U,2)=""B"""
  • EXPLANATION:  CODE MUST BE ACTIVE BILL TYPE
4301 PRIOR APPROVAL REQUIRED 43;0 POINTER Multiple #9999999.1843 9999999.1843
8801 MNEMONIC 88;1 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>6!($L(X)<1) X
  • LAST EDITED:  FEB 26, 1999
  • HELP-PROMPT:  Answer must be 1-6 characters in length.

Found Entries, Total: 3

NAME: MEDICAID    NAME: MEDICARE    NAME: RAILROAD RETIREMENT    

External References

Name Field # of Occurrence
^DICR .01(XREF 2n1.4), .01(XREF 4n1.4)
Y^DIQ ID.04+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUTNINS - [#9999999.18] .01(XREF 2S), .01(XREF 2n1.4), .01(XREF 4S), .01(XREF 4n1.4), .01(XREF 4n69.2)
^AUTNINS("AI" .27(XREF 1S), .27(XREF 1K)
^AUTNINS("AO" .26(XREF 1S), .26(XREF 1K)
^AUTNINS("AS" .17(XREF 1S), .17(XREF 1K)
^AUTNINS("B" .01(XREF 1S), .01(XREF 1K)
^AUTNINS("C" .41(XREF 1S), .41(XREF 1K)
^AUTNINS("D" .16(XREF 1S), .16(XREF 1K)
^AUTNINS("E" .08(XREF 1S), .08(XREF 1K)
^AUTNINS("F" .28(XREF 1S), .28(XREF 1K)
^AUTNINS("G" .29+1, .29(XREF 1S), .29(XREF 1K)
^AUTNINS("H" .11(XREF 1S), .11(XREF 1K)
^AUTNINS("I" .33(XREF 1S), .33(XREF 1K)
^DD( .01(XREF 2n1.4), .01(XREF 4n1.4)
^DD("KWIC" .41(XREF 1S)
^DD(5 ID.04+1
^DD(9999999.18 .01(XREF 2S), .01(XREF 4S), .01(XREF 4n69.2)
^DIC(5 - [#5] ID.04+1

Naked Globals

Name Field # of Occurrence
^(0 ID.04+1, ID.05+1, .01(XREF 4n69.2)
^(1 .01(XREF 4S), .01(XREF 4n1.4), .01(XREF 4n69.2)
^(4 .01(XREF 2S), .01(XREF 2n1.4)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % .41(XREF 1S), .41(XREF 1K)
>> %1 .41(XREF 1S), .41(XREF 1K)
%I ID.04+1*!
>> C ID.04+1*
>> D0 .01(XREF 2S), .01(XREF 4S), .01(XREF 4n69.2)
>> DA .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 4S), .08(XREF 1S), .08(XREF 1K), .11(XREF 1S), .11(XREF 1K), .16(XREF 1S), .16(XREF 1K)
.17(XREF 1S), .17(XREF 1K), .26(XREF 1S), .26(XREF 1K), .27(XREF 1S), .27(XREF 1K), .28(XREF 1S), .28(XREF 1K), .29(XREF 1S), .29(XREF 1K)
.33(XREF 1S), .33(XREF 1K), .41(XREF 1S), .41(XREF 1K)
>> DIC ID.04+1
>> DIC("S" .17SCR+1*, .35SCR+1*, .36SCR+1*, .37SCR+1*, .38SCR+1*, .51SCR+1*, .52SCR+1*, .53SCR+1*
>> DIG .01(XREF 2n1.4), .01(XREF 4n1.4)
>> DIH .01(XREF 2n1.4), .01(XREF 4n1.4)
>> DIU .01(XREF 2S), .01(XREF 4S)
DIV .01(XREF 2S), .01(XREF 2n1.4), .01(XREF 4S), .01(XREF 4n1.4)
DIV(0 .01(XREF 2S), .01(XREF 2n1.4), .01(XREF 4S), .01(XREF 4n1.4)
>> I .41(XREF 1S), .41(XREF 1K)
U ID.04+1, ID.05+1, .01(XREF 2S), .01(XREF 2n1.4), .01(XREF 4S), .01(XREF 4n1.4), .01(XREF 4n69.2)
X .01+1!, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2n1.4), .01(XREF 4S), .01(XREF 4n1.4), .01(XREF 4n69.2), .02+1!, .03+1!
, .05+1!*, .06+1!, .07+1!, .08+1!, .08(XREF 1S), .08(XREF 1K), .09+1!, .11+1!, .11(XREF 1S), .11(XREF 1K)
, .12+1!, .16(XREF 1S), .16(XREF 1K), .17(XREF 1S), .17(XREF 1K), .24+1!, .26+1!, .26(XREF 1S), .26(XREF 1K), .27(XREF 1S)
.27(XREF 1K), .28+1!, .28(XREF 1S), .28(XREF 1K), .29+1!, .29(XREF 1S), .29(XREF 1K), .31+1!, .33+1!, .33(XREF 1S)
.33(XREF 1K), .34+1!, .41+1!, .41(XREF 1S), .41(XREF 1K), .66+1!, 1+1!, 2+1!, 3+1!, 5+1!*
, 8801+1!
Y ID.04+1*, .01(XREF 2S), .01(XREF 4S)
Y(0 .01(XREF 2S), .01(XREF 4S)
Y(1 .01(XREF 2S), .01(XREF 4S), .01(XREF 4n69.2)
Y(2 .01(XREF 4n69.2)
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All