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 |  All
Print Page as PDF
Global: ^AUPNMCD

Package: IHS Patient

Global: ^AUPNMCD


Information

FileMan FileNo FileMan Filename Package
9000004 MEDICAID ELIGIBLE IHS Patient

Description

Directly Accessed By Routines, Total: 199

Package Total Routines
IHS Patient Registration 40 AG3RDP    AG5    AG6P17B    AG71A    AG71A1    AG71A2    AG71A3    AG71A4
AG71A5    AG7P2A    AGAGERP1    AGAGERP2    AGDATA    AGED4A1    AGED5    AGED51
AGEDCHEK    AGEDERR3    AGEDMCD    AGEDNAME    AGEL    AGEL2    AGEL5    AGELA1
AGELUP4    AGEVINU    AGFACE5    AGFIX7A    AGINS    AGINSUPD    AGMCDCNT    AGMCDP
AGMCDPC    AGMCDPCM    AGMCDPN    AGMCRP6    AGTX2    AGTXALL    AGUND18    AGUTL
Third Party Billing 31 ABMDE23P    ABMDE2X3    ABMDE2XA    ABMDEFIP    ABMDF18A    ABMDF1E    ABMDF25A    ABMDF26A
ABMDF29A    ABMDF34A    ABMDLCK2    ABMDREL1    ABMDREL2    ABME520A    ABME5DMG    ABME8DMG
ABMER20A    ABMERINS    ABMERUTL    ABMKIDS    ABMM2ELG    ABMM2P10    ABMM2PH1    ABMM2PV3
ABMM2PV8    ABMMUEL1    ABMMUELG    ABMPTPOP    ABMPTSMT    ABMUTLN    ABMUTLP    
Local Area Programs 13 AZAMED    AZAMED1    AZAMED15    AZAMED16    AZAMED4    AZAMFALL    AZAMMED    AZANED
AZANED1    AZANED15    AZANED16    AZAXDPM1    AZHDPATC    
Contract Health Management Information System 11 ACHSDNL3    ACHSMD0A    ACHSRP31    ACHSRP3D    ACHSRPFU    ACHSRPI    ACHSRPIN    ACHSRPU
ACHSTX3C    ACHSUDF    ACHSVUR1    
IHS Uniform Data System 10 BUD1RPC2    BUD2RPC2    BUDARPC2    BUDBRPC2    BUDCRPC2    BUDDRPC2    BUDERPC2    BUDERPC3
BUDHRPC2    BUDHRPC3    
Patient Care Component Reports 8 APCLBRH1    APCLBRH2    APCLBV11    APCLBV2    APCLPS1    APCLPYR3    APCLVLU    APCLVLU1
IHS Changes To ADT 7 ADGCRB4    ADGDMM    ADGIP0    ADGMREC    ADGWMM1    ADGWMM2    BDGF2    
Pharmacy Point of Sale 7 ABSPOS29    ABSPOSBB    ABSPOSCC    ABSPOSCH    ABSPOSFC    ABSPOSR7    ABSPOSRU    
IHS GPRA Information System 6 BGP0CPU    BGP1CPU    BGP2CPU    BGP3CPU    BGP8CPU    BGP9CPU    
IHS Patient 5 AUPN99P7    AUPNELIG    AUPNLBCK    AUPNMCDF    AUPNPAT2    
Referred Care Information System 5 BMCFAHC1    BMCFAHC2    BMCFAHC3    BMCFPRN1    BMCRLU1    
IHS Medicaid Eligibility Download 4 BME834    BMEMED    BMEMED4    BMEMFALL    
Mental Health Social Services 4 AMHRBV11    AMHRBV2    AMHRLU    AMHRLU1    
Data Warehouse Export System 3 BDWA1    BDWDWPX    BDWIN1    
IHS Generic Interface System 3 IS00011A    IS00029B    IS00029D    
PCC New Encounter Form 3 VENPCC1C    VENPCCD    VENPCCD1    
iCare 3 BQIPTINS    BQITDINS    BQIUL2    
Alcohol Chemical Dependency 2 ACDRLU    ACDRLU1    
Bemidji 2 BZDMCDAZ    BZDMUT    
Case Management System 2 ACMRLU    ACMRLU1    
IHS Changes To Scheduling 2 ASDAIU    BSDAIU    
IHS Immunizations Interface 2 BYIMIMM3    BYIMSEGS    
IHS RPMS CHR System 2 BCHRLU    BCHRLU1    
IHS Support HL7 Interfaces 2 BHLIN1    BHLIN1I    
Patient Chart 2 BPCRC8    BPCRC9    
Patient Registration GUI 2 AGGARVAL    AGGUPMCD    
Phoenix 2 BZXBPN    BZXBPNA    
Phoenix Devel Center 2 AZXBV2    AZXZVSIT    
Women's Health 2 BWGRVLU    BWGRVLU1    
Clinical Scheduling for Windows 1 BSDX41B    
Electronic Dental Record 1 BADEHLI    
Emergency Room 1 AMERCLP    
Health Summary Components 1 BHSINSUR    
IHS Accounts Receivable 1 BARDMRE    
IHS Changes To Pharmacy 1 APSQPINS    
IHS Dental System 1 ADEPME    
IHS Mods To Text Integration Utilities 1 BTIULO2    
IHS VA Utilities 1 XBPATC    
M Transfer 1 BMXADOV2    
Patient Care Component 1 APCHS5A    
Registration 1 DAY SURGERY DATE/TIME    

