STANDARD DATA DICTIONARY #665.72 -- HOME OXYGEN TRANSACTIONS FILE FILE                                            6/27/25    PAGE 1
STORED IN ^RMPO(665.72,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                     (VERSION 3.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains monthly billing transactions for home oxygen patients filed by site, by month, by patient, by vendor, and by
item.  



CROSS
REFERENCED BY: PATIENT(AB), PROSTHETICS APPLIANCE REPAIR(AC), SITE(B)



665.72,.01    SITE                   0;1 POINTER TO PROSTHETICS SITE PARAMETERS FILE (#669.9) (Required)

              LAST EDITED:      NOV 09, 1998 
              HELP-PROMPT:      Enter a site number or name. 
              DESCRIPTION:      This is the Veterans Affairs site where this transaction will come to completion.  It is the site
                                that is ultimately responsible for the issue and payment for Home Oxygen devices.  

              CROSS-REFERENCE:  665.72^B 
                                1)= S ^RMPO(665.72,"B",$E(X,1,30),DA)=""
                                2)= K ^RMPO(665.72,"B",$E(X,1,30),DA)


665.72,1      BILLING MONTH          1;0 DATE Multiple #665.723 (Add New Entry without Asking)

              DESCRIPTION:      Billing month in which patient transactions are generated in Home Oxygen for the purpose of
                                reconciliation with contractors invoices and payment through IFCAP.  


665.723,.01     BILLING MONTH          0;1 DATE

                INPUT TRANSFORM:  D XFRM1^RMPOBILU
                LAST EDITED:      DEC 14, 1998 
                HELP-PROMPT:      Enter a month and year, e.g., 5/97, May 97. 
                DESCRIPTION:      This is the month and year for this Home Oxygen billing transaction.  Billing month in which
                                  patient transactions are generated in Home Oxygen for the purpose of reconciliation with
                                  contractors invoices and payment through IFCAP.  

                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

                CROSS-REFERENCE:  665.723^B 
                                  1)= S ^RMPO(665.72,DA(1),1,"B",$E(X,1,30),DA)=""
                                  2)= K ^RMPO(665.72,DA(1),1,"B",$E(X,1,30),DA)


665.723,1       VENDOR                 1;0 POINTER Multiple #665.7231 (Add New Entry without Asking)

                LAST EDITED:      NOV 09, 1998 
                DESCRIPTION:      This is the name of the vendor/contractor from which the item was purchased. The vendor is a
                                  pointer to IFCAP's vendor file.  


665.7231,.01      VENDOR                 0;1 POINTER TO VENDOR FILE (#440)

                  INPUT TRANSFORM:S DIC("S")="I $D(^RMPR(669.9,+$G(RMPOXITE),""RMPOVDR"",Y,0))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
                                 S:$D(X) DINUM=X
                  LAST EDITED:  JAN 28, 1999 
                  HELP-PROMPT:  Enter the Vendor the item is being purchased from. 
                  DESCRIPTION:  This is the name of the vendor/contractor from which the item was purchased. The vendor is a
                                pointer to IFCAP's vendor file.  

                  SCREEN:       S DIC("S")="I $D(^RMPR(669.9,+$G(RMPOXITE),""RMPOVDR"",Y,0))"
                  EXPLANATION:  ONLY VENDORS FROM SITE FILE
                  NOTES:        XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

                  CROSS-REFERENCE:665.7231^B 
                                1)= S ^RMPO(665.72,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)=""
                                2)= K ^RMPO(665.72,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)


665.7231,1        DATE TRX BUILT     0;2 DATE

                  INPUT TRANSFORM:S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
                  LAST EDITED:  JAN 05, 1999 
                  HELP-PROMPT:  Enter the date billing transactions are generated. 
                  DESCRIPTION:
                                The date patient billing transactions were generated.  


665.7231,9        PATIENT            V;0 POINTER Multiple #665.72319 (Add New Entry without Asking)

                  LAST EDITED:  NOV 09, 1998 
                  DESCRIPTION:
                                This is a multiple field consisting of patient billing transactions for a given vendor.  


