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 |  ICR |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^RMPR(664.1

Package: Prosthetics

Global: ^RMPR(664.1


Information

FileMan FileNo FileMan Filename Package
664.1 PROSTHETIC 2529-3 Prosthetics

Description

Directly Accessed By Routines, Total: 53

Package Total Routines
Prosthetics 50 AUDIT DATE    DISABILITY CODE    ITEM    RMPR 2529 HDR    RMPR 2529 INQ    RMPR 2529-3 STATUS    RMPR 25293    RMPR TECH PAT
RMPR121C    RMPR144P    RMPR29    RMPR293    RMPR29A    RMPR29B    RMPR29BG    RMPR29C
RMPR29CA    RMPR29CB    RMPR29D    RMPR29GA    RMPR29GU    RMPR29I    RMPR29LA    RMPR29LC
RMPR29LD    RMPR29LE    RMPR29LI    RMPR29LP    RMPR29LS    RMPR29LU    RMPR29M    RMPR29MG
RMPR29P    RMPR29R    RMPR29RG    RMPR29S    RMPR29T    RMPR29U    RMPR29W    RMPR29W1
RMPR29WO    RMPR8PG    RMPR9PU    RMPRCPT9    RMPRD1    RMPRGULK    RMPRPS35    RMPRPST
RMPRWOFX    ^RMPR(664.1    
Functional Independence 1 RMIMRP    

Accessed By FileMan Db Calls, Total: 25

Package Total Routines
Prosthetics 25 RMPR29    RMPR29A    RMPR29BG    RMPR29C    RMPR29CA    RMPR29CB    RMPR29D    RMPR29GA
RMPR29GU    RMPR29I    RMPR29I1    RMPR29LA    RMPR29LC    RMPR29LD    RMPR29LE    RMPR29LI
RMPR29LS    RMPR29LU    RMPR29R    RMPR29RG    RMPR29S    RMPR29T    RMPR29U    RMPR29W
RMPR29WO    

Pointed To By FileMan Files, Total: 3

Package Total FileMan Files
Prosthetics 3 RECORD OF PROS APPLIANCE/REPAIR(#660)[72]    PROSTHETICS 1358(#664)[24]    PROSTHETIC WORK ORDER(#664.2)[#664.22(14)]    

Pointer To FileMan Files, Total: 15

Package Total FileMan Files
Prosthetics 8 RECORD OF PROS APPLIANCE/REPAIR(#660)[#664.16(5)]    PROS ITEM MASTER(#661)[#664.16(.01)]    PROSTHETIC HCPCS(#661.1)[#664.16(13)]    PROS ITEM LOCATION(#661.3)[#664.16(17)]    PROS DISABILITY CODE(#662)[#664.15(.01)]    PROSTHETIC WORK ORDER(#664.2)[34#664.16(6)]    PROSTHETICS PATIENT(#665)[.02]    PROSTHETIC SUSPENSE(#668)[.05]    
IFCAP 3 VENDOR(#440)[#664.16(15)]    UNIT OF ISSUE(#420.5)[#664.16(3)]    GENERIC INVENTORY(#445)[#664.16(18)]    
Kernel 2 INSTITUTION(#4)[.03.04.11]
NEW PERSON(#200)[7912.1131415212227#664.129(3)#664.129(5)]
Registration 2 WARD LOCATION(#42)[12]    FACILITY TREATING SPECIALTY(#45.7)[12.3]    

Fields, Total: 48

Field # Name Loc Type Details
.01 DATE 0;1 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUL 26, 1995
  • HELP-PROMPT:  Enter the date the VAF 10-2529-3 was created.
  • DESCRIPTION:  
    Date that the VAF 10-2529-3 was created.
  • CROSS-REFERENCE:  664.1^B
    1)= S ^RMPR(664.1,"B",$E(X,1,30),DA)=""
    2)= K ^RMPR(664.1,"B",$E(X,1,30),DA)
    CROSS REFERENCE ON 2529-3 ENTRY DATE.
.02 PATIENT 0;2 POINTER TO PROSTHETICS PATIENT FILE (#665) PROSTHETICS PATIENT(#665)

  • LAST EDITED:  AUG 19, 1994
  • HELP-PROMPT:  Enter the Name of the Patient
  • DESCRIPTION:  
    The name of the Prosthetics Patient requiring services.
  • CROSS-REFERENCE:  664.1^D
    1)= S ^RMPR(664.1,"D",$E(X,1,30),DA)=""
    2)= K ^RMPR(664.1,"D",$E(X,1,30),DA)
    X-ref used to lookup Prosthetics Patient.
.03 STATION 0;3 POINTER TO INSTITUTION FILE (#4)
************************REQUIRED FIELD************************
INSTITUTION(#4)

  • LAST EDITED:  DEC 24, 1996
  • HELP-PROMPT:  Enter the station name or number.
  • DESCRIPTION:  
    Station that will receive the AMIS count.
.04 REQUESTING STATION 0;4 POINTER TO INSTITUTION FILE (#4) INSTITUTION(#4)

  • LAST EDITED:  SEP 30, 1994
  • HELP-PROMPT:  Enter the station name or number that has requested the items/services.
  • DESCRIPTION:  
    Station that has requested the item/services.
.05 SUSPENSE RECORD 0;8 POINTER TO PROSTHETIC SUSPENSE FILE (#668) PROSTHETIC SUSPENSE(#668)

  • LAST EDITED:  JUN 15, 2006
  • DESCRIPTION:  
    Pointer to the Prosthetics Suspense Record file #668 that is associated with this work order.
  • CROSS-REFERENCE:  664.1^SUS
    1)= S ^RMPR(664.1,"SUS",$E(X,1,30),DA)=""
    2)= K ^RMPR(664.1,"SUS",$E(X,1,30),DA)
    Index on the pointer to file 668 Prosthetics Suspense Record initially created for the GUI Work Order.
.06 ELIGIBILITY STATUS 0;6 SET
  • '1' FOR SC/OP;
  • '2' FOR SC/IP;
  • '3' FOR NSC/IP;
  • '4' FOR NSC/OP;

  • LAST EDITED:  AUG 23, 1993
  • HELP-PROMPT:  Enter the appropriate ELIGIBILITY STATUS of the patient needing items/services.
  • DESCRIPTION:  
    The eligibility status of the patient needing items/services.
.07 SPECIAL CATEGORY 0;22 SET
  • '1' FOR SPECIAL LEGISLATION;
  • '2' FOR A&A;
  • '3' FOR PHC;

  • LAST EDITED:  DEC 05, 1993
  • HELP-PROMPT:  Enter the appropriate SPECIAL CATEGORY of the patient needing items/services.
  • DESCRIPTION:  
    The Special Category of the Patient needing items/services.
.081 OTHER DESCRIPTION 5;0 WORD-PROCESSING #664.11

  • DESCRIPTION:  
    This is a remarks field.
.09 DATE REQUIRED 0;9 DATE

  • INPUT TRANSFORM:  S %DT="ET" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  AUG 06, 1993
  • HELP-PROMPT:  Enter the Date that the Item/Services are required.
  • DESCRIPTION:  
    Date that the Items/Services are required.
.11 RECEIVING STATION 0;15 POINTER TO INSTITUTION FILE (#4) INSTITUTION(#4)

  • INPUT TRANSFORM:  D AUL^RMPR29U Q
  • LAST EDITED:  SEP 29, 1995
  • HELP-PROMPT:  Enter the Station that will process the VAF 10-2529-3 Work Order.
  • DESCRIPTION:  
    Station that is responsible for furnishing the item.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
1 TRANSACTION TYPE 0;10 SET
  • 'I' FOR INITIAL;
  • 'X' FOR REPAIR;
  • 'S' FOR SPARE;
  • 'R' FOR REPLACE;

  • LAST EDITED:  DEC 19, 1993
  • HELP-PROMPT:  Enter the transaction type.
  • DESCRIPTION:  
    This field indicates whether the item being issued is the first of this item for this patient, a spare item, or is replacing the last such item the patient received, or if the item is being repaired.
2 SOURCE OF PROCUREMENT 0;11 SET
  • 'O' FOR ORTHOTICS/PROSTHETICS;
  • 'R' FOR RESTORATION LAB;
  • 'S' FOR SHOE LAST CLINIC;
  • 'W' FOR WHEELCHAIR REPAIR SHOP;
  • 'N' FOR NATIONAL FOOT CENTER;
  • 'D' FOR DDC;
  • 'E' FOR EYEGLASS;

  • LAST EDITED:  OCT 14, 2005
  • HELP-PROMPT:  Enter the correct code for the Source of Procurement.
  • DESCRIPTION:  
    Known sources from which Prosthetics Items are acquired within the VA.
  • CROSS-REFERENCE:  664.1^H
    1)= S ^RMPR(664.1,"H",$E(X,1,30),DA)=""
    2)= K ^RMPR(664.1,"H",$E(X,1,30),DA)
    This will allow lookup by the Source of Procurement. An example might be the user only wanted to select form the Orthotic Lab, 2529-3's.
4 WORK ORDER NUMBER 0;13 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  OCT 04, 1994
  • HELP-PROMPT:  Enter Work Order Number (e.g., 644-95-2-O-0066).
  • DESCRIPTION:  This is the permanent number used to identify and track Lab Work Orders. It is built from both information the user enters and the sequence number assigned by the computer (e.g., 644-95-2-O-0016).
    644 = Station Number
    95 = Fiscal Year
    2 = Quarter
    O = Type of Laboratory (Orthotic, Restoration, Shoe Last,
    Wheelchair Repair, National Foot Center, or Denver Distribution
    Center)
    0016 = Sequence number assigned by the computer
  • CROSS-REFERENCE:  664.1^C
    1)= S ^RMPR(664.1,"C",$E(X,1,30),DA)=""
    2)= K ^RMPR(664.1,"C",$E(X,1,30),DA)
    X-ref is used to lookup 2529-3 by Work Order Number.
  • CROSS-REFERENCE:  664.1^F^MUMPS
    1)= I $P(X,"-",5)'="" S ^RMPR(664.1,"F",$P(X,"-",5),DA)=""
    2)= I $P(X,"-",5)'="" K ^RMPR(664.1,"F",$P(X,"-",5),DA)
    Used to lookup 2529-3 request by extension number.
5 DISABILITY CODE 1;0 POINTER Multiple #664.15 664.15

  • DESCRIPTION:  
    This field points to the Disability code file. It holds information on the patient's disability code that qualifies the Veteran for this service or item.
6 ITEM 2;0 POINTER Multiple #664.16 664.16

  • LAST EDITED:  APR 14, 1995
  • DESCRIPTION:  This field is a pointer to the master item list of possible appliances. The master list is set up so that appliances all into groups which are
    types of appliances.
  • TECHNICAL DESCR:  It was discovered late in the development cycle that multiple line items cause a problem in AMIS caluations. The EP and Peer Review recommended limiting this to only 1 item. This data is targeted to be moved at a later
    date. DINUM is set to 1 in the input transform.
7 CANCELLED BY 3;1 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAY 19, 1994
  • HELP-PROMPT:  Enter the Name of the Person who cancelled the VAF 10-529-3.
  • DESCRIPTION:  
    Contains a pointer to the entry in the New Person file for the person who cancelled this VAF 10-2529-3.
8 CANCEL DATE 3;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 19, 1994
  • HELP-PROMPT:  Enter the date this VAF 10-2529-3 was canceled.
  • DESCRIPTION:  
    This field contains the date the VAF 10-2529-3 was canceled.
9 RETURNED BY 3;3 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAY 19, 1994
  • HELP-PROMPT:  Enter the name of the Lab Supervisor returning the VAF 10-2529-3 to the LAB as incomplete.
  • DESCRIPTION:  
    Lab Supervisor that returned the 2529-3 to the Lab as incomplete.
10 RETURN DATE 3;4 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 19, 1994
  • HELP-PROMPT:  Enter the date the VAF 10-2529-3 was returned to the LAB.
  • DESCRIPTION:  
    The date the VAF 10-2529-3 was returned to the LAB.
11 CANCELLATION REMARKS 4;0 WORD-PROCESSING #664.111

  • LAST EDITED:  SEP 27, 1993
  • DESCRIPTION:  
    These are the Cancellation remarks, if the VAF 10-2529-3 was canceled.
11.5 RETURN TO LAB REASON 6;0 WORD-PROCESSING #664.12

  • LAST EDITED:  MAY 19, 1994
  • DESCRIPTION:  
    This contains the reason for returning the VAF 10-2529-3 to the LAB.
12 WARD LOCATION CDR;1 POINTER TO WARD LOCATION FILE (#42) WARD LOCATION(#42)

  • LAST EDITED:  MAR 18, 1994
  • HELP-PROMPT:  Enter the Ward or Clinic Location.
  • DESCRIPTION:  
    This field will contain the ward the request was originated from if the Patient is an inpatient.
12.1 PHYSICIAN CDR;2 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAR 18, 1994
  • HELP-PROMPT:  Enter the Name of the Provider.
  • DESCRIPTION:  
    Provider who prescribes the services/items for the Prosthetics inpatient.
12.2 DIAGNOSIS CDR;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<3) X
  • LAST EDITED:  MAR 18, 1994
  • HELP-PROMPT:  Enter the patient's current diagnosis most related to receiving this item.
  • DESCRIPTION:  
    Current patient diagnosis most related to receiving this item.
12.3 TREATING SPECIALTY CDR;4 POINTER TO FACILITY TREATING SPECIALTY FILE (#45.7) FACILITY TREATING SPECIALTY(#45.7)

  • LAST EDITED:  MAR 18, 1994
  • HELP-PROMPT:  Enter the Facility Treating Specialty that will be associated with cost containment reporting.
  • DESCRIPTION:  
    This is the Inpatient treating specialty that will be associated with cost containment reporting.
12.4 PHYSICIAN EXTENSION CDR;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<1) X
  • LAST EDITED:  MAY 10, 1994
  • HELP-PROMPT:  Enter the phone extension of the Provider associated with this VAF 10-2529-3.
  • DESCRIPTION:  
    Phone Extension by which the Physician may be contacted.
13 REQUESTING OFFICIAL 0;5 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  AUG 27, 1994
  • HELP-PROMPT:  Enter the Name of the Requesting Official.
  • DESCRIPTION:  
    This is the official person who entered this VAF 10-2529-3.
14 APPROVING OFFICIAL 0;7 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  SEP 30, 1994
  • HELP-PROMPT:  Enter the Name of the Approving Official.
  • DESCRIPTION:  
    This is the official who approved this VAF 10-2529-3.
15 TECHNICIAN 0;16 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  SEP 30, 1994
  • HELP-PROMPT:  Enter the name of the technician to associate with this VAF 10-2529-3.
  • DESCRIPTION:  
    This is the Technician associated with this VAF 10-2529-3.
  • CROSS-REFERENCE:  664.1^G
    1)= S ^RMPR(664.1,"G",$E(X,1,30),DA)=""
    2)= K ^RMPR(664.1,"G",$E(X,1,30),DA)
    Lookup By Technician
16 STATUS 0;17 SET
  • 'P' FOR PENDING ASSIGNMENT;
  • 'A' FOR ASSIGNED TO TECHNICIAN;
  • 'C' FOR COMPLETED;
  • 'CA' FOR CANCELLED;
  • 'R' FOR RETURNED TO TECHNICIAN;
  • 'PC' FOR PENDING COMPLETION;
  • 'D' FOR DELETED;
  • 'I' FOR INCOMPLETE;
  • 'S' FOR STOCK ISSUE;

  • LAST EDITED:  NOV 05, 1998
  • HELP-PROMPT:  Enter the current status of the VAF 10-2529-3
  • DESCRIPTION:  
    This is the current status of this VAF 10-2529-3.
  • CROSS-REFERENCE:  664.1^E
    1)= S ^RMPR(664.1,"E",$E(X,1,30),DA)=""
    2)= K ^RMPR(664.1,"E",$E(X,1,30),DA)
    X-ref used to determine status of pending 2529-3s that will be displayed to the Lab Supervisor when they enter the RMPR LAB MENU.