Accessed By FileMan Db Calls, Total: 46

Package Total Routines
IHS Patient Registration 17 AG5    AG71A    AGAGERP3    AGAPIS1    AGDATA    AGED5    AGED51    AGEDMCD
AGEL2    AGEL5    AGELUP4    AGEVC    AGEVINU    AGFACE5    AGKPAT    AGMCRP6
AGUTL    
Local Area Programs 6 AZAMED    AZAMED1    AZAMED4    AZAMMED    AZANED    AZANED1    
Third Party Billing 5 ABMDF28X    ABMDLCK2    ABMERINS    ABMEXLIP    ABMM2PV8    
IHS Patient 4 AUPN9920    AUPN99P5    AUPNELIG    AUPNMCDF    
IHS Medicaid Eligibility Download 3 BME834    BMEMED    BMEMED4    
iCare 3 BQIPTINS    BQITDINS    BQIUL2    
Patient Registration GUI 2 AGGARVAL    AGGUPMCD    
Automated Lab Instruments 1 LA7VQINS    
Bemidji 1 BZDMCDAZ    
Data Warehouse Export System 1 BDWIN1    
Electronic Dental Record 1 BADEHLI    
IHS Changes To ADT 1 BDGF2    
IHS Support HL7 Interfaces 1 BHLIN1I    

Pointed To By FileMan Files, Total: 3