665.72319,.01       PATIENT            0;1 POINTER TO PATIENT FILE (#2)

                    LAST EDITED:  DEC 15, 1998 
                    HELP-PROMPT:  Enter the patient's name. 
                    DESCRIPTION:
                                  This is the name of the patient for this transaction.  

                    CROSS-REFERENCE:665.72319^B 
                                  1)= S ^RMPO(665.72,DA(3),1,DA(2),1,DA(1),"V","B",$E(X,1,30),DA)=""
                                  2)= K ^RMPO(665.72,DA(3),1,DA(2),1,DA(1),"V","B",$E(X,1,30),DA)

                    CROSS-REFERENCE:665.72^AB^MUMPS 
                                  1)= S ^RMPO(665.72,"AB",$P(^DPT(DA,0),U),DA(3),DA(2),DA(1),DA)=""
                                  2)= K ^RMPO(665.72,"AB",$P(^DPT(DA,0),U),DA(3),DA(2),DA(1),DA)
                                  Order alphabetically by patient name Cross reference structure : 
                                  ^RMPO(665.72,PatientName,SITE,MONTH,VENDOR,PATIENT) 



665.72319,1         ITEM               1;0 POINTER Multiple #665.723191

                    DESCRIPTION:
                                  This is a multiple field consisting of items for a patient in a billing  month.  


665.723191,.01        ITEM               0;1 POINTER TO PROS ITEM MASTER FILE (#661) (Required) (Multiply asked)

                      LAST EDITED:  JUL 26, 2005 
                      HELP-PROMPT:  Enter the item that the patient has received from the Vendor. 
                      DESCRIPTION:  Vendors supply billable items to patients and bill the VAMC for rentals of equipment and
                                    supplies. This field is a pointer to the master item list of possible items.  

                      TECHNICAL DESCR:
                                    This field is a pointer to PROS ITEM MASTER FILE (#661).  

                      DELETE TEST:  .01,0)= I 1 W "USE DELETE OPTION!"

                      CROSS-REFERENCE:665.723191^B 
                                    1)= S ^RMPO(665.72,DA(4),1,DA(3),1,DA(2),"V",DA(1),1,"B",$E(X,1,30),DA)=""
                                    2)= K ^RMPO(665.72,DA(4),1,DA(3),1,DA(2),"V",DA(1),1,"B",$E(X,1,30),DA)

                      CROSS-REFERENCE:665.723191^APTASK^MUMPS 
                                    1)= Q
                                    2)= D CHRGTASK^RMPOPF


665.723191,1          PRIMARY ITEM       0;8 SET

                                    'Y' FOR YES; 
                                    'N' FOR NO; 
                      LAST EDITED:  NOV 16, 1998 
                      HELP-PROMPT:  Enter Y for Primary item, N or carriage return for not primary item. 
                      DESCRIPTION:  The item considered as the most important to a patient.  A patient can ONLY have one primary
                                    item.  


665.723191,2          HCPCS CODE         0;2 POINTER TO PROSTHETIC HCPCS FILE (#661.1) (Required)

                      LAST EDITED:  NOV 05, 1998 
                      HELP-PROMPT:  Enter an appropriate PSAS HCPCS Code for the item you selected. 
                      DESCRIPTION:  Health Care Financing Administration Common Procedure Coding System (HCPCS) 
                                     
                                    This field should have the HCPCS code for the Item you are selecting.  HCPCS is a uniform
                                    method for healthcare providers and medical suppliers to report professional services,
                                    procedures and supplies.  

                      TECHNICAL DESCR:
                                    HCPCS Codes point at the CPT file.  


665.723191,3          FCP                0;3 FREE TEXT

                      INPUT TRANSFORM:K:$L(X)>30!($L(X)<1) X
                      LAST EDITED:  NOV 13, 1998 
                      HELP-PROMPT:  Enter an IFCAP fund control point. 
                      DESCRIPTION:
                                    This is an IFCAP fund control point.  


665.723191,4          REMARKS            0;4 FREE TEXT

                      INPUT TRANSFORM:K:$L(X)>30!($L(X)<3) X
                      LAST EDITED:  NOV 05, 1998 
                      HELP-PROMPT:  Enter remarks of 3-30 characters that are special for the item. 
                      DESCRIPTION:  These are remarks that are special for the item and not included or cannot be included in any
                                    other field.  


665.723191,5          UNIT COST          0;5 NUMBER

                      INPUT TRANSFORM:S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999)!(X<0) X
                      LAST EDITED:  NOV 05, 1998 
                      HELP-PROMPT:  Type a Dollar Amount between 0 and 999999, 2 Decimal Digits 
                      DESCRIPTION:
                                    This is the unit cost of the item to be purchased.  


