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 |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | 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

Directly Accessed By Routines, Total: 14

Package Total Routines
IFCAP 14 ITEM SPECIFIC INFORMATION    PRCFARR    PRCHAM1    PRCHDAM1    PRCHDP1    PRCHDP5    PRCHDSP4    PRCHFPNT
PRCHHI4    PRCHPAM2    PRCHPNT    ^PRC(440.2    PRCOE1    PRCOEC1    

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 ACQUISITION 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

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DIC(5 - [#5] ID5+1
    ^PRC(440.2 - [#440.2] .01(XREF 1S), .01(XREF 1K)

    Naked Globals

    Name Field # of Occurrence
    ^(0 ID1+1, ID2+1, ID3+1, ID4+1, ID5+1, ID6+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> DA .01(XREF 1S), .01(XREF 1K)
    >> DIC ID5+1
    >> DIC("DR" .01+1*
    >> DINUM .01+1*
    >> PRCH("PO" .01+1
    U ID1+1, ID2+1, ID3+1, ID4+1, ID5+1, ID6+1
    X .01+1, .01(XREF 1S), .01(XREF 1K), 1+1!, 2+1!, 3+1!, 4+1!, 6+1!, 99+1!
    Info |  Desc |  Directly Accessed By Routines |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All