Package Total FileMan Files
Third Party Billing 2 3P BILL(#9002274.4)[#9002274.4013(.06)]    3P CLAIM DATA(#9002274.3)[#9002274.3013(.06)]    
IHS Patient 1 MEDICAID CLAIMS(#9000004.01)[.02]    

Pointer To FileMan Files, Total: 6

Package Total FileMan Files
Utility Tables 3 EMPLOYER GROUP INSURANCE(#9999999.77)[.17]    INSURER(#9999999.18)[.02, .11]    RELATIONSHIP(#9999999.36)[.06]    
IHS Patient 2 POLICY HOLDER(#9000003.1)[.09]    PATIENT(#9000001)[.01]    
Kernel 1 STATE(#5)[.04]    

Fields, Total: 19

Field # Name Loc Type Details
.01 PATIENT NAME 0;1 POINTER TO PATIENT FILE (#9000001)
************************REQUIRED FIELD************************
PATIENT(#9000001)

  • LAST EDITED:  JUL 11, 1991
  • HELP-PROMPT:  ENTER PATIENT'S NAME (EXAMPLE: MORGAN,JAMES PAUL,JR (no space after comma))
  • DESCRIPTION:  
    This field points to the NAME field of the PATIENT file.  A patient must exist in the PATIENT file before data for that patient can be added to this file.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9000004^B
    1)= S ^AUPNMCD("B",$E(X,1,30),DA)=""
    2)= K ^AUPNMCD("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9000004^AD^MUMPS
    1)= I $D(DA),$P(^AUPNMCD(DA,0),U,3)]"",$P(^(0),U,4)]"" S ^AUPNMCD("AB",X,$P(^(0),U,4),$P(^(0),U,3),DA)=""
    2)= I $D(DA),$P(^AUPNMCD(DA,0),U,3)]"",$P(^(0),U,4)]"" K ^AUPNMCD("AB",X,$P(^(0),U,4),$P(^(0),U,3),DA)
.02 INSURER POINTER 0;2 POINTER TO INSURER FILE (#9999999.18)
************************REQUIRED FIELD************************
INSURER(#9999999.18)

  • INPUT TRANSFORM:  SET DIC("S")="I $P(^(0),U,1)=""MEDICAID""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUN 22, 2004
  • HELP-PROMPT:  ENTER MEDICAID.
  • DESCRIPTION:  
    This field is a pointer to the MEDICAID entry in the INSURER file.
  • SCREEN:  SET DIC("S")="I $P(^(0),U,1)=""MEDICAID"""
  • EXPLANATION:  MEDICAID only INSURER allowed.
    UNEDITABLE
  • CROSS-REFERENCE:  9000004^AAVABDW33^MUMPS
    1)= S DWDFN=$P($G(^AUPNMCD(DA,0)),U) D:+DWDFN SET^AUPNDWXR(DWDFN,"ELIG") K DWDFN
    2)= S DWDFN=$P($G(^AUPNMCD(DA,0)),U) D:+DWDFN KILL^AUPNDWXR(DWDFN,"ELIG") K DWDFN
    Populates AUPNDWAF for the Data Warehouse export.  See routine AUPNDWXR for documentation.
.03 MEDICAID NUMBER 0;3 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<6) X
  • LAST EDITED:  MAR 26, 2001
  • HELP-PROMPT:  ANSWER MUST BE 6-30 CHARACTERS IN LENGTH
  • CROSS-REFERENCE:  9000004^AB^MUMPS
    1)= K ^AUPNMCD("AB",$P(^AUPNMCD(DA,0),U,1),$S($P(^(0),U,4)'="":$P(^(0),U,4),1:"0"),"0",DA) S ^AUPNMCD("AB",$P(^AUPNMCD(DA,0),U,1),$S($P(^(0),U,4)'="":$P(^(0),U,4),1:"0"),X,DA)=""
    2)= K ^AUPNMCD("AB",$P(^AUPNMCD(DA,0),U,1),$S($P(^(0),U,4)'="":$P(^(0),U,4),1:"0"),X,DA)
  • CROSS-REFERENCE:  9000004^AE
    1)= S ^AUPNMCD("AE",$E(X,1,30),DA)=""
    2)= K ^AUPNMCD("AE",$E(X,1,30),DA)
