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 |  Found Entries |  All
Print Page as PDF
Global: ^AQAO1(8

Package: Quality Assurance

Global: ^AQAO1(8


Information

FileMan FileNo FileMan Filename Package
9002169.8 QI BRAINSTORM SESSION Quality Assurance

Description

Directly Accessed By Routines, Total: 10

Package Total Routines
Quality Assurance 10 AQAOQT1    AQAOQT11    AQAOQT12    AQAOQT13    AQAOT36    AQAOT361    AQAOX981    AQAOX982
AQAOX983    AQAOX984    

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
Quality Assurance 3 AQAOQT1    AQAOT36    AQAOT361    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Quality Assurance 1 QI BRAINSTORMING(#9002169.7)[.02]    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Kernel 1 NEW PERSON(#200)[#9002169.82(.01)]    
Quality Assurance 1 QI TEAM(#9002169.1)[.02]    

Fields, Total: 5

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

  • INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 17, 1993
  • HELP-PROMPT:  Enter date and time brainstorming session began.
  • CROSS-REFERENCE:  9002169.8^B
    1)= S ^AQAO1(8,"B",$E(X,1,30),DA)=""
    2)= K ^AQAO1(8,"B",$E(X,1,30),DA)
    3)= REGULAR 'B' XREF
.02 TEAM NAME 0;2 POINTER TO QI TEAM FILE (#9002169.1)
************************REQUIRED FIELD************************
QI TEAM(#9002169.1)

  • INPUT TRANSFORM:  S DIC("S")="I $P($G(AQAOUA(""USER"")),U,6)[""Q""!($D(^AQAO(9,DUZ,""TM"",""B"",Y)))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAR 18, 1993
  • SCREEN:  S DIC("S")="I $P($G(AQAOUA(""USER"")),U,6)[""Q""!($D(^AQAO(9,DUZ,""TM"",""B"",Y)))"
  • EXPLANATION:  MUST BE A MEMBER OF THE TEAM OR QI STAFF
  • CROSS-REFERENCE:  9002169.8^C
    1)= S ^AQAO1(8,"C",$E(X,1,30),DA)=""
    2)= K ^AQAO1(8,"C",$E(X,1,30),DA)
    3)= USED FOR LOOKUP BY TEAM NAME
.03 TOPIC 0;3 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<3) X
  • LAST EDITED:  MAR 17, 1993
  • HELP-PROMPT:  Enter a 3-50 character topic for this session.
1 MINUTES 1;0 WORD-PROCESSING #9002169.81
2 MEMBERS IN ATTENDANCE MEM;0 POINTER Multiple #9002169.82 9002169.82
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  All