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 |  Pointer To FileMan Files |  Fields |  Found Entries |  All
Print Page as PDF
Global: ^APCLGUIR

Package: Patient Care Component

Global: ^APCLGUIR


Information

FileMan FileNo FileMan Filename Package
9001004.4 PCC MANAGEMENT REPORTS GUI OUTPUT Patient Care Component

Description

Directly Accessed By Routines, Total: 18

Package Total Routines
Patient Care Component Reports 18 APCLD31    APCLD51    APCLD51E    APCLD61    APCLD61E    APCLD71    APCLD71E    APCLD81
APCLD81E    APCLDMAP    APCLDMAS    APCLDR1    APCLDR2    APCLDR3    APCLP51    APCLP61
APCLP71    APCLP81    

Accessed By FileMan Db Calls, Total: 18

Package Total Routines
Patient Care Component Reports 18 APCLD31    APCLD51    APCLD51E    APCLD61    APCLD61E    APCLD71    APCLD71E    APCLD81
APCLD81E    APCLDMAP    APCLDMAS    APCLDR1    APCLDR2    APCLDR3    APCLP51    APCLP61
APCLP71    APCLP81    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Kernel 1 NEW PERSON(#200)[.02]    

Fields, Total: 8

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  OCT 04, 2004
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • CROSS-REFERENCE:  9001004.4^B
    1)= S ^APCLGUIR("B",$E(X,1,30),DA)=""
    2)= K ^APCLGUIR("B",$E(X,1,30),DA)
.02 USER WHO REQUESTED REPORT 0;2 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  OCT 04, 2004
.03 START TIME 0;3 DATE

  • INPUT TRANSFORM:  S %DT="ET" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 20, 2005
  • CROSS-REFERENCE:  9001004.4^AUSR^MUMPS
    1)= S ^APCLGUIR("AUSR",$S($P($G(^APCLGUIR(DA,0)),"^",2):$P(^APCLGUIR(DA,0),"^",2),1:1),(9999999.9999-X),DA)=""
    2)= K ^APCLGUIR("AUSR",$S($P($G(^APCLGUIR(DA,0)),"^",2):$P(^APCLGUIR(DA,0),"^",2),1:1),(9999999.9999-X),DA)
.04 END TIME 0;4 DATE

  • INPUT TRANSFORM:  S %DT="ET" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 08, 2004
.05 OUTPUT TYPE 0;5 SET
  • '1' FOR Individual Reports;
  • '2' FOR EPI File;
  • '3' FOR Cumulative Reports;
  • '4' FOR Individual and Cumulative Reports;

  • LAST EDITED:  OCT 11, 2004
.06 OPTION NAME 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>60!($L(X)<1) X
  • LAST EDITED:  SEP 27, 2005
  • HELP-PROMPT:  Answer must be 1-60 characters in length.
.07 REPORT STATUS 0;7 SET
  • 'R' FOR RUNNING;
  • 'C' FOR COMPLETED;

  • LAST EDITED:  SEP 15, 2005
1100 OUTPUT 11;0 WORD-PROCESSING #9001004.411
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  Found Entries |  All