.04 STATE 0;4 POINTER TO STATE FILE (#5)
************************REQUIRED FIELD************************
STATE(#5)

  • LAST EDITED:  JUN 22, 2004
    UNEDITABLE
  • CROSS-REFERENCE:  9000004^AB-TOO^MUMPS
    1)= K ^AUPNMCD("AB",$P(^AUPNMCD(DA,0),U,1),"0",$S($P(^(0),U,3)'="":$P(^(0),U,3),1:"0"),DA) S ^AUPNMCD("AB",$P(^AUPNMCD(DA,0),U,1),X,$S($P(^(0),U,3)'="":$P(^(0),U,3),1:"0"),DA)=""
    2)= K ^AUPNMCD("AB",$P(^AUPNMCD(DA,0),U,1),X,$S($P(^(0),U,3)'="":$P(^(0),U,3),1:"0"),DA)
  • CROSS-REFERENCE:  9000004^AAVABDW34^MUMPS
    1)= S DWDFN=$P($G(^AUPNMCD(DA,0)),U) D:+DWDFN SET^AUPNDWXR(DWDFN,"ELIG") K DWDFN
    2)= S DWDFN=$P($G(^AUPNMCD(DA,0)),U) D:+DWDFN KILL^AUPNDWXR(DWDFN,"ELIG") K DWDFN
    Populates AUPNDWAF for the Data Warehouse export.  See routine AUPNDWXR for documentation.