17 REQUESTOR DATE 0;18 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 30, 1994
  • HELP-PROMPT:  Enter the Date the Request was created.
  • DESCRIPTION:  
    The date this VAF 10-25-29-3 was entered.
18 APPROVING DATE 0;19 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 30, 1994
  • HELP-PROMPT:  Enter the Date the Request was approved.
  • DESCRIPTION:  
    The date this VAF 10-2529-3 was approved.
19 DATE ASSIGNED 7;1 DATE

  • INPUT TRANSFORM:  S %DT="ET" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 04, 1994
  • HELP-PROMPT:  Enter the date this VAF 10-2529-3 was assigned to the lab technician.
  • DESCRIPTION:  
    Date that the 2529-3 was assigned to the lab technician.
20 DATE DELIVERED 7;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 19, 1994
  • HELP-PROMPT:  Enter the date the item was delivered to the patient or requesting VAMC institution.
  • DESCRIPTION:  
    Date that the item/service was delivered to the patient or requesting VAMC institution.
21 INSPECTING OFFICIAL 0;21 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAY 19, 1994
  • HELP-PROMPT:  Enter the name of the person who inspected the work performed by the Prosthetics Lab.
  • DESCRIPTION:  
    Individual who is responsible for inspecting the work performed by the Prosthetics Lab.