665.723191,6          ITEM TOTAL         0;6 NUMBER

                      INPUT TRANSFORM:S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999)!(X<0) X
                      LAST EDITED:  NOV 12, 1998 
                      HELP-PROMPT:  A Dollar Amount between 0 and 999999, 2 Decimal Digits 
                      DESCRIPTION:  This field contains the total cost of the item.  The value is computed by the system and then
                                    populated.  


665.723191,7          QUANTITY           0;7 NUMBER (Required)

                      INPUT TRANSFORM:K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X
                      LAST EDITED:  NOV 05, 1998 
                      HELP-PROMPT:  Enter the quantity delivered and billable.  A number with 0 decimal digits. 
                      DESCRIPTION:
                                    This is the number of units that was issued or repaired for this transaction.  


665.723191,8          POSTED FLAG        0;10 SET

                                    'Y' FOR YES, POSTED; 
                                    'N' FOR NO, NOT POSTED; 
                      LAST EDITED:  NOV 27, 1998 
                      HELP-PROMPT:  YES for posted, NO for not posted. 
                      DESCRIPTION:  This field is populated when the item has been successfully posted to IFCAP.  The user will not
                                    be prompted to enter data in this field.  


665.723191,9          ICD9 CODE          0;9 POINTER TO ICD DIAGNOSIS FILE (#80)

                      LAST EDITED:  MAR 17, 1999 
                      HELP-PROMPT:  Enter a code from the ICD Diagnosis file. 
                      DESCRIPTION:  This is the patient's ICD diagnosis code that best describes the condition warranting oxygen
                                    therapy.  


665.723191,10         SUSPENDED AMOUNT   0;11 NUMBER

                      INPUT TRANSFORM:S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999999)!(X<0) X
                      LAST EDITED:  DEC 02, 1998 
                      HELP-PROMPT:  Enter the amount billed by the contractor that Home Oxygen will not pay. 
                      DESCRIPTION:
                                    This is the excess amount billed by the contractor that Home Oxygen will not pay.  


665.723191,11         SUSPENDED REASON   0;12 FREE TEXT

                      INPUT TRANSFORM:K:$L(X)>75!($L(X)<1) X
                      LAST EDITED:  DEC 02, 1998 
                      HELP-PROMPT:  Enter the reason for suspending payment. 
                      DESCRIPTION:
                                    This is the reason the amount suspended is not being paid by Home Oxygen.  


665.723191,12         BACK-PTR           0;13 NUMBER

                      INPUT TRANSFORM:K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X
                      LAST EDITED:  DEC 15, 1998 
                      HELP-PROMPT:  This is the internal entry number of this item in file 665. 
                      DESCRIPTION:  This is the internal entry number of the item from which this transaction was generated.  It is
                                    the IEN of the item in the HOME OXYGEN ITEM multiple in the PROSTHETICS PATIENT file.  


665.723191,13         ITEM TYPE          0;14 SET

                                    'I' FOR Initial Issue; 
                                    'R' FOR Replace; 
                                    'X' FOR Repair; 
                      LAST EDITED:  FEB 03, 1999 
                      HELP-PROMPT:  Enter the type of transaction for this item. 
                      DESCRIPTION:
                                    This is the type of transaction/issue (initial, replacement, or repair) for the item.  