.05 NAME OF INSURED 0;5 FREE TEXT

  • INPUT TRANSFORM:  D NAME^AUPNPED
  • LAST EDITED:  MAR 11, 1991
  • HELP-PROMPT:  Enter the full name of the primary insured person with this account number. Must be 3-30 characters long. Example: MORGAN,JAMES PAUL,JR
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.06 RELATIONSHIP TO INSURED 0;6 POINTER TO RELATIONSHIP FILE (#9999999.36) RELATIONSHIP(#9999999.36)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)]""""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUN 22, 2004
  • HELP-PROMPT:  Enter patients relationship to the insured.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)]"""""
  • EXPLANATION:  Standard Billing Form Relationships Only
  • CROSS-REFERENCE:  9000004^AAVABDW35^MUMPS
    1)= S DWDFN=$P($G(^AUPNMCD(DA,0)),U) D:+DWDFN SET^AUPNDWXR(DWDFN,"ELIG") K DWDFN
    2)= S DWDFN=$P($G(^AUPNMCD(DA,0)),U) D:+DWDFN KILL^AUPNDWXR(DWDFN,"ELIG") K DWDFN
    Populates AUPNDWAF for the Data Warehouse export.  See routine AUPNDWXR for documentation.
.07 SEX OF INSURED 0;7 SET
  • 'M' FOR MALE;
  • 'F' FOR FEMALE;
  • 'U' FOR UNKNOWN;

  • LAST EDITED:  APR 05, 2013
  • HELP-PROMPT:  Enter 'M' for MALE, 'F' for FEMALE, or 'U' if UNKNOWN.
.08 DATE OF LAST UPDATE 0;8 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 29, 2010
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9000004^AAVABDW36^MUMPS
    1)= S DWDFN=$P($G(^AUPNMCD(DA,0)),U) D:+DWDFN SET^AUPNDWXR(DWDFN,"ELIG") K DWDFN
    2)= S DWDFN=$P($G(^AUPNMCD(DA,0)),U) D:+DWDFN KILL^AUPNDWXR(DWDFN,"ELIG") K DWDFN
    Populate AUPNDWAF for the Data Warehouse export.  See routine AUPNDWXR for documentation.
  • CROSS-REFERENCE:  9000004^ADLU
    1)= S ^AUPNMCD("ADLU",$E(X,1,30),DA)=""
    2)= K ^AUPNMCD("ADLU",$E(X,1,30),DA)
.09 POLICY HOLDER 0;9 POINTER TO POLICY HOLDER FILE (#9000003.1) POLICY HOLDER(#9000003.1)

  • LAST EDITED:  JUN 22, 2004
  • CROSS-REFERENCE:  9000004^C
    1)= S ^AUPNMCD("C",$E(X,1,30),DA)=""
    2)= K ^AUPNMCD("C",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9000004^AAVABDW37^MUMPS
    1)= S DWDFN=$P($G(^AUPNMCD(DA,0)),U) D:+DWDFN SET^AUPNDWXR(DWDFN,"ELIG") K DWDFN
    2)= S DWDFN=$P($G(^AUPNMCD(DA,0)),U) D:+DWDFN KILL^AUPNDWXR(DWDFN,"ELIG") K DWDFN
    Populates AUPNDWAF for the Data Warehouse export.  See routine AUPNDWXR for documentation.
.11 PLAN NAME 0;10 POINTER TO INSURER FILE (#9999999.18) INSURER(#9999999.18)

  • INPUT TRANSFORM:  S DIC("S")="I $$ITS^AUTINS(Y,""D^K"")" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
  • LAST EDITED:  MAY 02, 2016
  • HELP-PROMPT:  Enter the local Plan Name
  • SCREEN:  S DIC("S")="I $$ITS^AUTINS(Y,""D^K"")"
  • EXPLANATION:  MEDICAID OR KIDSCARE TYPE OF INSURER ONLY
  • AUDIT:  YES, ALWAYS
  • CROSS-REFERENCE:  9000004^AAVABDW38^MUMPS
    1)= S DWDFN=$P($G(^AUPNMCD(DA,0)),U) D:+DWDFN SET^AUPNDWXR(DWDFN,"ELIG") K DWDFN
    2)= S DWDFN=$P($G(^AUPNMCD(DA,0)),U) D:+DWDFN KILL^AUPNDWXR(DWDFN,"ELIG") K DWDFN
    Populates AUPNDWAF for the Data Warehouse export.  See routine AUPNDWXR for documentation.
.12 RATE CODE 0;11 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>6!($L(X)<1) X
  • LAST EDITED:  APR 09, 1990
  • HELP-PROMPT:  Answer must be 1-6 characters in length.
.13 CASE NUMBER 0;13 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<3) X
  • LAST EDITED:  AUG 24, 1990
  • HELP-PROMPT:  Answer must be 3-10 characters in length.
.14 PRIMARY CARE PROVIDER 0;14 FREE TEXT

  • INPUT TRANSFORM:  D NAME^AUPNPED
  • LAST EDITED:  JUN 20, 2002
  • HELP-PROMPT:  Not a required field. Enter the name of the primary care provider for this patient's plan. Usually required for HMO/Managed Care plans.
  • TECHNICAL DESCR:  
    Created 6/7/2002 for V7.0 of AG Distributed in AUPN*99.1*8
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.15 MEDICAID CARD COPY ON FILE 0;15 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  JUN 20, 2002
  • HELP-PROMPT:  Type in YES or NO to indicate if the patient's Medicaid card copy was obtained and placed into the chart.
  • TECHNICAL DESCR:  
    Created 6/7/2002 for V7.0 of AG Distributed in AUPN*99.1*8
.16 DATE MCD CC WAS OBTAINED 0;16 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUN 20, 2002
  • HELP-PROMPT:  Enter the date the Medicaid card was placed into the patient's chart
  • TECHNICAL DESCR:  
    Created 6/7/2002 for V7.0 of AG Distributed in AUPN*99.1*8
.17 GROUP NAME 0;17 POINTER TO EMPLOYER GROUP INSURANCE FILE (#9999999.77) EMPLOYER GROUP INSURANCE(#9999999.77)

  • LAST EDITED:  MAR 25, 2004
1101 ELIGIBILITY DATES 11;0 DATE Multiple #9000004.11 9000004.11
2101 MEDICAID NAME 21;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  NOV 12, 1987
  • HELP-PROMPT:  Enter PATIENTS FULL NAME exactly as defined by this state's Medicaid system. Must be 3-30 characters.
2102 MEDICAID DATE OF BIRTH 21;2 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:DTX) X
  • LAST EDITED:  MAR 16, 1988
  • HELP-PROMPT:  Enter the PATIENT'S DATE OF BIRTH exactly as defined by state. This date must be between 1850 and today. If DOB is prior to 1900 be sure to enter the century.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  All