22 COMPLETED BY 0;25 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAY 20, 1994
  • HELP-PROMPT:  Enter the name of the person who completed the job section of the VAF 10-2529-3.
  • DESCRIPTION:  
    Indiviual who completed the Job Section of the 2529-3.
23 CLOSE-OUT DATE 0;26 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 20, 1994
  • HELP-PROMPT:  Enter the date this VAF 10-2529-3 was closed out.
  • DESCRIPTION:  
    Date the the VAF 10-2529-3 was closed out for AMIS Purposes.
24 DELIVERY STATUS 0;27 SET
  • '1' FOR ISSUED TO VETERAN;
  • '2' FOR DELIVERED TO VETERAN;
  • '3' FOR AWAITING VETERAN PICKUP;

  • LAST EDITED:  SEP 30, 1994
  • HELP-PROMPT:  Enter '1' if issued to Veteran, '2' if delivered to Veteran, '3' if awaiting Veteran Pickup.
  • DESCRIPTION:  
    Code indicates delivery status of this VAF 10-2529-3.
25 TOTAL MATERIALS COST 7;7 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999.99)!(X<0) X
  • LAST EDITED:  NOV 16, 1993
  • HELP-PROMPT:  Enter the total charges associated with the item/service requested on this VAF 10-2529-3 minus the labor charges.
  • DESCRIPTION:  
    The total charges associated with the item/service requested on this VAF 10-2529-3 minus the labor costs.
