Print Page as PDF
DBIA192 ICR (192)

DBIA192    ICR (192)

Name Value
NUMBER 192
IA # 192
GLOBAL ROOT DD(
DATE CREATED 2005/06/20
CUSTODIAL PACKAGE VA FILEMAN
CUSTODIAL ISC San Francisco
USAGE Private
TYPE File
NAME DBIA192
ORIGINAL NUMBER 192
GENERAL DESCRIPTION
FileMan agrees that Quality Improvement Checklist can
call the following routine occurrences of ^DD references:

ROUTINE OCCURRENCES OF ^DD REFERENCES:

QIPEXT+2:  I $D(QIPCUS) W !!,"This option displays the report
specifications",!,"for the QUIC",$P($P(";"_$P
(^DD(738.1,1,0),"^",3),";"_QIPCUS_":",2)," ;")," extract report(s).",! G EN

QIPEXTR+9:  I $D(QIPCUS) S PNAME=$P($P(";"_$P(^DD(738.1,1,0),"^",3), CUS_":
",2),";")

QIPEXTR+18:  K LOC,NAME,PM,PNAME S LOC=^QIP(738.1,OPTN,0),NAME=$P
(LOC,"^"),PM=$P(LOC,"^",2),PNAME=$P($P(";"_$P(^DD(738.1,1,0),"^",3),
";"_PM_":",2),"; ")

QIPEXTU1+21:  W !?10,$J(CNT,2),". ",NAME,"  -  ",$P($P(";"_$P(^DD
(738.1,1,0),"^",3),";"_PM_":",2),";")_$S($G(^QIP(738.1,OPTN,"NA"))
&(QIP'="V"):"  <<NOT AVAILABLE>>",1:"")

GLOBAL LISTINGS OF THE REFERENCED DDs:

^DD("42",".03","0")="SERVICE^RSX^M:MEDICINE;S:SURGERY;P:PSYCHIATRY;
NH:NHCU;NE:NEUROLOGY;I:INTERMEDIATE MED;R:REHAB MEDICINE;SCI:SPINAL CORD
INJURY;D:DOMICILIARY;B:BLIND REHAB;NC:NON-COUNT;^0;3^Q"

^DD("738.1","1","0")="PARENT MENU^RS^L:LABORATORY;M:MAS;N:NURSING;
P:PHARMACY;S:SURGERY;Q:QUALITY MANAGEMENT;R:RADIOLOGY;^0;2^Q"


STATUS Retired
DURATION Till Otherwise Agreed
ID DD(
SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE ISC
QUALITY IMPROVEMENT CHECKLIST Birmingham