665.723191,14         UNIT OF ISSUE      0;15 POINTER TO UNIT OF ISSUE FILE (#420.5)

                      LAST EDITED:  DEC 29, 1998 
                      HELP-PROMPT:  Enter the appropriate unit of issue for this item. 
                      DESCRIPTION:
                                    This is the unit by which items/services are issued (e.g., each, pair, box, cases, etc).  

                      TECHNICAL DESCR:
                                    Points to UNIT OF ISSUE file (#420) 


665.723191,15         PROSTHETICS APPLIANCE REPAIR 0;16 POINTER TO RECORD OF PROS APPLIANCE/REPAIR FILE (#660)

                      LAST EDITED:  JAN 05, 1999 
                      HELP-PROMPT:  A number between 1 and 99999999 is entered. 
                      DESCRIPTION:  This field will be populated by the internal entry number of file 660.  This happens when
                                    posting to IFCAP has been successful.  

                      CROSS-REFERENCE:665.72^AC 
                                    1)= S ^RMPO(665.72,"AC",$E(X,1,30),DA(4),DA(3),DA(2),DA(1),DA)=""
                                    2)= K ^RMPO(665.72,"AC",$E(X,1,30),DA(4),DA(3),DA(2),DA(1),DA)


665.723191,16         SUSPENDED QUANTITY 0;17 NUMBER

                      INPUT TRANSFORM:K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
                      LAST EDITED:  JUN 10, 1999 
                      HELP-PROMPT:  Type a Number between 0 and 999, 0 Decimal Digits 
                      DESCRIPTION:
                                    This is a quantity of an item not being used by the patient.  


665.723191,17         RENTAL FLAG        0;18 SET

                                    '1' FOR YES; 
                                    '0' FOR NO; 
                      LAST EDITED:  MAY 18, 2000 
                      DESCRIPTION:
                                    Designates if Home Oxygen item is Rental.  


665.723191,18         HOME OXYGEN CONSERVING FLAG 0;19 SET

                                    '1' FOR Y; 
                                    '0' FOR N; 
                      LAST EDITED:  JUN 07, 2000 
                      DESCRIPTION:
                                    This flag an item that Oxygen Conserving device is used.  


665.723191,100        PFSS ACCOUNT REFERENCE PFSS;1 POINTER TO PFSS ACCOUNT FILE (#375)

                      LAST EDITED:  DEC 20, 2005 
                      HELP-PROMPT:  Enter the PFSS Account Reference number for this item. 
                      DESCRIPTION:
                                    This is the account reference number associated with the prescription for this item.  

                                    UNEDITABLE

665.723191,101        PFSS UNIQUE CHARGE ID PFSS;2 NUMBER

                      INPUT TRANSFORM:K:+X'=X!(X>99999999)!(X<1)!(X?.E1"."1N.N) X
                      LAST EDITED:  DEC 20, 2005 
                      HELP-PROMPT:  Type a Number between 1 and 99999999, 0 Decimal Digits 
                      DESCRIPTION:
                                    This is the unique charge ID associated with this item.  

                                    UNEDITABLE

665.723191,102        REQUESTOR          PFSS;3 POINTER TO NEW PERSON FILE (#200)

                      LAST EDITED:  DEC 20, 2005 
                      HELP-PROMPT:  Enter the person that initiated the consult for this item's prescription. 
                      DESCRIPTION:
                                    This is the person that made the consult request for this item.  

                                    UNEDITABLE



665.72319,2         ACCEPTED FLAG        0;2 SET

                                    'Y' FOR YES, ACCEPTED; 
                                    'N' FOR NO, NOT ACCEPTED; 
                      LAST EDITED:  NOV 27, 1998 
                      HELP-PROMPT:  Y to accept patient transaction or N not to accept for billing. 
                      DESCRIPTION:  Flags a patient transaction as accepted or not accepted.  If a patient transaction is accepted
                                    then it can be billed to IFCAP.  


665.72319,3         POSTED FLAG          0;3 SET

                                    'Y' FOR YES, POSTED; 
                                    'N' FOR NO, NOT POSTED; 
                                    'P' FOR PARTIALLY POSTED; 
                      LAST EDITED:  NOV 27, 1998 
                      HELP-PROMPT:  Y for posted, N for Not Posted and P for Partially Posted. 
                      DESCRIPTION:  Flags a patient transaction with an appropriate post flag of posted, partially posted or not
                                    posted.  






665.723,2       FUND CONTROL POINT       2;0 Multiple #665.7232

                      DESCRIPTION:
                                    A multiple of fund control points that are billed through IFCAP.  

                      IDENTIFIED BY:442 IEN(#2), REFERENCE #(#3)

665.7232,.01      FUND CONTROL POINT       0;1 FREE TEXT

                        INPUT TRANSFORM:K:$L(X)>20!($L(X)<1) X
                        LAST EDITED:  NOV 27, 1998 
                        HELP-PROMPT:  Answer must be 1-20 characters IFCAP fund control point. 
                        DESCRIPTION:  This field contains a free text entry of an IFCAP fund control point used for budgeting and
                                      disbursement.  

                        CROSS-REFERENCE:665.7232^B 
                                      1)= S ^RMPO(665.72,DA(2),1,DA(1),2,"B",$E(X,1,30),DA)=""
                                      2)= K ^RMPO(665.72,DA(2),1,DA(1),2,"B",$E(X,1,30),DA)


665.7232,1        PAYMENT TYPE             0;2 SET

                                      '1' FOR 1358; 
                                      'P' FOR PURCHASE CARD; 
                        LAST EDITED:  NOV 27, 1998 
                        HELP-PROMPT:  Enter 1 for 1358 or P for Purchase Card. 
                        DESCRIPTION:  This is the method of payment for the fund control point.  Payments for Home Oxygen are done
                                      by purchase cards or 1358 service orders.  


665.7232,2        442 IEN                  0;3 POINTER TO PROCUREMENT & ACCOUNTING TRANSACTIONS FILE (#442)

                        LAST EDITED:  FEB 02, 1999 
                        HELP-PROMPT:  Internal entry number of file 442. 
                        DESCRIPTION:  The internal entry number for the 1358 service order or purchase card in the PROCUREMENT &
                                      ACCOUNTING TRANSACTIONS file (#442) 

                        CROSS-REFERENCE:665.7232^C 
                                      1)= S ^RMPO(665.72,DA(2),1,DA(1),2,"C",$E(X,1,30),DA)=""
                                      2)= K ^RMPO(665.72,DA(2),1,DA(1),2,"C",$E(X,1,30),DA)


665.7232,3        REFERENCE #              0;4 FREE TEXT

                        INPUT TRANSFORM:K:$L(X)>50!($L(X)<1) X
                        LAST EDITED:  FEB 02, 1999 
                        HELP-PROMPT:  A 1-50 characters IFCAP reference number for payment. 
                        DESCRIPTION:
                                      A valid 1358 service order number or purchase order number.  

                        CROSS-REFERENCE:665.7232^D 
                                      1)= S ^RMPO(665.72,DA(2),1,DA(1),2,"D",$E(X,1,30),DA)=""
                                      2)= K ^RMPO(665.72,DA(2),1,DA(1),2,"D",$E(X,1,30),DA)