26 TOTAL COST 7;8 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999.99)!(X<0) X
  • LAST EDITED:  NOV 16, 1993
  • HELP-PROMPT:  Enter the Total dollar amount associated with the item/service(s) requested on this VAF 10-2529-3 including labor charges.
  • DESCRIPTION:  
    The total charges associated with the item/service(s) requested on this VAF 10-2529-3 including labor charges.
27 ASSIGNED BY 7;3 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  SEP 08, 1994
  • HELP-PROMPT:  Enter the name of the person who assigned the VAF 10-2529-3 to the Lab Technician.
  • DESCRIPTION:  
    Indiviual who assigned the VAF 10-2529-3 Job to a Lab Technician.
28 NO ADMIN COUNT 0;23 SET
  • '1' FOR NO COUNT;

  • LAST EDITED:  MAY 13, 1994
  • HELP-PROMPT:  Enter '1' if the VAF 10-2529-3 is considered work for another station.
  • DESCRIPTION:  
    Status is set to ensure that Work Load and Total Cost do not count on the Adminstrative AMIS if the VAF 10-2529-3 is considered work for another station.
29 AUDIT DATE 8;0 DATE Multiple #664.129 664.129

  • DESCRIPTION:  
    Contains the date/time that the item on Page one of the 2529-3 was changed or deleted.
