Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR  | All
Print Page as PDF
Global: ^PRC(440.2

Package: IFCAP

Global: ^PRC(440.2


Information

FileMan FileNo FileMan Filename Package
440.2 DIRECT DELIVERY PATIENTS IFCAP

Description

Pointed To By FileMan Files, Total: 2

Package Total FileMan Files
IFCAP 2 PROCUREMENT & ACCOUNTING TRANSACTIONS(#442)[5.3]    AMENDMENTS(#443.6)[5.3]    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Kernel 1 STATE(#5)[5]    
Registration 1 PATIENT(#2)[.01]    

Fields, Total: 8

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

  • INPUT TRANSFORM:  S DINUM=X I $D(PRCH("PO")) S DIC("DR")="[PRCHPT]"
  • LAST EDITED:  DEC 11, 1985
  • DESCRIPTION:  
    This is the name of the patient.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  440.2^B
    1)= S ^PRC(440.2,"B",$E(X,1,30),DA)=""
    2)= K ^PRC(440.2,"B",$E(X,1,30),DA)
1 STREET ADDR.1 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>24!($L(X)<3) X
  • LAST EDITED:  OCT 15, 1985
  • HELP-PROMPT:  ANSWER MUST BE 3-24 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This is the patient street address 1.
2 STREET ADDR.2 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>24!($L(X)<3) X
  • LAST EDITED:  OCT 15, 1985
  • HELP-PROMPT:  ANSWER MUST BE 3-24 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This is the patient address 2.
3 STREET ADDR.3 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>24!($L(X)<3) X
  • LAST EDITED:  OCT 15, 1985
  • HELP-PROMPT:  ANSWER MUST BE 3-24 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This is the patient street address 3.
4 CITY 0;5 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<3) X
  • LAST EDITED:  OCT 15, 1985
  • HELP-PROMPT:  ANSWER MUST BE 3-15 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This is the city of the patient address.
5 STATE 0;6 POINTER TO STATE FILE (#5)
************************REQUIRED FIELD************************
STATE(#5)

  • LAST EDITED:  OCT 15, 1985
  • DESCRIPTION:  
    This is the state of the patient address.
6 ZIP CODE 0;7 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<5) X
  • LAST EDITED:  OCT 15, 1985
  • HELP-PROMPT:  ANSWER MUST BE 5-10 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This is the zip code of the patient address.
99 DFN# 99;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 03, 1985
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 99999999
  • DESCRIPTION:  
    This is the DFN# number.

ICR, Total: 2

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #3689
  • M DATA EXTRACTOR
    		•
    ICR #6601
  • ADVANCED PROSTHETICS ACQ TOOL
  • ABOVE PAR
    		•  NAME (.01).
    Access: Read w/Fileman

    STREET ADDR.1 (1).
    Access: Read w/Fileman

    STREET ADDR.2 (2).
    Access: Read w/Fileman

    STREET ADDR.3 (3).
    Access: Read w/Fileman

    CITY (4).
    Access: Read w/Fileman

    STATE (5).
    Access: Read w/Fileman

    ZIP CODE (6).
    Access: Read w/Fileman
    Info |  Desc |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR  | All