665.7232,4        USER                     0;5 POINTER TO NEW PERSON FILE (#200)

                        LAST EDITED:  NOV 27, 1998 
                        HELP-PROMPT:  User DUZ entering transaction. 
                        DESCRIPTION:
                                      The DUZ of the person entering the transaction.  


665.7232,5        VENDOR                   0;6 POINTER TO VENDOR FILE (#440)

                        LAST EDITED:  NOV 30, 1998 
                        HELP-PROMPT:  Vendor responsible for billing. 
                        DESCRIPTION:
                                      This is the IFCAP vendor for which posting will occur.  


665.7232,6        TOTAL                    0;7 NUMBER

                        INPUT TRANSFORM:S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999999)!(X<0) X
                        LAST EDITED:  NOV 30, 1998 
                        HELP-PROMPT:  Type a Dollar Amount between 0 and 999999999, 2 Decimal Digits 
                        DESCRIPTION:
                                      Total amount posted to date for purchase card transactions.  


665.7232,7        DATE CLOSED              0;8 DATE

                        INPUT TRANSFORM:S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
                        LAST EDITED:  NOV 30, 1998 
                        HELP-PROMPT:  Close out date of transaction. 
                        DESCRIPTION:
                                      This is the date the transaction was flagged as closed/signed off.  







      FILES POINTED TO                      FIELDS

ICD DIAGNOSIS (#80)               ITEM:ICD9 CODE (#9)

NEW PERSON (#200)                 ITEM:REQUESTOR (#102)
                                  FUND CONTROL POINT:USER (#4)

PATIENT (#2)                      PATIENT:PATIENT (#.01)

PFSS ACCOUNT (#375)               ITEM:PFSS ACCOUNT REFERENCE (#100)

PROCUREMENT & ACCOUNTING TRANS 
                   (#442)         FUND CONTROL POINT:442 IEN (#2)

PROS ITEM MASTER (#661)           ITEM:ITEM (#.01)

PROSTHETIC HCPCS (#661.1)         ITEM:HCPCS CODE (#2)

PROSTHETICS SITE PARAMETERS 
                   (#669.9)       SITE (#.01)

RECORD OF PROS APPLIANCE/REPAI 
                   (#660)         ITEM:PROSTHETICS APPLIANCE REPAIR (#15)

UNIT OF ISSUE (#420.5)            ITEM:UNIT OF ISSUE (#14)

VENDOR (#440)                     VENDOR:VENDOR (#.01)
                                  FUND CONTROL POINT:VENDOR (#5)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):