30 JOB # COUNT 0;24 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 30, 1994
  • HELP-PROMPT:  Type a Number between 0 and 999, 0 Decimal Digits
  • DESCRIPTION:  
    Set to the last job number on the 2529-3 to ensure that the Job count for the 2529-3 is accurate.
31 AMIS GROUPER 0;14 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 05, 1994
  • HELP-PROMPT:  Type a Number between 1 and 999999999, 0 Decimal Digits
  • DESCRIPTION:  
    This is a number that is assigned to group the items on a request together for AMIS reporting purposes.
32 NO LAB COUNT 0;20 SET
  • '1' FOR NO COUNT;

  • LAST EDITED:  MAY 12, 1994
  • HELP-PROMPT:  Enter a '1' if this station will receive an item produced by another station for the patient.
  • DESCRIPTION:  
    If this field contains a '1' then this VAF 10-2529-3 is a request to another station to provide the item/service(s), and this station will take an ADMINISTRATIVE count on this request, but no LAB count.
33 DATE ITEM RECEIVED 7;4 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 30, 1994
  • HELP-PROMPT:  Enter the Date the Item was received to service the Patient.
  • DESCRIPTION:  
    This is the date the item was received to service the patient.
34 NO COUNT WORK ORDER 0;12 POINTER TO PROSTHETIC WORK ORDER FILE (#664.2) PROSTHETIC WORK ORDER(#664.2)

  • LAST EDITED:  SEP 14, 1994
  • HELP-PROMPT:  Enter the Work Order that was used to create the No Count VAF 10-2529-3.
  • DESCRIPTION:  
    This is the work order that was used to create the No-Count VAF 10-2529-3.

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #6534
  • ADVANCED PROSTHETICS ACQUISITION TOOL
  • DATE (.01).
    Access: Both R/W w/Fileman

    PATIENT (.02).
    Access: Both R/W w/Fileman

    STATION (.03).
    Access: Both R/W w/Fileman

    REQUESTING STATION (.04).
    Access: Both R/W w/Fileman

    REQUESTING OFFICIAL (13).
    Access: Both R/W w/Fileman

    ELIGIBILITY STATUS (.06).
    Access: Both R/W w/Fileman

    APPROVING OFFICIAL (14).
    Access: Direct Global Read & w/Fileman

    SUSPENSE RECORD (.05).
    Access: Both R/W w/Fileman

    DATE REQUIRED (.09).
    Access: Both R/W w/Fileman

    TRANSACTION TYPE (1).
    Access: Direct Global Read & w/Fileman

    SOURCE OF PROCUREMENT (2).
    Access: Direct Global Read & w/Fileman

    NO COUNT WORK ORDER (34).
    Access: Direct Global Read & w/Fileman

    WORK ORDER NUMBER (4).
    Access: Both R/W w/Fileman

    AMIS GROUPER (31).
    Access: Both R/W w/Fileman

    RECEIVING STATION (.11).
    Access: Both R/W w/Fileman

    TECHNICIAN (15).
    Access: Both R/W w/Fileman

    STATUS (16).
    Access: Both R/W w/Fileman

    REQUESTOR DATE (17).
    Access: Both R/W w/Fileman

    APPROVING DATE (18).
    Access: Both R/W w/Fileman

    NO LAB COUNT (32).
    Access: Both R/W w/Fileman

    INSPECTING OFFICIAL (21).
    Access: Direct Global Read & w/Fileman

    SPECIAL CATEGORY (.07).
    Access: Direct Global Read & w/Fileman

    NO ADMIN COUNT (28).
    Access: Both R/W w/Fileman

    JOB # COUNT (30).
    Access: Both R/W w/Fileman

    COMPLETED BY (22).
    Access: Both R/W w/Fileman

    CLOSE-OUT DATE (23).
    Access: Both R/W w/Fileman

    DELIVERY STATUS (24).
    Access: Direct Global Read & w/Fileman

    DISABILITY CODE (.01).
    Access: Read w/Fileman

    SERVICE/NON-SERVICE (1).
    Access: Read w/Fileman

    ELIGIBILITY CATEGORY (2).
    Access: Read w/Fileman

    SPECIAL LEGISLATION (3).
    Access: Read w/Fileman

    CANCELLED BY (7).
    Access: Direct Global Read & w/Fileman

    CANCEL DATE (8).
    Access: Read w/Fileman

    RETURNED BY (9).
    Access: Read w/Fileman

    RETURN DATE (10).
    Access: Read w/Fileman

    CANCELLATION REMARKS (11).
    Access: Read w/Fileman

    OTHER DESCRIPTION (.081).
    Access: Read w/Fileman

    RETURN TO LAB REASON (11.5).
    Access: Read w/Fileman

    DATE ASSIGNED (19).
    Access: Both R/W w/Fileman

    DATE DELIVERED (20).
    Access: Read w/Fileman

    ASSIGNED BY (27).
    Access: Both R/W w/Fileman

    DATE ITEM RECEIVED (33).
    Access: Read w/Fileman

    TOTAL MATERIALS COST (25).
    Access: Read w/Fileman

    TOTAL COST (26).
    Access: Read w/Fileman

    WARD LOCATION (12).
    Access: Both R/W w/Fileman

    PHYSICIAN (12.1).
    Access: Read w/Fileman

    DIAGNOSIS (12.2).
    Access: Read w/Fileman

    TREATING SPECIALTY (12.3).
    Access: Read w/Fileman

    PHYSICIAN EXTENSION (12.4).
    Access: Read w/Fileman

    AUDIT DATE (.01).
    Access: Read w/Fileman

    OLD ITEM/JOB (1).
    Access: Read w/Fileman

    NEW ITEM/JOB (2).
    Access: Read w/Fileman

    USER (3).
    Access: Read w/Fileman

    RE-OPENED BY (5).
    Access: Read w/Fileman

    ITEM (.01).
    Access: Both R/W w/Fileman

    QTY (2).
    Access: Both R/W w/Fileman

    UNIT OF ISSUE (3).
    Access: Both R/W w/Fileman

    UNIT COST (4).
    Access: Both R/W w/Fileman

    APPLIANCE/REPAIR (5).
    Access: Both R/W w/Fileman

    WORK ORDER NUMBER (6).
    Access: Both R/W w/Fileman

    TYPE OF TRANSACTION (8).
    Access: Both R/W w/Fileman

    PATIENT CATEGORY (9).
    Access: Both R/W w/Fileman

    SPECIAL CATEGORY (10).
    Access: Both R/W w/Fileman

    BRIEF DESCRIPTION (6.5).
    Access: Both R/W w/Fileman

    TOTAL COST (11).
    Access: Both R/W w/Fileman

    SERIAL NUMBER (12).
    Access: Both R/W w/Fileman

    INVENTORY POINT (18).
    Access: Both R/W w/Fileman

    EXTENDED DESCRIPTION (.01).
    Access: Both R/W w/Fileman

    PSAS HCPCS (13).
    Access: Both R/W w/Fileman

    CPT MODIFIER (13.1).
    Access: Both R/W w/Fileman

    HIGH TECH ITEM (13.2).
    Access: Both R/W w/Fileman

    SOURCE (14).
    Access: Both R/W w/Fileman

    VENDOR (15).
    Access: Both R/W w/Fileman

    PSAS ITEM (16).
    Access: Both R/W w/Fileman

    ITEM LOCATION (17).
    Access: Both R/W w/Fileman

    REMARKS (.01).
    Access: Read w/Fileman

    File 664.1 "B" cross reference - used to look up by DATEFile 664.1 "C" cross reference - used to look up by WORKORDER NUMBERFile 664.1 "SUS" cross reference - used to look up bySUSPENSE RECORDFile 664.1/664.16 "AC" cross reference - used to look upby APPLIANCE/REPAIR related to the ITEM

    External References

    Name Field # of Occurrence
    ^%DT .01+1, .09+1, 8+1, 10+1, 17+1, 18+1, 19+1, 20+1, 23+1, 33+1
    AUL^RMPR29U .11+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^RMPR(664.1 - [#664.1] .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .05(XREF 1S), .05(XREF 1K), 2(XREF 1S), 2(XREF 1K), 4(XREF 1S), 4(XREF 1K)
    4(XREF 2S), 4(XREF 2K), 15(XREF 1S), 15(XREF 1K), 16(XREF 1S), 16(XREF 1K)

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT .01+1*, .09+1*, 8+1*, 10+1*, 17+1*, 18+1*, 19+1*, 20+1*, 23+1*, 33+1*
    >> DA .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .05(XREF 1S), .05(XREF 1K), 2(XREF 1S), 2(XREF 1K), 4(XREF 1S), 4(XREF 1K)
    4(XREF 2S), 4(XREF 2K), 15(XREF 1S), 15(XREF 1K), 16(XREF 1S), 16(XREF 1K)
    X .01+1*!, .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .05(XREF 1S), .05(XREF 1K), .09+1*!, 2(XREF 1S), 2(XREF 1K)
    , 4+1!, 4(XREF 1S), 4(XREF 1K), 4(XREF 2S), 4(XREF 2K), 8+1*!, 10+1*!, 12.2+1!, 12.4+1!, 15(XREF 1S)
    15(XREF 1K), 16(XREF 1S), 16(XREF 1K), 17+1*!, 18+1*!, 19+1*!, 20+1*!, 23+1*!, 25+1*!, 26+1*!
    , 30+1!, 31+1!, 33+1*!
    >> Y .01+1, .09+1, 8+1, 10+1, 17+1, 18+1, 19+1, 20+1, 23+1, 33+1
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Local Variables  | All